通达信阳不悔选股指标公式源码副图

A1:=IF(NAMELIKE('ST') OR NAMELIKE('*ST'),0,1) AND IF(CODELIKE('688'),0,1);
A2:=(EXPMEMA(IF((H-REF(H,1))>0 AND (H-REF(H,1))>(REF(L,1)-L),(H-REF(H,1)),0),14))*100/EXPMEMA(MAX(MAX(H-L,Abs(H-REF(C,1))),ABS(REF(C,1)-L)),14);
A3:=(EXPMEMA(IF((REF(L,1)-L)>0 AND (REF(L,1)-L)>(H-REF(H,1)),(REF(L,1)-L),0),14))*100/EXPMEMA(MAX(MAX(H-L,ABS(H-REF(C,1))),ABS(REF(C,1)-L)),14);
A4:=EXPMEMA(ABS(A3-A2)/(A3+A2)*100,6);
A5:=EXPMEMA(A4,6);
A6:=MIN(MIN(A3,A4),MIN(A4,A5));
A7:=EXIST(REF(A2<A6,1) AND A2>(MAX(MAX(A3,A4),MAX(A4,A5))) AND vol>HHV(VOL,25)*0.5 AND H/C<1.005 AND C>REF(C,25) AND H<=HHV(H,35) AND L>LLV(L,35),3);
A8:=C>MA(C,5) AND C>MA(C,10) AND C>MA(C,50) AND REF(C,1)<MA(C,5) AND REF(C,1)<MA(C,10) AND REF(C,1)<MA(C,50)AND O/REF(C,1)<1.02;
A9:=(MAX(MAX(MA(C,5),MA(C,10)),MA(C,50)))/(MIN(MIN(MA(C,5),MA(C,10)),MA(C,50)))<=1.05;
阳不悔:A1 AND A7 AND A8 AND A9;