通达信锅底突破回踩主图选股指标公式源码

通达信锅底突破回踩主图选股指标公式源码

源码正文：

N:=5{XG51};
ma5:MA(C,5),COLORLIMAGENTA{XG51};
角度:ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*57.3,NODRAW,COLORBLUE{XG51};
去掉:=IF(NAMELIKE('*st'),0,1)  AND  IF(NAMELIKE('S'),0,1)  AND  IF(DYNAINFO(9)=0,0,1)  AND  IF(BARSCOUNT(V)<150,0,1){XG51};
涨停:=C>REF(C,1)*1.0988 AND C=H{XG51};
STICKLINE(涨停=1,O,C,2,0),COLORLIMAGENTA,LINETHICK2,DRAWAbovE{XG51};
LT:=LLVBARS(L,60){XG51};
LTT:=BArslAST(CURRBARSCOUNT=CONST(LT)+1){XG51};
HT:=FINDHIGHBARS(H,LT+1,60,1){XG51};
高压线:DRAWLINE(CURRBARSCOUNT=CONST(HT)+1,H,ISLASTBAR,REF(H,HT),0),COLORBLUE,LINETHICK2{XG51};
TT:=BARSLAST(CURRBARSCOUNT=CONST(HT)+1){XG51};
T:=BARSLAST(crOSS(C,REF(H,TT))){XG51};
GL:=C/REF(H,TT){XG51};
TA:=BARSLAST(GL=HHV(GL,T+1)){XG51};
DF:=(C-REF(C,TA+1))/REF(C,TA+1)*100{XG51};
JL:=L/REF(H,TT){XG51};
XG:=DF<-7 AND  JL<1.075AND H>REF(H,TT){XG51};
XGT:=BARSLAST(COUNT(XG,T+1)=1 AND XG){XG51};
QF:=BacKSET(XGT=0,TA+1){XG51};
QFT:=BARSLAST(CROSS(QF=1,0.5)){XG51};
XZF:=REFX(DF,BARSNEXT(XGT=0)){XG51};
DRAWICON(CROSS(XGT=0,0.5),L*0.95,1){XG51};
DRAWLINE(T=0,REF(H,TT),QFT=0,REF(H,QFT),0),DOTLINE,COLORBLUE{XG51};
DRAWLINE(QFT=0,REF(H,QFT),XGT=0,REF(H,TT),0),DOTLINE,COLORBLUE{XG51};
DRAWTEXT(TT=0,REF(H,TT)*1.05,VARCAT(VARCAT('高压支撑价 :   ',VAR2STR(REF(H,TT),2)),'元'))COLORBLUE{XG51};
DRAWLINE(QFT=0,REF(H,QFT)*1.05,QFT=10,REF(H,QFT)*1.05,0),COLORYELLOW,LINETHICK3{XG51};
DRAWTEXT(QFT=0,REF(H,QFT)*1.1,VARCAT(VARCAT('跌幅：',VAR2STR(XZF,2)),'%'))COLORBLUE{XG51};
突破:=CROSS(MA5,高压线) AND 去掉{XG51};
DRAWTEXT(突破=1,H,'突破'),COLORBLUE{XG51};
回踩:=COUNT(XG,T+1)=1 AND XG AND 去掉{XG51};
DRAWTEXT(回踩=1,L-L*0.03,'回踩'),COLORBLUE{XG51};
DRAWLINE(TT=0,H,LTT=0,L,0),COLORBLUE,LINETHICK2{XG51};
DRAWTEXT(LTT=0,L*0.98,'锅底'),COLORBLUE{XG51};
坑:=((L-高压线)/高压线)*100,COLORBLUE,NODRAW{XG51};
金坑:=EXIST(突破=1,34) AND REF(O>C,2) AND REF(O>C,1) AND O<C AND C>高压线 AND 坑<15 AND 去掉{XG51};
DRAWTEXT(金坑=1,H+H*0.03,'金坑'),COLORBLUE{XG51};
DRAWNUMBER(金坑=1,L-L*0.03,坑),COLORWHITE{XG51};
NOTEXT突破锅底:EXIST(突破 OR LTT=0,N),COLORWHITE,NODRAW{XG51};
NOTEXT回踩金坑:EXIST(回踩 OR 金坑,N),COLORWHITE,NODRAW{XG51};
LT3:=LLVBARS(L,100){XG51};
HT3:=HHVBARS(H,60){XG51};
LT13:=FINDLOWBARS(L,HT3+1,30,1){XG51};
LTT3:=BARSLAST(CURRBARSCOUNT=CONST(LT3)+1){XG51};
LTT13:=BARSLAST(CURRBARSCOUNT=CONST(LT13)+1){XG51};
HT13:=FINDHIGHBARS(H,LTT13,LTT3+1,1){XG51};
HT1T3:=BARSLAST(CURRBARSCOUNT=CONST(HT13)+1){XG51};
HT2T3:=BARSLAST(CURRBARSCOUNT=CONST(HT3)+1){XG51};
TJ3:=L>REF(L,LTT3){XG51};
TJ13:=H>REF(H,HT1T3){XG51};
下轨:DRAWLINE(LTT3=0,L,LTT13=0 AND TJ3,L,1),COLORWHITE,LINETHICK2{XG51};
上轨:DRAWLINE(HT1T3=0,H,HT2T3=0 AND TJ13,H,1),COLORWHITE,LINETHICK2{XG51};
XLT3:=FINDLOWBARS(H,0,HT2T3+1,1){XG51};
XLT13:=BARSLAST(CURRBARSCOUNT=CONST(XLT3)+1){XG51};
XH1T3:=FINDHIGHBARS(H,XLT13,10,1){XG51};
XH1TT3:=BARSLAST(CURRBARSCOUNT=CONST(XH1T3)+1){XG51};
DF3:=(C-REF(C,HT2T3+1))/REF(C,HT2T3+1)*100{XG51};
XL2TT3:=BARSSINCEN(DF3<-15,HT2T3+1){XG51};
TJ23:=H<REF(H,HT2T3){XG51};
TJ33:=L<REF(L,XL2TT3){XG51};
上:DRAWLINE(HT2T3=0,H,XH1TT3=0 AND TJ23,H,1),COLORCYAN,LINETHICK3{XG51};
下:DRAWLINE(XL2TT3=0,L,XLT13=0 AND TJ33,L,1),COLORCYAN,LINETHICK3{X=G!5*1=C=N={};