将TDX的能量潮指标改成FH的

九毛八公式指标

能量潮 SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSEREF(CLOSE,1),VOL,-VOL); OBV:SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0); IF(OBVREF(OBV,1),OBV,DRAWNULL),COLOR0000FF,LINETHICK3; MAOBV:MA(OBV,28),COLOR00FFFF,LINETHICK1; MAOBV1:MA(OBV,16),COLORFFFF00,LINETHICK1; MAOBV2:MA(OBV,6),COLORFFFFFF,LINETHICK1; MAOBV3:MA(OBV,22),COLORFF00FF,LINETHICK1;

公式模块：

SUM(IF(CLOSE>REF(CLOSE,1),vol,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0); VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL); obv:SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0); PARTLINE(OBV<REF(OBV,1),OBV),COLOR40FF00,LINETHICK3; PARTLINE(OBV>REF(OBV,1),OBV),COLOR0000FF,LINETHICK3; MaoBV:MA(OBV,28),COLOR00FFFF,LINETHICK1; MAOBV1:MA(OBV,16),COLORFFFF00,LINETHICK1; MAOBV2:MA(OBV,6),COLORFFFFFF,LINETHICK1; MAOBV3:MA(OBV,22),COLORFF00FF,LINETHICK1;