通达信【OBV-金】结合MACD的OBV寻找买卖点更清楚实用

通达信【OBV-金】结合MACD的OBV寻找买卖点更清楚实用

通达信版本的【OBV0金】  【BX参数】填入表内 .你的版本必需是可以通过【WMA】函数.不然你就得提高你的通达信版本：-------------
 {OBV-金}
 MAC:=WMA((2*C+H+L)/4,3);
 JOBV:=SUM(IF(MAC>REF(MAC,1),VOL,IF(MAC<REF(MAC,1),-VOL,0)),BX);
 OBVE:=(JOBV-LLV(JOBV,55))/(HHV(JOBV,55)-LLV(JOBV,55))*100;
 DIFF:=WMA(OBVE,13)-WMA(OBVE,21);
 DEA:=WMA(DIFF,8);
 MACD:20*(DIFF-DEA), COLORSTICK;
 20*(DIFF-DEA),COLOR00FF00,LINETHICK3;
 IF(MACD>REF(MACD,1),MACD,DRAWNULL),COLORRED,LINETHICK3;
 
{成交量}
 STICKLINE(MAC>REF(MAC,1),0,V/CAPITAL*100*2,1,0 ),COLOR0000FF;
STICKLINE(MAC<REF(MAC,1),0,-V/CAPITAL*100*2,1,0 ),COLOR00FF00;
 =======================================================================
 {OBVV-金成交量}
 MAC:=WMA((2*C+H+L)/4,3);
 WOBV:WMA(SUM(IF(MAC>REF(MAC,1),VOL,IF(MAC<REF(MAC,1),-VOL,0)),3),5),COLOR00FF00,LINETHICK2;
 IF(WOBV>REF(WOBV,1),WOBV,DRAWNULL),COLORRED,LINETHICK3;
 
{成交量}
 STICKLINE(MAC>REF(MAC,1),0,V,1,0 ),COLOR0000FF;
STICKLINE(MAC<REF(MAC,1),0,-V,1,0 ),COLOR00FF00;

843322255.jpg

843388193.jpg