通达信上升通道主图及选股指标公式源码

通达信上升通道主图及选股指标公式源码

源码正文：

T1:=FINDLOWBARS(L,0,60,1){XG51};
T2:=FINDLOWBARS(L,T1,120,1){XG51};
DRAWLINE(CURRBARSCOUNT=CONst(T2)+1,L,CURRBARSCOUNT=CONST(T1)+1,L,1),COLORCYAN,DOTLINE{XG51};
T3:=BArslAST(CURRBARSCOUNT=CONST(T1)+1){XG51};
T4:=BARSLAST(CURRBARSCOUNT=CONST(T2)+1){XG51};
D1:=REF(L,T3){XG51};
D2:=REF(L,T4){XG51};
T5:=FINDHIGHBARS(H,20,60,1){XG51};
T6:=FINDHIGHBARS(H,T1,120,1){XG51};
SG:DRAWLINE(CURRBARSCOUNT=CONST(T6)+1,H,CURRBARSCOUNT=CONST(T5)+1,H,1),COLORWHITE,DOTLINE{XG51};
T7:=BARSLAST(CURRBARSCOUNT=CONST(T5)+1){XG51};
T8:=BARSLAST(CURRBARSCOUNT=CONST(T6)+1){XG51};
G1:REF(H,T7),COLORWHITE{XG51};
G2:REF(H,T8),COLORWHITE{XG51};
IF(CURRBARSCOUNT=CONST(T1)+1,L,DRAWNULL),CIRCLEDOT,COLORCYAN,LINETHICK3{XG51};
IF(CURRBARSCOUNT=CONST(T2)+1,L,DRAWNULL),CIRCLEDOT,COLORCYAN,LINETHICK3{XG51};
IF(CURRBARSCOUNT=CONST(T5)+1,H,DRAWNULL),CIRCLEDOT,COLORWHITE,LINETHICK3{XG51};
IF(CURRBARSCOUNT=CONST(T6)+1,H,DRAWNULL),CIRCLEDOT,COLORWHITE,LINETHICK3{XG51};
XG:=((COUNT(C>G1,T7)=1 AND C>G1 OR crOSS(C,G1)) OR (COUNT(C>SG,T7)=1 AND C>SG OR CROSS(C,SG))) AND D1>D2 AND G1>G2 AND REF(C,T7)/REF(C,T4+1)<1.4{XG51};
DRAWICON(XG AND BARSCOUNT(C)>200,L,1){X!G_5?1!C!N!{};