通达信启动盘整突破三区间主图及选股指标公式源码

通达信启动盘整突破三区间主图及选股指标公式源码

源码正文：

M20:ma(C,20){XG51};
ZT:=C>REF(C,1)*1.095 AND C=H{XG51};
A:=BArslAstCOUNT(ZT){XG51};
T1:=BARSLAST(A>=2){XG51};
TJ1:=H/REF(C,1)>=1.095 AND C<H{XG51};
TJ2:=COUNT(TJ1,T1+1)=1 AND TJ1 {XG51};
T2:=BARSLAST(TJ2){XG51};
ZF:=(HHV(H,T2+1)-LLV(L,T2+1))/LLV(L,T2+1)*100{XG51};
TJ3:=EVERY(C>=MA(C,20) AND V<REF(V,T2),T2) AND BETWEEN(T2,5,20) AND ZF<15{XG51};
TJ4:=ZT AND V>REF(V,1) AND H=HHV(H,T2+1) AND A=1{XG51};
XG:=REF(TJ3,1) AND TJ4 AND T1-T2>0{XG51};
QF:=BacKSET(XG,T2+1){XG51};
QT1:=BARSLAST(crOSS(QF=1,0.5)){XG51};
QF2:=BACKSET(QT1=0,BARSLAST(ZT)+1){XG51};
QT2:=BARSLAST(CROSS(QF2=1,0.5) AND A>1){XG51};
QF3:=BACKSET(QT2=0,BARSLAST(A=1)+1){XG51};
QT3:=BARSLAST(CROSS(QF3=1 AND A=1,0.5)){XG51};
STICKLINE(QF3=1,C,O,2,0),COLORBLUE{XG51};
STICKLINE(QF3=1,H,L,0,0),COLORBLUE{XG51};
DRAWLINE(QT1=0,H,XG,REF(H,QT1),0),COLORLIMAGENTA,DOTLINE{XG51};
DRAWTEXT(QT3=0,H*1.35,'启'),COLORBLUE{XG51};
DRAWTEXT(QT3=0,H*1.2,'动'),COLORBLUE{XG51};
DRAWTEXT(QT3=0,H*1.05,'区'),COLORBLUE{XG51};
DRAWTEXT(QT1=0,H*1.05,'横盘区'),COLORLIMAGENTA{XG51};
STICKLINE(XG,C,O,2,0),COLORRED{XG51};
STICKLINE(XG,H,L,0,0),COLORRED{XG51};
DRAWICON(XG,L*0.95,11){X!G.5-1!C!N!{};