股票多彩K线主图公式源码的分享
上图就是多彩K线主图的图例,从上图我们尅看到绿色的是大阴线,而跌停的K线是蓝色的,红色的是大阴线,盘中涨停的带有粉红色上影实体红色的K线,而盘中跌停的K线是下影线为绿色实体为红色的K线,涨停的是粉红色的K线。其中还有跳空的颜色区分,那究竟多彩K线主图的公式源码是什么?相应的公式源码如下。
MA6: MA(C,6 ),COLORGREEN;{王子操盘线}
MA6_: IF(MA6>=REF(MA6,1),MA6,DRAWNULL),COLORMAGENTA;
MA20: MA(C,20),COLORLICYAN;{万能线}
MA20_: IF(MA20>=REF(MA20,1),MA20,DRAWNULL),COLORLIRED;
{重绘K线显示大阳大阴涨停跌停假阴,适用于通达信}
DRAWKLINE(H,O,L,C);{重绘K线}
{重绘K线 显示大阳大阴涨停跌停假阴,适用于通达信}
RC1:=REF(C,1);
涨停率10:=10-1/RC1;{178448-WEN98编写}
涨停率5:=5-1/RC1;
比前涨率:=(C-RC1)*100/RC1;
比前跌率:=(RC1-C)*100/RC1;
ST:=NAMELIKE('ST') OR NAMELIKE('*ST');
涨停:= IF(ST, (比前涨率>=涨停率5), (比前涨率>=涨停率10));
本日涨率:=(C-O)*100/O;
本日跌率:=(O-C)*100/O;
STICKLINE((H-RC1)*100/RC1>=涨停率10,H,MAX(C,O),0,0),COLORMAGENTA;{涨停后回落}
STICKLINE((RC1-L)*100/RC1>=涨停率10,L,MIN(C,O),0,0),COLORBLUE;{跌停后回升}
STICKLINE(涨停,O,C,1,0),COLORMAGENTA;{COLOR00AAFF;}
跌停:= IF(NAMELIKE('ST'), (比前跌率>=涨停率5), (比前跌率>=涨停率10));
STICKLINE(跌停,O,C,1,0),COLORBLUE;
大阳线:=C>O AND (比前涨率>=涨停率5 OR 本日涨率>=涨停率5)
AND 比前涨率<涨停率10 AND 涨停=0;
STICKLINE(大阳线,O,C,1,0),COLOR0000BB;
大阴线:=C
AND 比前跌率<涨停率10 AND 跌停=0;
STICKLINE(大阴线,O,C,1,0),COLORLIGREEN;
假阴:=C
STICKLINE(假阴,O,C,0,0),COLORRED;{假阴柱};
如果想要增加跳空的提示,那么改进后的源码如下:
{多彩K线主图公式,显示大阳大阴涨停跌停假阴跳空,适用于通达信}
{可加到你主图的均线系统的后边
{MA120: MA(C,120),COLORGRAY;
MA60: MA(C,60),COLORBLUE;
MA30: MA(C,30),COLORLICYAN;
MA30_: IF(MA30>=REF(MA30,1),MA30,DRAWNULL),COLORLIRED;
MA10: MA(C,10),COLORYELLOW;
MA5: MA(C,5),COLORGREEN;
MA5_: IF(MA5>=REF(MA5,1),MA5,DRAWNULL),COLORMAGENTA;}
{如果只要裸K线,则上面均线部分可以去掉;如果要显示均线,可去掉上段大括号}
{========================================================}
{跳空}
STICKLINE(REF(L,1)>H,H,REF(L,1),5,0),COLORGRAY;
STICKLINE(REF(H,1)
{重绘K线 显示大阳大阴涨停跌停假阴,适用于通达信}
DRAWKLINE(H,O,L,C);{重绘K线}
{重绘K线 显示大阳大阴涨停跌停假阴,适用于通达信}
RC1:=REF(C,1);
本文来源于网友自行发布,不代表本站立场,转载联系作者并注明出处