{极品分时短线之王主图公式}
N:=5;
M:=13;
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;
AA:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,N))/MA(CLOSE,N);
控盘力度:=DMA(CLOSE,AA);
CC:=(控盘力度/REF(控盘力度,1)-1)*1000;
STICKLINE(CC<0,CC,0,1,0),COLORFF00FF;
洗盘:IF(CC<0,CC,0),COLORFF00FF,NODRAW;
STICKLINE(CC>REF(CC,1) AND CC>0,CC,0,1,0),COLOR00FFFF;
加仓:IF(CC>REF(CC,1) AND CC>0,CC,0),COLOR00FFFF,NODRAW;
STICKLINE(CC<REF(CC,1) AND CC>0,CC,0,1,0),COLORFFFFFF;
减仓:IF(CC<REF(CC,1) AND CC>0,CC,0),COLORFFFFFF,NODRAW;
VAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLOR0000FF;
高度控盘:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLOR0000FF,NODRAW;
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘<0,控盘,0,1,0),COLOR00FF00;
主力吸筹:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘<0,控盘,0),COLOR00FF00,NODRAW;
MA1:MA(CLOSE,M);
MA2:MA(CLOSE,60);
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
