通达信红牛登顶箱体主图选股指标公式源码

通达信红牛登顶箱体主图选股指标公式源码

源码正文：

VAT4:=(LOW+HIGH+CLOSE)/3{XG51};
操作: ma(VAT4,5){XG51};
拉升: HHV(操作,13){XG51};
压力: HHV(操作,60){XG51};
买卖: LLV(操作,13){XG51};
底部支撑: LLV(LOW,60)*1.02,COLORYELLOW,LINETHICK2{XG51};
顶部: HHV(HIGH,60)*0.98,COLORGREEN{XG51};
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0){XG51};
stICKLINE(涨停,O,C,1,0),COLORBLUE{XG51};
ZDF:=(C-REF(C,1))/REF(C,1)*100{XG51};
STICKLINE(ZDF<-9.9,O,C,1,0),COLORYELLOW{XG51};
M:=100*(C-REF(C,1))/REF(C,1){XG51};
今小昨:=IF(C<REF(O,1) AND M<0,1,0){XG51};
P1:=今小昨{XG51};
今小前:=IF(C<REF(O,2) AND M<0,1,0){XG51};
P2:=今小前{XG51};
STICKLINE(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,OPEN,CLOSE,3,0),COLORLIMAGENTA{XG51};
E1:=BARSCOUNT(C){XG51};
AH:=HHV(H,200){XG51};
AL:=LLV(L,200){XG51};
B0:=(AH-AL)/40{XG51};
KB1:=H+B0{XG51};
KB2:=L-B0{XG51};
STICKLINE((E1+0)/34=FLOOR((E1+0)/34),KB2,KB2-3*B0,1,0),COLORBLUE,LINETHICK3{XG51};
DRAWTEXT((E1+0)/34=FLOOR((E1+0)/34),KB2-2*B0,'窗'),COLORRED{XG51};
V1:=Abs((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20){XG51};
V2:=(1-7/100)*(dma(CLOSE,V1)){XG51};
V3:=(1+7/100)*(DMA(CLOSE,V1)){XG51};
V5:=MA((LOW+HIGH+CLOSE)/3,5){XG51};
支撑:REFDATE(V2,DATE),POINTDOT,LINETHICK3,COLORCC66FF{XG51};
阻力:REFDATE(V3,DATE),POINTDOT,LINETHICK3,COLORCYAN{X.G!5-1.C.N.{};