主力控盘B副图－精品通达信指标公式源码分享

VAR2:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);   

VAR3:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);   

VAR4:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);   

VAR5:=(((VAR2 + (2 * VAR3)) + (3 * VAR4)) / 6);   

VAR6:=MA(VAR5,3);   

开始控盘:STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),0.4,0),COLOR00AAFF;   

STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),0.3,0),COLOR0044FF;   

STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),0.4,0),COLOR0088FF;   

STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),0.1,0),COLOR00AAFF;   

STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),3,0),COLOR00AAFF;   

DRAWTEXT(VAR6<=(0 - 10), -22,'买'),COLORGREEN,LINETHICK2;   

VAR1:=EMA(EMA(CLOSE,3),1);   

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

STICKLINE(控盘<0,控盘,0,3.5,0),COLORFFAA00;   

STICKLINE(控盘<0,控盘,0,3.5.2,0),COLORFF4400;   

STICKLINE(控盘<0,控盘,0,2.5,0),COLORFF8800;   

STICKLINE(控盘<0,控盘,0,0,0),COLORFFAA00;   

主力出货:0,COLORFFAA00;   

STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR000088;   

STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR0000AA;   

STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR0000CC;   

STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,1,0),COLOR0000EE;   

主力吸货:0,COLOR0000FF;   

STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR008800;   

STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR00AA00;   

STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR00CC00;   

STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1,0),COLOR00EE00;   

STICKLINE(DDX<0,0,DDX,3.5,0),COLOR008800;   

STICKLINE(DDX<0,0,DDX,2.5,0),COLOR00AA00;   

STICKLINE(DDX<0,0,DDX,1.5,0),COLOR00CC00;   

STICKLINE(DDX<0,0,DDX,1,0),COLOR00EE00;   

对倒出货洗盘:0,COLOR00FF00;   

DRAWTEXT(CROSS(控盘,0),控盘,'追买'),COLORYELLOW;