通达信MACD水下三金叉股价双背离主图选股指标公式源码

通达信MACD水下三金叉股价双背离主图选股指标公式源码

源码正文：

dif:=ema(CLOSE,12)-Ema(CLOSE,26){XG51};
DEA:=EMA(DIF,9){XG51};
macd:=(DIF-DEA)*2{XG51};
T:=BArslAst(crOSS(DIF,DEA) AND DIF<0){XG51};
T1:=SUMBARS(T=0,2){XG51};
T2:=SUMBARS(T=0,3){XG51};
M:=BARSLAST(CROSS(0,MacD)){XG51};
M1:=SUMBARS(M=0,2){XG51};
M2:=SUMBARS(M=0,3){XG51};
D1:=REF(DIF,BARSLAST(DIF=LLV(DIF,M+1))){XG51};
D2:=REF(D1,T1-1){XG51};
D3:=REF(D2,T1-1){XG51};
LT:=BARSLAST(L=LLV(L,M+1)){XG51};
L1:=REF(L,LT){XG51};
L2:=REF(L1,T1-1){XG51};
L3:=REF(L2,T1-1){XG51};
XG:=T=0 AND L1<L2 AND L2<L3 AND D1>D2 AND D2>D3{XG51};
DRAWICON(XG,L*0.98,1){XG51};
VAR1:=BACKSET(XG,T2+REF(LT,T2-1)){XG51};
VAR2:=BACKSET(XG,T1+REF(LT,T1-1)){XG51};
VAR3:=BACKSET(XG,T+REF(LT,T)+1){XG51};
DRAWLINE(CROSS(VAR1=1,0.5),L,CROSS(VAR2=1,0.5) AND VAR1=1,L,0),COLORBLUE,LINETHICK2{XG51};
DRAWLINE(CROSS(VAR2=1,0.5) AND VAR1=1,L,VAR1=1 AND VAR2=1 AND CROSS(VAR3=1,0.5),L,0),COLORLIMAGENTA,LINETHICK2{X^G-5~1^C^N^{};