源码
{《凤翔OBV》}
obv:SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0);
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买盘:IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),POINTDOT,COLORRED,LINETHICK1;
主动卖盘:IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),COLORGREEN,LINETHICK1;
差:=(主动买盘+主动卖盘);
买卖差:=if(主动买盘<主动卖盘,(-1)*差,差);
买盘力度:主动买盘/(主动卖盘+主动买盘),linethick1,colorred;
卖盘力度:主动卖盘/(主动卖盘+主动买盘),linethick1,colorcyan;
强度:(买盘力度+卖盘力度)/(买盘力度-卖盘力度),linethick1;
x1:sma(obv,24,1);
x2:sma(obv,55,1);
v1:=hhv(obv,0);
PARTLINE(x1>ref(x1,1),x1),colorred,linethick1;