通达信了凡抄底选股指标 源码 贴图

QST:=NOT(NAMELIKE('S') OR NAMELIKE('*S'));
QTP:=DYNAINFO(17)>0;
QKC:=IF(CODELIKE('68'),1,0)<1;
QXG:=BARSCOUNT(CLOSE)>120;
TSG:=IF(INBLOCK('退市整理股票'),0,1);
去ST:=QST AND QTP AND QKC AND QXG AND TSG>0;
A1:=REF(C,1);{公式网WWW.GPXIAZAI.COM}
A2:=((SMA((MAX((C-A1),0)),5,1))/(SMA(ABS((C-A1)),5,1)))*100;
A3:=SUM((MAX((MAX((H-L),ABS((H-A1)))),ABS((L-A1)))),13);
A4:=H-(REF(H,1));
A5:=(REF(L,1))-L;
A6:=SUM((IF(((A4>0) AND (A4>A5)),A4,0)),13);
A7:=SUM((IF(((A5>0) AND (A5>A4)),A5,0)),13);
A8:=(A6*100)/A3;
A9:=(A7*100)/A3;
A10:=MA(((ABS((A9-A8))/(A9+A8))*100),5);
A12:=(100*((HHV(H,10))-C))/((HHV(H,10))-(LLV(L,10)));
A13:=A2+A10-A12;
A14:=LLV(A13,1);
A15:=CROSS(A14,0);
DIFF:=(EMA(C,12)-EMA(C,26));
DEA:=EMA(DIFF,9);
MACDD:=2*(DIFF-DEA);
A16:=MACDD<0 AND MACDD>REF(MACDD,1);
A17:=LLV(L,13);
A18:=HHV(H,34);
A19:=EMA((C-A17)/(A18-A17)*100,4);
A20:=A19>REF(A19,1);
A21:=100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5));
A22:=CROSS(A21,10);
A23:=A2-LLV(A2,10);
A24:=(MA(A23,2)*3+A23*13)/15;
A25:=IF(A24>13,MA(A24,2),A24)/5;
A26:=CROSS(A25,1) AND (A25<5);
了凡抄底:A15 AND A20 AND A16 AND A22 AND A26 AND 去ST>0;