让你辨别牛熊的公式----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}