%>
N:=20;M:=3;
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;
{股票教程网-股票公式网站 www.gwgz.net}
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}
{股票教程网-http://bkqg.net承接通达信软件和公式破解,普通加密破解,完全加密破解,导入密码破解,时间限制破解,公式编写,可按您的要求写公式指标,价格按难度不同报价,有需要可以找我们}