{通达信跟庄到顶主图指标}
MA5:MA(CLOSE,5);
MA10:MA(CLOSE,10);
MA20:MA(CLOSE,20);
MA60:MA(CLOSE,60);
VAR1:=EMA(EMA(CLOSE,13),13);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,1,0),COLORCYAN;
无庄控盘:IF(控盘<0,控盘,0),COLORCYAN,NODRAW;
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORRED;
有庄控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORRED,NODRAW;
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORGREEN;
主力出货:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLORGREEN,NODRAW;
VAR2:=100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34));
VAR3:=EMA(0.667*REF(VAR2,1)+0.333*VAR2,2);
STICKLINE(VAR2>VAR3,VAR2,VAR3,2,0),COLORRED;
STICKLINE(VAR2<=VAR3,VAR2,VAR3,2,0),COLORGREEN;
底部:0,COLORWHITE;
预警:80,COLORRED;
顶部:100,COLORYELLOW;
DRAWICON(CROSS(VAR2,VAR3) AND VAR3<20,VAR3,1);
DRAWICON(CROSS(VAR3,VAR2) AND VAR3>80,VAR3,2);