通达信BIAS画线突破及选股指标公式源码

通达信BIAS画线突破及选股指标公式源码

源码正文：

bias1 :(CLOSE-ma(CLOSE,12))/MA(CLOSE,12)*100{XG51};
obv:=BIAS1{XG51};
P:=5{XG51};
A1:=REF(OBV,P)=HHV(OBV,2*P+1){XG51};
B1:=FILTER(A1,P){XG51};
C1:=BacKSET(B1,P+1){XG51};
D1:=FILTER(C1,P){XG51};
A2:=REF(OBV,P)=LLV(OBV,2*P+1){XG51};
B2:=FILTER(A2,P){XG51};
C2:=BACKSET(B2,P+1){XG51};
D2:=FILTER(C2,P){XG51};
上:REF(OBV,BArslAst(D1)),COLORFF00FF,NODRAW{XG51};
下:REF(OBV,BARSLAST(D2)),COLOR00FF00,NODRAW{XG51};
向上:crOSS(OBV,上*1.01),NODRAW{XG51};
相对能量:(OBV-下)/(上-下)*100,COLORBLUE,NODRAW{XG51};
R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1){XG51};
S11:=R11>REF(R11,1){XG51};
DRAWLINE(D1,OBV,S11,OBV,1),COLORBLUE{XG51};
T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1){XG51};
U11:=T11>REF(T11,1){XG51};
DRAWLINE(D2,OBV,U11,OBV,1),COLOR00FF00{XG51};
STICKLINE(C>0,下,下,1,0),COLOR00FF00{XG51};
STICKLINE(C>0,上,上,1,0),COLORFF00FF{XG51};
DRAWTEXT(CROSS(OBV,上*1.01),上,'上'),COLORBLUE{XG51};
DRAWTEXT(CROSS(下*0.99,OBV),下,'下'),COLORBLUE{XG51};
DRAWICON(D1,OBV,1){XG51};
DRAWICON(D2,OBV,2){X_G.5-1_C_N_{};