（通达信）

M5:MA(CLOSE,5),COLORGREEN;
EM13:EMA(CLOSE,13),COLORGREEN;
EM34:EMA(CLOSE,34),COLORGREEN,LINETHICK2;
M60:=MA(CLOSE,60);
STICKLINE(C<O ,O,C,2,0),COLORLIGREEN;
STICKLINE(C<O ,H,L,0,0),COLORLIGREEN;
STICKLINE(C<O AND C>EM13 ,O,C,2,0),COLORRED;
STICKLINE(C<O AND C>EM13 ,H,L,0,1),COLORRED;
STICKLINE(O<C AND EM13>C ,O,C,2,1),COLORLIGREEN;
STICKLINE(O<C AND EM13>C ,H,L,0,1),COLORLIGREEN;
VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.02)),7);
DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.02)),8);
IF(M5>REF(M5,1),M5,DRAWNULL),COLORRED;
{58公式网-股票公式网站 www.58gu.com}
IF(EM13>REF(EM13,1),EM13,DRAWNULL),COLORRED;
IF(EM34>REF(EM34,1),EM34,DRAWNULL),COLORRED,LINETHICK2;
STICKLINE(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),O,C,0,0),COLORFF00FF;
STICKLINE(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),O,C,0,0),COLORFF0000;