让你辨别牛熊的公式－obv阶段（公式 图 源码）

0,LINEDOT;
z:=zig(4,n);
dd:=refx(ref(z,1)<ref(z,2) and z>ref(z,1),1);
gg:=refx(ref(z,1)>ref(z,2) and z<ref(z,1),1);
dw:=barslast(dd);
gw:=barslast(gg);
gdw:=barslast(gg+dd);
a:=if(m=1,c,if(m=2,amount/v/100,if(m=3,ema(c,5),ema(amount/v/100,5))));
Lg:=if(capital,capital,1);
bv:=IF(a>REF(a,1),V/Lg,IF(a<REF(a,1),-V/Lg,0));
VERTLINE(gw=0)colormagenta,POINTDOT;
VERTLINE(dw=0),Color89825F,POINTDOT;
obv:sum(bv,gw)*100,linethick0,coloryellow;//obv值
pobv:sum(obv,gw)/gw,colorred,linethick0;//pobv值
PARTLINE(gw>1,pobv),colorred;{画POBV}
partline(gw>1 and pobv<ref(pobv,1),pobv),COLORCYAN;{画POBV}
PARTLINE(gw>1,obv),coloryellow;{画OBV}
DRAWNUMBER(dw=0,0,obv,1),ALIGN2,coloryellow;{显示obv}
DRAWNUMBER(gw=0,0,ref(obv,1)+bv,1),ALIGN2,coloryellow;{显示obv}