通达信【庄家控盘极品】庄家主力控盘指标 源码 附图

DRAWTEXT_FIX(1,0,0,0,HYBLOCK),COLORYELLOW;

DRAWTEXT_FIX(1,0,0.08,0,GNBLOCK),COLORMAGENTA;

DRAWTEXT_FIX(1,0,0.16,0,FGBLOCK),COLORFF8000;

DRAWTEXT_FIX(1,0,0.24,0,DYBLOCK),COLOR009D9D;



VAR1:=EMA(EMA(CLOSE,9),9);

控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;

STICKLINE(控盘<0,控盘,0,4,0),COLORWHITE;

A10:=CROSS(控盘,0);

无庄控盘:IF(控盘<0,控盘,0),COLORWHITE,NODRAW;



STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,4,1),COLORRED;

有庄控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORRED,NODRAW;





STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,4,0),COLOR00FF00;

主力出货:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLOR00FF00,NODRAW;



VAR2:=100*WINNER(CLOSE*0.95);

STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,4,0),COLORFF00FF;

高度控盘:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW;



开始控盘:IF(A10,5,0),LINETHICK1,COLORYELLOW;

原理解析：
当满足条件1时,在横轴0纵轴0位置书写文字
当满足条件1时,在横轴0纵轴0.08位置书写文字
当满足条件1时,在横轴0纵轴0.16位置书写文字
当满足条件1时,在横轴0纵轴0.24位置书写文字

VAR1赋值:收盘价的9日指数移动平均,9)
控盘赋值:(VAR1-1日前的VAR1)/1日前的VAR1*1000
当满足条件控盘<0时,在控盘和0之间画柱状线
A10赋值:控盘上穿0
如果控盘<0返回控盘否则返回0

STICKLINE(控盘>1日前的控盘 AND 控盘>0,控盘,0,4,1),画红色
有庄输出控盘:IF(控盘>1日前的控盘 AND 控盘>0,控盘,0),画红色,NODRAW

STICKLINE(控盘<1日前的控盘 AND 控盘>0,控盘,0,4,0),COLOR00FF00
输出主力出货:IF(控盘<1日前的控盘 AND 控盘>0,控盘,0),COLOR00FF00,NODRAW

VAR2赋值:100*收盘价*0.95计算的获利盘比例
STICKLINE(VAR2>50 AND 获利盘为85%的成本分布<收盘价 AND 控盘>0,控盘,0,4,0),COLORFF00FF
高度输出控盘:IF(VAR2>50 AND 获利盘为85%的成本分布<收盘价 AND 控盘>0,控盘,0),COLORFF00FF,NODRAW
如果A10返回5否则返回0