分钟OBV 累积能量线 通达信指标 源码 贴图

VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);
OBV:SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);
MAOBV:MA(OBV,M);
分时:DRAWTEXT({((COUNT(EVERY(OBV<MAOBV AND MAOBV<REF(MAOBV,1) AND MAOBV<0,30)
OR EVERY(OBV>MAOBV AND MAOBV>0,5),10)
AND OBV>MAOBV AND MAOBV>REF(MAOBV,1) AND OBV>REF(HHV(OBV,30),1)))
OR }
((REF(OBV<-1000 AND MAOBV<-1000 AND MAOBV<REF(MAOBV,1),1) AND CROSS(OBV,MAOBV))
OR (REF(EVERY(OBV<-10000 AND MAOBV<-10000 AND MAOBV>REF(MAOBV,1),10),1)
AND CROSS(OBV,REF(HHV(OBV,10),1)))) AND C/REF(C,1)>1.002{ AND COUNT(C>O,10)>4},OBV,'FS'),COLORYELLOW;