通达信深化MACD未加密选股指标公式源码

通达信深化MACD未加密选股指标公式源码

源码正文：

SHORT:=12{XG51};
LONG:=26{XG51};
M:=9{XG51};
difF:ema(CLOSE,SHORT)-Ema(CLOSE,LONG){XG51};
DEA:EMA(DIFF,M),COLORCYAN,LINETHICK2{XG51};
macd:2*(DIFF-DEA),LINETHICK0{XG51};
stICKLINE(MacD>=0 AND MACD>=REF(MACD,1),0,MACD,2,1),COLORWHITE{XG51};
STICKLINE(MACD>=0 AND MACD<REF(MACD,1),0,MACD,2,1),COLORCYAN{XG51};
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,2,1),COLORBLUE{XG51};
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,2,1),COLORF0F000{XG51};
obv:=DEA;
P:=10{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-{}

通达信买卖金线主图未加密选股指标公式源码

源码正文：

VAR1:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21)))){XG51};
VAR2:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21)))){XG51};
VAR3:=(100 - ma(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34)){XG51};

DRAWTEXT(CROSS(VAR2,MA(VAR3,6)),(LOW * 0.984),'进 '),COLORFF00FF{XG51};
DRAWTEXT(CROSS(MA(VAR3,6),VAR1),(HIGH * 1.035),'出 '),COLOR3AFF00{XG51};
分界线:MA(CLOSE,21),COLORBLUE{XG51};
stICKLINE(C>=分界线 AND C>=O,C,O,5,0),COLORWHITE{XG51};
STICKLINE(C>=分界线 AND C>=O,H,L,0,0),COLORWHITE{XG51};
STICKLINE(C>=分界线 AND C<O,C,O,5,1),COLORWHITE{XG51};
STICKLINE(C>=分界线 AND C<O,O,H,0,0),COLORWHITE{XG51};
STICKLINE(C>=分界线 AND C<O,C,L,0,0),COLORWHITE{XG51};
STICKLINE(C<分界线 AND C>O,C,O,5,1),COLORFFFF00{XG51};
STICKLINE(C<分界线 AND C<=O,C,O,5,1),COLORFFFF00{XG51};
STICKLINE(C<分界线 AND C<=O,H,L,0,1),COLORFFFF00{XG51};
STICKLINE(C<分界线 AND C>O,C,H,0,1),COLORFFFF00{XG51};
STICKLINE(C<分界线 AND C>O,O,L,0,1),COLORFFFF00{X~G_5_1~C~N~{};