{见顶清仓}
VAR1:=EMA(EMA(CLOSE,13),13);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,1,0),COLOR00FF00;
无庄控盘:IF(控盘<0,控盘,0),COLOR00FF00,NODRAW;
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLOR0000FF;
有庄控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLOR0000FF,NODRAW;
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORFFFF00;
主力出货:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLORFFFF00,NODRAW;
VAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLORFF00FF;
高度控盘:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW;
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORFFFF00;
洗盘:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLORFFFF00,NODRAW;
A10:=CROSS(控盘,0);
无庄控盘A:IF(A10,0,0),COLOR00FF00,NODRAW;
DRAWTEXT(ISLASTBAR,0,'无庄控盘'),COLOR00FF00;
A11:=CROSS(控盘,0);
有庄控盘A:IF(A11,0,0),COLOR0000FF,NODRAW;
DRAWTEXT(ISLASTBAR AND 控盘>0,0,'有庄控盘'),COLOR0000FF;
A12:=控盘>REF(控盘,1) AND 控盘>0;
主力控盘A:IF(A12,0,0),COLORFF00FF,NODRAW;
DRAWTEXT(ISLASTBAR AND A12,0,'主力控盘'),COLORFF00FF;
A13:=控盘<REF(控盘,1) AND 控盘>0;
主力出货A:IF(A13,0,0),COLORFFFF00,NODRAW;
DRAWTEXT(ISLASTBAR AND A13,0,'主力出货'),COLORFFFF00;
