一、OBV三线显示{赶底、庄托和主力进场}
OBV:SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0);
周:=MA(OBV,5); 月:MA(OBV,20); 季:MA(OBV,60); VAR1:=CROSS(周,月); VAR2:=BARSLAST(CROSS(OBV,月))<=5; VAR3:=CROSS(月,季); VAR4:=BARSLAST(CROSS(周,季))<=10; VAR5:=CROSS(月,OBV); VAR6:=BARSLAST(CROSS(周,OBV))<=5; VAR7:=BARSLAST(CROSS(OBV,季))>=20; {DRAWTEXT(VAR1 AND VAR2,季,'主力进场'),COLORRED;} DRAWTEXT(VAR3 AND VAR4,季,'庄托'),COLORBLUE; DRAWTEXT(VAR5 AND VAR6 AND VAR7,月,'打压'),COLORGREEN; DRAWTEXT(CROSS(季,OBV) AND BARSLAST(CROSS(OBV,季))>=20 AND C<MA(C,60),季,'赶底'); 二、OBV箱体显示
VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);
OBV:SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0),COLOR00FFFF; MAOBV:MA(OBV,13),COLOR996699; 箱顶:HHV( OBV,20),COLOR0000FF; 箱底:LLV( OBV,20),COLOR00FF00; UPPER:MAOBV+2*STD(OBV,20),COLORMAGENTA; LOWER:MAOBV-2*STD(OBV,20),COLORFF0000; |
|
来自: juezhe1970 > 《短银指标源码》