通达信短线追涨未加密选股指标公式源码

源码正文：

GJTJ1:=100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5)){XG51};
GJTJ2:=100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10)){XG51};
GJTJ3:=100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20)){XG51};
GJTJ4:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30)){XG51};
A:=BArslAst(crOSS(97,GJTJ1))<=1 AND BARSLAST(CROSS(GJTJ1,85))<=1{XG51};
B:=BARSLAST(CROSS(97,GJTJ2))<=1 AND BARSLAST(CROSS(GJTJ2,85))<=1{XG51};
A1:=A AND B{XG51};
AA:=BARSLAST(CROSS(97,GJTJ1))<=2 AND BARSLAST(CROSS(GJTJ1,85))<=1{XG51};
BA:=BARSLAST(CROSS(97,GJTJ2))<=2 AND BARSLAST(CROSS(GJTJ2,85))<=1{XG51};
A2:=AA AND BA {XG51};
AAA:=BARSLAST(CROSS(97,GJTJ1))<=3 AND BARSLAST(CROSS(GJTJ1,85))<=1{XG51};
BAA:=BARSLAST(CROSS(97,GJTJ2))<=3 AND BARSLAST(CROSS(GJTJ2,85))<=1{XG51};
A3:=AAA AND BAA {XG51};
B1:=REF(A1,1){XG51};
B2:=REF(A2,1){XG51};
B3:=REF(A3,1){XG51};
D1:=GJTJ1=100 AND GJTJ2=100 AND A1{XG51};
D2:=GJTJ1=100 AND GJTJ2=100 AND A2{XG51};
D3:=GJTJ1=100 AND GJTJ2=100 AND A3{XG51};
ENTERLONG: D1 OR D2 OR D3{X-G-5_1-C-N-{};

源码正文：

S:=C/FInaNCE(34)<5 and FINANCE(33)>0{XG51};
F:=FINANCE(11)/FINANCE(15)>1 and C/FINANCE(33)<30{XG51};
j:=ATAN((ma(CLOSE,13)-REF(MA(CLOSE,13),1)))*180/3.1416{XG51};
b:=v/ref(ma(v,5),1);T:=ref(count(j<1,3)=3,1) and j>3{XG51};
XG:s and f and t and b>2{X_G~5-1_C_N_{};