通达信TD结构压力与支撑线主图选股指标公式源码

通达信TD结构压力与支撑线主图选股指标公式源码

源码正文：

TJ:=H<REF(H,4) AND REF(H,1)<REF(H,4) AND REF(H,2)<REF(H,4) AND REF(H,3)<REF(H,4) AND REF(H,4)>REF(H,5) AND REF(H,4)>REF(H,6) AND REF(H,4)>REF(H,7) AND REF(H,4)>REF(H,8) AND REF(H,4)>REF(H,9){XG51};
TJ1:=L>REF(L,4) AND REF(L,1)>REF(L,4) AND REF(L,2)>REF(L,4) AND REF(L,3)>REF(L,4) AND REF(L,4)<REF(L,5) AND REF(L,4)<REF(L,6) AND REF(L,4)<REF(L,7) AND REF(L,4)<REF(L,8) AND REF(L,4)<REF(L,9){XG51};
T:=BArslAst(TJ){XG51};
LT:=BARSLAST(TJ1){XG51};
CF1:=BacKSET(T=0,5){XG51};
HT:=BARSLAST(crOSS(CF1=1,0.5)){XG51};
CF2:=BACKSET(LT=0,5){XG51};
TT1:=BARSLAST(CROSS(CF2=1,0.5)){XG51};
TT:=BARSLAST(CURRBARSCOUNT=CONST(SUMBARS(TT1=0,1))){XG51};
TTH:=BARSLAST(CURRBARSCOUNT=CONST(SUMBARS(HT=0,1))){XG51};
TTH2:=BARSLAST(CURRBARSCOUNT=CONST(SUMBARS(HT=0,2))){XG51};
CL:=CONST(REF(L,TT)){XG51};
CH:=CONST(REF(H,TTH)){XG51};
CH2:CONST(REF(H,TTH2))NODRAW{XG51};
CHT:=BARSLAST(CROSS(REF(H,HT)>CH,0.5)){XG51};
CHT2:=BARSLAST(CROSS(REF(H,HT)>CH2,0.5)){XG51};
AA2:=FINDHIGHBARS(REF(H,HT),TTH2+1,REF(CHT2,TTH2)+1,1){XG51};
CLT:=BARSLAST(CROSS(REF(L,TT1)<CL,0.5)){XG51};
DRAWLINE(CURRBARSCOUNT=CONST(CHT)+1,H,CURRBARSCOUNT=CONST(SUMBARS(HT=0,1)),H,1),COLORBLUE,LINETHICK2{XG51};
DRAWLINE(CURRBARSCOUNT=CONST(AA2)+1,H,CURRBARSCOUNT=CONST(SUMBARS(HT=0,2)),H,1),COLORLImaGENTA,LINETHICK2{XG51};
DRAWLINE(CURRBARSCOUNT=CONST(CLT)+1,L,CURRBARSCOUNT=CONST(SUMBARS(TT1=0,1)),L,1),COLORCYAN,LINETHICK2{XG51};
DRAWLINE(CURRBARSCOUNT=CONST(SUMBARS(HT=0,2)),H,CURRBARSCOUNT=CONST(SUMBARS(HT=0,1)),H,1),COLORBLUE{XG51};
DRAWLINE(CURRBARSCOUNT=CONST(SUMBARS(HT=0,3)),H,CURRBARSCOUNT=CONST(SUMBARS(HT=0,2)),H,1),COLORBLUE{XG51};
DRAWLINE(CURRBARSCOUNT=CONST(SUMBARS(HT=0,4)),H,CURRBARSCOUNT=CONST(SUMBARS(HT=0,3)),H,1),COLORBLUE{XG51};
DRAWLINE(CURRBARSCOUNT=CONST(SUMBARS(HT=0,5)),H,CURRBARSCOUNT=CONST(SUMBARS(HT=0,4)),H,1),COLORBLUE{XG51};
DRAWLINE(CURRBARSCOUNT=CONST(SUMBARS(TT1=0,2)),L,CURRBARSCOUNT=CONST(SUMBARS(TT1=0,1)),L,1),COLORCYAN{XG51};
DRAWLINE(CURRBARSCOUNT=CONST(SUMBARS(TT1=0,3)),L,CURRBARSCOUNT=CONST(SUMBARS(TT1=0,2)),L,1),COLORCYAN{XG51};
DRAWLINE(CURRBARSCOUNT=CONST(SUMBARS(TT1=0,4)),L,CURRBARSCOUNT=CONST(SUMBARS(TT1=0,3)),L,1),COLORCYAN{XG51};
DRAWLINE(CURRBARSCOUNT=CONST(SUMBARS(TT1=0,5)),L,CURRBARSCOUNT=CONST(SUMBARS(TT1=0,4)),L,1),COLORCYAN{XG51};
STICKLINE(HT=0 ,C,O,2,0),COLORBLUE{XG51};
STICKLINE(TT1=0 ,C,O,2,0),COLORCYAN{X!G-5^1!C!N!{};