主力有庄日周月多周期通达信公式 副图 源码附图

VAR1:=EMA(EMA(CLOSE,9),9);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
A10:=CROSS(控盘,0);
无庄控盘:=IF(控盘<0,控盘,0),COLORWHITE,NODRAW;
开始控盘:=IF(A10,5,0),LINETHICK1,COLORYELLOW;
有庄控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORRED,NODRAW;
VAR2:=100*WINNER(CLOSE*0.95);
高度控盘:=IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW;
主力出货:=IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLOR00FF00,NODRAW;
CF:有庄控盘+高度控盘+主力出货+无庄控盘;
FCD:MA(CF,20);
FCL:MA(FCD,5);
OJX:0;
JC:=CROSS(FCL,FCD);
DRAWLINE(JC,FCL,REF(JC,1),REF(FCL,1),1),COLORLICYAN;