通达信精进终极OBV未加密选股指标公式源码

通达信精进终极OBV未加密选股指标公式源码

源码正文：

VA:=IF(CLOSE>REF(CLOSE,1),vol/CAPITAL,-VOL/CAPITAL){XG51};
obv1:SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0){XG51};
HPB:REF(HHV(OBV1,20),1),COLORYELLOW,DOTLINE{XG51};
LPB:REF(LLV(OBV1,20),1),COLORYELLOW,DOTLINE{XG51};
MPB:(HPB+LPB)/2,COLORLIGREEN,DOTLINE{XG51};
A0:=OBV1{XG51};
A1:ema(A0,14),COLORBLUE,LINETHICK2{XG51};
A1X:=(A1-REF(A1,1))/REF(A1,1)*100{XG51};
G1:=BArslAst(crOSS(A1X,0)){XG51};
买入止损:=REF(A0,G1),COLORRED,LINETHICK1{XG51};
买入盈利:(A0-买入止损)/买入止损*100,NODRAW{XG51};
IF(A1X>=0,买入止损,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
IF(A1X>=0,A1,DRAWNULL),COLORWHITE,LINETHICK2{X=G-5!1=C=N={};

通达信牛熊判势未加密选股指标公式源码

源码正文：

REFLINE:- 1, 0, 1{XG51};
A1:=(maX(H,REF(C,1))/MIN(L,REF(C,1))-1)*1.1{XG51};
A2:=dma(C,2.5*MAX(V/CAPITAL,A1)){XG51};
A3:=C>=REF(C,1){XG51};
A4:=C<=REF(C,1){XG51};
D1:=SMA(20*(A2/REF(A2,1)-1),2,1){XG51};
D2:=ema(D1,2){XG51};
stICKLINE(D2>=0,-0.1,0.07,10,0),COLORDD00EE{XG51};
STICKLINE(D2<=0,-0.1,0.07,10,0),COLOR00EE00{XG51};
牛股:IF(D1>0.06 AND D2>=0.005 AND A3,1,0),STICK,LINETHICK4,COLOR00ddfF{XG51};
疯牛:IF(D1>0.24 AND D2>=0.005 AND A3,1,0),STICK,LINETHICK4,COLOR0000FF{XG51};
熊股:IF(D1<-0.06 AND D2<=-0.005 AND A4,-1,0),STICK,LINETHICK4,COLORFFEE00{XG51};
疯熊:IF(D1<-0.24 AND D2<=-0.005 AND A4,-1,0),STICK,LINETHICK4,COLORRED{XG51};
DRAWTEXT(FILTER(疯牛,5),-0.3,'疯牛'),COLOR0000FF{XG51};
DRAWTEXT(FILTER(疯熊,5),0.5,'疯熊'),COLORRED{X!G+5_1!C!N!{};