{通达信C操盘手改进型主图指标}
MA5:MA(CLOSE,5);
MA10:MA(CLOSE,10);
MA20:MA(CLOSE,20);
MA60:MA(CLOSE,60);
MA120:MA(CLOSE,120);
MA250:MA(CLOSE,250);
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLORRED;
STICKLINE(CLOSE>OPEN,HIGH,LOW,0,0),COLORRED;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,3,0),COLORGREEN;
STICKLINE(CLOSE<OPEN,HIGH,LOW,0,0),COLORGREEN;
STICKLINE(CLOSE=OPEN,CLOSE,OPEN,3,0),COLORWHITE;
STICKLINE(CLOSE=OPEN,HIGH,LOW,0,0),COLORWHITE;
VAR1:=EMA(EMA(CLOSE,9),9);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,1,0),COLORWHITE;
A10:=CROSS(控盘,0);
无庄控盘:=IF(控盘<0,控盘,0);
有庄控盘:=IF(控盘>=0,控盘,0);
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);
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORRED;
主力出货:=IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0);
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLOR00FF00;
DRAWTEXT(CROSS(控盘,0),0,'●'),COLORWHITE;
DRAWTEXT(CROSS(控盘,0),控盘,' 控盘'),COLORWHITE;
DRAWTEXT(CROSS(0,控盘),0,'●'),COLORWHITE;
DRAWTEXT(CROSS(0,控盘),控盘,' 无庄'),COLORWHITE;
DRAWTEXT(CROSS(控盘,REF(控盘,1)) AND 控盘>0,控盘,'●'),COLORRED;
DRAWTEXT(CROSS(REF(控盘,1),控盘) AND 控盘>0,控盘,'●'),COLOR00FF00;
DRAWTEXT(CROSS(控盘,REF(控盘,1)) AND 控盘>0 AND REF(控盘,1)<0,控盘,' 启动'),COLORRED;
DRAWTEXT(CROSS(REF(控盘,1),控盘) AND 控盘>0,控盘,' 出货'),COLOR00FF00;
DRAWTEXT(CROSS(VAR2,50) AND COST(85)<CLOSE AND 控盘>0,控盘,' 高度控盘'),COLORFF00FF;
DRAWICON(CROSS(控盘,0),0,1);
DRAWICON(CROSS(0,控盘),0,2);
VAR3:=LLV(LOW,30);
VAR4:=HHV(HIGH,30);
VAR5:=EMA((CLOSE-VAR3)/(VAR4-VAR3)*4,4)*25;
STICKLINE(VAR5>90,100,95,15,1),COLORRED;
DRAWTEXT(VAR5>90,92,'风险'),COLORRED;
STICKLINE((VAR5<10),0,5,15,1),COLORGREEN;
DRAWTEXT((VAR5<10),8,'机会'),COLORGREEN;
