通达信右侧捉妖主图之选股指标公式源码

去ST:=NAMELIKE('ST')=0 AND NAMELIKE('*ST')=0 AND NAMELIKE('SST')=0 AND NAMELIKE('S*ST')=0;
去除停牌:=DYNAINFO(4)>0;
去:=去ST AND 去除停牌 ;
A1J:=Abs(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,10))/EMA(CLOSE,10));
A2J:=EMA(((2.15*CLOSE+LOW+HIGH)/4),A1J);
A3J:=COUNT(REF(C/REF(C,1)>1.03,1),5)=0;
A4J:=EMA(A2J,5);
A5J:=crOSS(C,A4J) AND A3J AND REF(C>2,1) AND REF(C< 26,1) ;
A6J:=CROSS(C,A4J*0.995);
VAR0:=REF(CLOSE,2);
VAR1:=SMA(MAX(CLOSE-VAR0,0),7,1)/SMA(ABS(CLOSE-VAR0),7,1)*100;
VAR2:=C>MA(C,5) AND OPEN< MA(C,5);
VAR3:=C>MA(C,10) AND OPEN< MA(C,10);
VAR4:=OPEN< MA(C,30);
VAR5:=VAR2 AND VAR3 AND VAR4;
VAR6:=CROSS(VAR1,50);
XG:A6J AND VAR5 AND REF(C>3,1) AND REF(C< 15,1) AND 去 AND REF(C,1)/REF(C,2)< 1.02 AND O/REF(C,1)< 1.02 AND C/REF(C,1)>1.035,COLORYELLOW;