通达信macd面积监控底背离源码最准

DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2;
HG:DIF*5;
HR:DEA*5;
HMACXD:MACD*5,COLORSTICK;

LL:=REF(MACD,1)<=MACD AND REF(MACD,1)<=REF(MACD,2) AND REF(MACD,2)<=REF(MACD,3) ;
OO:=REF(MACD,BARSLAST(REF(MACD,1)<0 AND REF(MACD,2)<0 AND LL=1));
DIFS:=REF(DIF,BARSLAST(REF(MACD,1)<0 AND REF(MACD,2)<0 AND LL=1));
PP:=REF(MACD,BARSLAST(REF(MACD,1)<0 AND REF(MACD,2)<0 AND LL=1)+1);
II:=REF(MACD,BARSLAST(REF(MACD,1)<0 AND REF(MACD,2)<0 AND LL=1)+2);
WW:=REF(REF(L,1),BARSLAST( LL=1));
WW1:=REF(WW,1);
QQ1:=BARSLAST(LL=1 AND REF(MACD,1)<0 AND REF(MACD,2)<0);
QQ:=REF(QQ1,1);
DS:=ABS(MACD+REF(MACD,1)+REF(MACD,2))/ABS(REF(OO,1)+REF(PP,1)+REF(II,1));
JH:=QQ>7 AND DS<0.7 AND REF(L,1)<WW1 ;
YY:=MACD+REF(MACD,1)+REF(MACD,2)>REF(OO,1)+REF(PP,1)+REF(II,1) AND LL=1;
JJ1:=MACD+REF(MACD,1)+REF(MACD,2)>REF(OO,1)+REF(PP,1)+REF(II,1) AND LL=1
AND REF(MACD,1)<0 AND REF(MACD,2)<0 AND JH=1 AND MA(C,20)<REF(MA(C,20),3) AND C<MA(C,60) ;

JJ:=MACD+REF(MACD,1)+REF(MACD,2)>REF(OO,1)+REF(PP,1)+REF(II,1) AND LL=1
AND REF(MACD,1)<0 AND DIF<0 AND DIF>REF(DIFS,1) AND QQ<20;
MM:=JJ=1 OR JJ1=1;
JJJ:MM*90;