|
WKLINE(H,O,L,C); {重绘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),1,0),COLORYELLOW;{涨停后回落} STICKLINE((RC1-L)*100/RC1>=涨停率10,L,MIN(C,O),1,0),COLORBLUE;{跌停后回升} 跌停:= IF(NAMELIKE('ST'), (比前跌率>=涨停率5), (比前跌率>=涨停率10)); STICKLINE(跌停,O,C,2,0),COLORLIBLUE; 大阳线:= |
|