通达信周线潜水艇未加密选股指标公式源码

源码正文：

ma1:=MA(CLOSE,5){XG51};
MA2:=MA(CLOSE,10){XG51};
MA3:=MA(CLOSE,60){XG51};
MA4:=MA(CLOSE,120){XG51};
A1:=OPEN<MA4{XG51};
A2:=C>MA4{XG51};
A3:=(MA3<MA1<MA4)AND(MA3<MA2<MA4)AND(MA3<MA4){XG51};
A4:=C/REF(C,1)<MA4{XG51};
TJ:=A1 AND A2 AND A3 AND A4{XG51};
TJ{X_G!5^1_C_N_{};

源码正文：

P:=5{XG51};
VA:=IF(CLOSE>REF(CLOSE,1),vol,-VOL){XG51};
obv:SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0){XG51};
maoBV5:MA(OBV,5){XG51};
MaoBV20:MA(OBV,20){XG51};
AA1:=REF(OBV,P)=HHV(OBV,2*P+1){XG51};
BB1:=FILTER(AA1,P){XG51};
CC1:=BacKSET(BB1,P+1){XG51};
DD1:=FILTER(CC1,P){XG51};
AA2:=REF(OBV,P)=LLV(OBV,2*P+1){XG51};
BB2:=FILTER(AA2,P){XG51};
CC2:=BACKSET(BB2,P+1){XG51};
DD2:=FILTER(CC2,P){XG51};
前期高点:REF(OBV,BArslAst(DD1)),COLORFF00FF,NODRAW{XG51};
前期低点:REF(OBV,BARSLAST(DD2)),COLOR00FF00,NODRAW{XG51};
相对能量:(OBV-前期低点)/(前期高点-前期低点)*100,COLORBLUE,NODRAW{XG51};
R11:=BACKSET(ISLASTBAR,BARSLAST(DD1)+1){XG51};
S11:=R11>REF(R11,1){XG51};
DRAWLINE(DD1,OBV,S11,OBV,1),COLORBLUE{XG51};
T11:=BACKSET(ISLASTBAR,BARSLAST(DD2)+1){XG51};
U11:=T11>REF(T11,1){XG51};
DRAWLINE(DD2,OBV,U11,OBV,1),COLOR00FF00{XG51};
STICKLINE(C>0,前期低点,前期低点,1,0),COLOR00FF00{XG51};
STICKLINE(C>0,前期高点,前期高点,1,0),COLORFF00FF;
DRAWICON(crOSS(OBV,前期高点),OBV,1){X.G_5~1.C.N.{};