通达信主力动向副图公式

主力动向，粉红为高度控盘
AA1:=XMA(XMA(XMA(EMA(CLOSE,1),2),2),2);
AA:=XMA((AA1-REF(AA1,1))/REF(AA1,1),11)*1000,COLOR0000FF,NODRAW;
BB:=EMA(AA,44);
CC:=EMA(AA-BB,1),NODRAW;

AA2:=XMA(XMA(XMA(EMA(WINNER(C)*100,1),2),2),2),NODRAW;
STICKLINE(AA2>30 AND COST(50)0,CC,0,4,0),COLOR000099;
STICKLINE(AA2>30 AND COST(50)0,CC,0,3,0),COLOR0000CC;
STICKLINE(AA2>30 AND COST(50)0,CC,0,2,0),COLOR0000FF;
STICKLINE(AA2>30 AND COST(50)0,CC,0,0.5,0),COLORCC66FF;
STICKLINE(AA2>30 AND COST(50)>C AND CC>0,CC,0,4,0),COLOR990099;
STICKLINE(AA2>30 AND COST(50)>C AND CC>0,CC,0,3,0),COLORBB00BB;
STICKLINE(AA2>30 AND COST(50)>C AND CC>0,CC,0,2,0),COLORDD00DD;
STICKLINE(AA2>30 AND COST(50)>C AND CC>0,CC,0,0.5,0),COLORFF00FF;
STICKLINE(AA2<30 AND COST(50)>C AND CC>0,CC,0,4,0),COLOR000099;
STICKLINE(AA2<30 AND COST(50)>C AND CC>0,CC,0,3,0),COLOR0000CC;
STICKLINE(AA2<30 AND COST(50)>C AND CC>0,CC,0,2,0),COLOR0000BB;
STICKLINE(AA2<30 AND COST(50)>C AND CC>0,CC,0,1,0),COLOR0000FF;
STICKLINE(AA2>30 AND COST(50) STICKLINE(AA2<30 AND COST(50)>C AND CC<0,CC,0,3,0),COLOR009900;

VAR11:=EMA(EMA(CLOSE,13),13);
控盘:=(VAR11-REF(VAR11,1))/REF(VAR11,1)*1000;
STICKLINE(控盘<0,控盘,0,1,1),NODRAW;
STICKLINE(控盘>REF(控盘,1) AND 控盘<0,控盘,0,1,1),NODRAW;
无庄控盘:=控盘<0;
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,1),NODRAW;
有庄控盘:=控盘>REF(控盘,1) AND 控盘>0;
VAR12:=100*WINNER(CLOSE*0.95);
STICKLINE(控盘0,控盘,0,1,1),NODRAW;
主力出货:=控盘0;
STICKLINE(VAR12>50 AND COST(85)0,控盘,0,1,1),NODRAW;
高度控盘: VAR12>50 AND COST(85)0;
A10:=CROSS(控盘,0);
控盘B:=FILTER(IF(A10,1,0),5);
{分时价格原码}
JJ:=DYNAINFO(11);
{波段买卖原码}
P:=55;S:=8;M1:=3;
财:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10,NODRAW;
神:=EMA(财,M1),NODRAW;
DRAWBAND(财,RGB(255,0,0),神,RGB(0,100,50));
{股价与均线偏离买卖条件}
BTJ1:=(C-JJ)/JJ<-0.03;
BTJ11:=(C-JJ)/JJ<-0.03;
BTJ12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ<0.005;
STJ1:=(C-JJ)/JJ>0.005;
{控盘买卖条件}
STJ01:=控盘0.5;
STJ02:=控盘>0;
BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2;
BTJ22:=控盘>REF(控盘,1) AND 控盘<0 ;
{波段买卖条件}
BTJ3:=CROSS(财,神) AND 财<-0.3;
BTJ32:=CROSS(财,神) AND 财<-0.1;
STJ31:=CROSS(神,财);
STJ32:=CROSS(神,财) AND 财>1.618;
{以下为信号};
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13);
BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);
BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13);
DRAWTEXT(BTJ81,神,'↑买底'),NODRAW;
DRAWTEXT(BTJ811,神*1.2,'↑有庄'),NODRAW;
STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13);
STJ82:=FILTER(STJ02 AND STJ32 ,13);
STJ83:=STJ81 AND STJ82;
DRAWTEXT(STJ83,神,'↓卖'),NODRAW;
DIFF: (EMA(CLOSE,8) - EMA(CLOSE,55))*10,NODRAW;
DEA: EMA(DIFF,3),NODRAW;
庄:= BTJ11 AND BTJ2 AND BTJ3;
有庄:FILTER(庄,55),