过顶回踩

{N=0 1000 30}
{主图}
T1:=FINDLOWBARS(L,0,N,1);
T2:=FINDHIGHBARS(H,T1+1,N,1);
T3:=FINDLOWBARS(L,T2+1,N,1);
T4:=FINDHIGHBARS(H,T3+1,N,1);
T5:=BARSLAST(CURRBARSCOUNT=CONST(T1)+1);
T6:=BARSLAST(CURRBARSCOUNT=CONST(T2)+1);
T7:=BARSLAST(CURRBARSCOUNT=CONST(T3)+1);
T8:=BARSLAST(CURRBARSCOUNT=CONST(T4)+1);
D1:REF(L,T5),COLORGREEN;
G1:REF(H,T6),COLORRED;
D2:=REF(L,T7);
G2:REF(H,T8),COLORRED;
IF(CURRBARSCOUNT=CONST(T1)+1,L,DRAWNULL),CIRCLEDOT,COLORGREEN,LINETHICK3;
IF(CURRBARSCOUNT=CONST(T2)+1,H,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK3;
IF(CURRBARSCOUNT=CONST(T4)+1,H,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK3;
XG:=(COUNT(C>G1,T6)=1 AND C>G1 OR CROSS(C,G1)) AND G1>=G2 AND BETWEEN(D1/G2,0.98,1.05)AND REF(C,T5)/REF(C,T7+1)<1.3;
DRAWICON(XG AND BARSCOUNT(C)>200,L,1);
{选股}
T1:=FINDLOWBARS(L,0,N,1);
T2:=FINDHIGHBARS(H,T1+1,N,1);
T3:=FINDLOWBARS(L,T2+1,N,1);
T4:=FINDHIGHBARS(H,T3+1,N,1);
T5:=BARSLAST(CURRBARSCOUNT=CONST(T1)+1);
T6:=BARSLAST(CURRBARSCOUNT=CONST(T2)+1);
T7:=BARSLAST(CURRBARSCOUNT=CONST(T3)+1);
T8:=BARSLAST(CURRBARSCOUNT=CONST(T4)+1);
D1:=REF(L,T5);
G1:=REF(H,T6);
D2:=REF(L,T7);
G2:=REF(H,T8);
XG:=(COUNT(C>G1,T6)=1 AND C>G1 OR CROSS(C,G1)) AND G1>=G2
AND BETWEEN(D1/G2,0.98,1.05) AND REF(C,T5)/REF(C,T7+1)<1.3;
COUNT(XG AND BARSCOUNT(C)>200,5);