通达信【有庄启动】主图选股源码,抓主力入场启动

1.有庄启动指标通过趋势和加权平均等方式在主力介入时提示信号，短线使用。

2.无未来函数，信号不漂移。

前天22个信号，昨天全部大涨。

{有庄启动–主图}

生命线:MA(C,8),COLOR00FFFF,LINETHICK2;

多方线:MA(C,50),COLOR0000FF,LINETHICK2;

XXSP1:=(3*C+L+O+H)/6;

XXSP2:=(20*XXSP1+19*REF(XXSP1,1)+18*REF(XXSP1,2)+17*REF(XXSP1,3)+16*REF(XXSP1,4)+15*REF(XXSP1,5)+14*REF(XXSP1,6)+13*REF(XXSP1,7)+12*REF(XXSP1,8)+11*REF(XXSP1,9)+10*REF(XXSP1,10)+9*REF(XXSP1,11)+8*REF(XXSP1,12)+7*REF(XXSP1,13)+6*REF(XXSP1,14)+5*REF(XXSP1,15)+4*REF(XXSP1,16)+3*REF(XXSP1,17)+2*REF(XXSP1,18)+REF(XXSP1,20))/210;

XXSP3:=C-REF(C,1);

XXSP4:=EMA(EMA(CLOSE,13),13);

控盘度:(XXSP4-REF(XXSP4,1))/REF(XXSP4,1)*1000,NODRAW;

无庄:控盘度<0,NODRAW;

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

XXSP5:=DYNAINFO(11);

XXSP6:=(EMA(C,8)-EMA(C,21))*50;

XXSP7:=EMA(XXSP6,3);

XXSP8:=(C-XXSP5)/XXSP5<-0.03;

XXSP9:=(C-XXSP5)/XXSP5<-0.03;

XXSP10:=LAST(XXSP5>=REF(XXSP5,1),5,1) AND (C-XXSP5)/XXSP5<0.005;

XXSP11:=(C-XXSP5)/XXSP5>0.005;

XXSP12:=控盘度<REF(控盘度,1) AND 控盘度>0.5;

XXSP13:=控盘度>0;

XXSP14:=控盘度>REF(控盘度,1) AND 控盘度<-0.2;

XXSP15:=控盘度>REF(控盘度,1) AND 控盘度<0;

XXSP16:=CROSS(XXSP6,XXSP7) AND XXSP6<-0.3;

XXSP17:=CROSS(XXSP6,XXSP7) AND XXSP6<-0.1;

XXSP18:=CROSS(XXSP7,XXSP6);

XXSP19:=CROSS(XXSP7,XXSP6) AND XXSP6>1.618;

XXSP20:=FILTER(XXSP8 AND XXSP14 AND XXSP16,13);

XXSP21:=FILTER(XXSP9 AND XXSP14 AND XXSP16,13);

XXSP22:=FILTER(XXSP10 AND XXSP15 AND XXSP17,13);

XXSP23:=FILTER(XXSP11 AND XXSP12 AND XXSP18,13);

XXSP24:=FILTER(XXSP13 AND XXSP19,13);

XXSP25:=XXSP23 AND XXSP24;

XXSP26:= XXSP9 AND XXSP14 AND XXSP16;

XXSP27:=FILTER(XXSP26,30);

DRAWTEXT(XXSP27,L-0.0011,’ ↖有庄’),COLOR00FFFF;

DRAWICON(XXSP27,L*0.999,29);

STICKLINE(C/REF(C,1)>=1.096 AND H=C,O,C,2,0),COLOR0000FF;

{有庄启动–选股}

XG1:=(3*C+L+O+H)/6;

XG2:=(20*XG1+19*REF(XG1,1)+18*REF(XG1,2)+17*REF(XG1,3)+16*REF(XG1,4)+15*REF(XG1,5)+14*REF(XG1,6)+13*REF(XG1,7)+12*REF(XG1,8)+11*REF(XG1,9)+10*REF(XG1,10)+9*REF(XG1,11)+8*REF(XG1,12)+7*REF(XG1,13)+6*REF(XG1,14)+5*REF(XG1,15)+4*REF(XG1,16)+3*REF(XG1,17)+2*REF(XG1,18)+REF(XG1,20))/210;

XG3:=C-REF(C,1);

XG4:=EMA(EMA(CLOSE,13),13);

XG5:=(XG4-REF(XG4,1))/REF(XG4,1)*1000;

XG6:=DYNAINFO(11);

XG7:=(EMA(C,8)-EMA(C,21))*50;

XG8:=EMA(XG7,3);

XG9:=(C-XG6)/XG6<-0.03;

XG10:=(C-XG6)/XG6<-0.03;

XG11:=XG5>REF(XG5,1) AND XG5<-0.2;

XG12:=XG5>REF(XG5,1) AND XG5<0;

XG13:=CROSS(XG7,XG8) AND XG7<-0.3;

XG14:= XG10 AND XG11 AND XG13;

有庄启动X:FILTER(XG14,30);