通达信〖有庄妖股共振〗通过EMA计算控盘力度判断有庄无庄选股源码

M:=20;
TM9:=1290823;
VAW1:=EMA(EMA(CLOSE,13),13);
控盘:=(VAW1-REF(VAW1,1))/REF(VAW1,1)*1000;
无庄控盘:=控盘< 0;
有庄控盘:=控盘>REF(控盘,1) AND 控盘>0;
JJ:=DYNAINFO(11);
P:=21;
S:=8;
M1:=3;
财:=(EMA(CLOSE,S)-EMA(CLOSE,P))*50;
神:=EMA(财,M1);
BTJ11:=(C-JJ)/JJ< -0.03;
BTJ2:=控盘>REF(控盘,1) AND 控盘< -0.2;
BTJ3:=crOSS(财,神) AND 财< -0.3;
庄:= BTJ11 AND BTJ2 AND BTJ3;
有庄:=FILTER(庄,30);
MA54:=MA(CLOSE,54);
MA10:=MA(CLOSE,10);
HJ_8:=(REF(CLOSE,3)-CLOSE)/REF(CLOSE,3)*100>5;
HJ_9:=FILTER(HJ_8,10);
HJ_10:=BARSLAST(HJ_9);
HJ_11:=REF(HIGH,HJ_10+2);
HJ_12:=REF(HIGH,HJ_10+1);
HJ_13:=REF(HIGH,HJ_10);
HJ_14:=MAX(HJ_11,HJ_12);
HJ_15:=MAX(HJ_14,HJ_13);
HJ_16:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>5;
HJ_17:=HJ_10< 150;
HJ_18:=(OPEN-HJ_15)/HJ_15*100< 30;
HJ_19:=(CLOSE-LLV(LOW,HJ_10))/LLV(LOW,HJ_10)*100< 50;
HJ_20:=(CLOSE-REF(OPEN,5))/REF(OPEN,5)*100< 30;
HJ_21:=vol/MA(VOL,5)< 3.5;
HJ_22:=(CLOSE-REF(CLOSE,89))/REF(CLOSE,89)*100< 80;
HJ_25:=HJ_16 AND HJ_17 AND HJ_18 AND HJ_19 AND HJ_20 AND HJ_21 AND HJ_22;
暴利:=FILTER(HJ_25,15);
PL1:=(((CLOSE-MA54)/MA54)< 0.1);
PL2:=(((CLOSE-MA10)/MA10)< 0.3);
偏离率:=(((PL1=1) AND (PL2=1))*0.2);
平台突破:=((((偏离率=0) AND (REF(偏离率,1)=0.2)) AND (REF((COUNT((偏离率=0.2),10)=10),1)=1))*-0.1);
妖股突破:=平台突破=-0.1;
XDF:=(暴利 OR 妖股突破);
VARA:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
VARAA:=DYNAINFO(7)/(REF(CLOSE,1))>1.05 AND (DYNAINFO(7)/O>1.05);
FLIGA:=(VOL/REF(VOL,1)>1.2 AND COUNT(CLOSE>OPEN,1)) OR (LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>1.2);
妖股:=XDF AND C/REF(C,1)>1.095 AND FLIGA AND VARAA;
XG:有庄 AND 妖股;