通达信转折换手主图选股指标公式源码

通达信转折换手主图选股指标公式源码

源码正文：

N:=(1,1000,1){XG51};
T:=10*N{XG51};
A:=H=HHV(H,T) AND HHV(H,T)>REF(HHV(H,T),1){XG51};
B:=L=LLV(L,T) AND LLV(L,T)<REF(LLV(L,T),1){XG51};
C1:=DRAWLINE(A,H,B,L,0){XG51};
C2:=DRAWLINE(B,L,A,H,0){XG51};
GD:=C2=C1 AND A{XG51};
DD:=C2=C1 AND B{XG51};
GDT:=BArslAst(GD){XG51};
DDT:=BARSLAST(DD){XG51};
D1:=HHV(H,T)>REF(HHV(H,T),1) AND ISLASTBAR AND C2!=C1{XG51};
D2:=LLV(L,T)<REF(LLV(L,T),1) AND ISLASTBAR AND C2!=C1{XG51};
D3:=IF(DD OR D2,GDT,IF(GD OR D1,DDT,DRAWNULL)){XG51};
GHS:=VARCAT(VAR2STR(SUM("HSL.HSL",GDT),2),'%('){XG51};
DHS:=VARCAT(VAR2STR(SUM("HSL.HSL",DDT),2),'%('){XG51};
ZHG:=VARCAT(VARCAT(DHS,VAR2STR(DDT,0)),'天)'){XG51};
ZHD:=VARCAT(VARCAT(GHS,VAR2STR(GDT,0)),'天)'){XG51};
DRAWBAND(C1,RGB(250,0,250),C1,RGB(0,0,0)){XG51};
DRAWBAND(C2,RGB(250,0,250),C2,RGB(0,0,0)){XG51};
DRAWTEXT(D3>0 AND HHV(H,T)>REF(HHV(H,T),1),(H+L)/2,ZHG),COLORBLUE,DRAWAbovE{XG51};
DRAWTEXT(D3>0 AND LLV(L,T)<REF(LLV(L,T),1),(H+L)/2,ZHD),COLORBLUE,DRAWABOVE{XG51};
ST:=IF(NAMELIKE('ST'),1,0) OR IF(NAMELIKE('*ST'),1,0) {XG51};
STZT:=C/REF(C,1)>=1.049 AND C=H{XG51};
STDT:=REF(C,1)/C>=1.049 AND C=L{XG51};
ZT:=C/REF(C,1)>=1.095 AND C=H{XG51};
DT:=REF(C,1)/C>=1.095 AND C=L{XG51};
ZTW:=BARSLAST(ZT<1){XG51};
DTW:=BARSLAST(DT<1){XG51};
STZTW:=BARSLAST(STZT<1){XG51};
STDTW:=BARSLAST(STDT<1){XG51};
DRAWTEXT(ZTW AND C>0,H,VAR2STR(ZTW,0)),COLORBROWN,DRAWABOVE{XG51};
DRAWTEXT(DTW AND C>0,L*0.96,VAR2STR(DTW,0)),COLORBROWN{XG51};
DRAWTEXT(STZTW AND C>0,H,VAR2STR(STZTW,0)),COLORBROWN,DRAWABOVE{XG51};
DRAWTEXT(STDTW AND C>0,L*0.96,VAR2STR(STDTW,0)),COLORBROWN{X!G_5_1!C!N!{};