上轨:EMA(H,25),COLORGREEN,LINETHICK2;
下轨:EMA(L,25),COLORGREEN,LINETHICK2;
NA1:=PLOYLINE(C>上轨,上轨);
IF(C>上轨,NA1,DRAWNULL),COLORRED,LINETHICK2;
NB1:=PLOYLINE(C>下轨,下轨);
IF(C>下轨,NB1,DRAWNULL),COLORRED,LINETHICK2;
{变色K线}
QS:=(C+上轨+下轨)/3;
STICKLINE(C>REF(QS,1) AND O>=C,C,O,-1,0),COLORRED;
STICKLINE(C>REF(QS,1) AND O>=C,L,H,0,0),COLORRED;
STICKLINE(C<=REF(QS,1) AND O<=C,O,C,-1,1),COLORCYAN;
STICKLINE(C<=REF(QS,1) AND O<=C,O,L,0,1),COLORCYAN;
STICKLINE(C==REF(QS,1) AND O<=C,C,H,0,1),COLORCYAN;
{涨停K线}
ZT_1:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1);
ZT_2:=ZT_1>=0.099 AND CLOSE=HIGH AND LOW!=HIGH;
STICKLINE(ZT_2,OPEN,CLOSE,2,0),COLORYELLOW;
{KDJ测顶底}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
{文字或图标任换一种：}
{DRAWTEXT(CROSS(100,J),H*1.02,'顶'),COLORGREEN;
DRAWTEXT(CROSS(J,0),L*0.97,'底'),COLORRED;}
{2.∧∨图标}
{DRAWICON(CROSS(J,0),L*0.98,34);
DRAWICON(CROSS(100,J),H*1.02,35);}
{3.笑哭图标}
DRAWICON(CROSS(J,0),L*0.98,5);
DRAWICON(CROSS(100,J),H*1.02,6);
{九转}
A1:=C>REF(C,4);
A2:=C T1:=A2 AND REF(A1,1); T2:=A2 AND REF(T1,1); T3:=A2 AND REF(T2,1); T4:=A2 AND REF(T3,1); T5:=A2 AND REF(T4,1); T6:=A2 AND REF(T5,1); T7:=A2 AND REF(T6,1); T8:=A2 AND REF(T7,1); T9:=A2 AND REF(T8,1); DRAWTEXT(T6,L*0.99,'6'),COLORGREEN; DRAWTEXT(T7,L*0.99,'7'),COLORGREEN; DRAWTEXT(T8,L*0.99,'8'),COLORGREEN; DRAWTEXT(T9,L*0.99,'9'),COLORGREEN; B1:=C B2:=C>REF(C,4); D1:=B2 AND REF(B1,1); D2:=B2 AND REF(D1,1); D3:=B2 AND REF(D2,1); D4:=B2 AND REF(D3,1); D5:=B2 AND REF(D4,1); D6:=B2 AND REF(D5,1); D7:=B2 AND REF(D6,1); D8:=B2 AND REF(D7,1); D9:=B2 AND REF(D8,1); DRAWTEXT(D6,H*1.01,'6'),COLORYELLOW; DRAWTEXT(D7,H*1.01,'7'),COLORYELLOW; DRAWTEXT(D8,H*1.01,'8'),COLORYELLOW; DRAWTEXT(D9,H*1.01,'9'),COLORYELLOW;
