通达信两个MACD低背离源码

以下是通达信两个MACD低背离源码

MACD低背离(一)

DIFF:=EMA(CLOSE,12)-EMA(CLOSE,27);
 DEA:=EMA(DIFF,9);
 MACD:=2*(DIFF-DEA);
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
 JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
 A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
 REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);

MACD低背离(二)

DIFF:=EMA(CLOSE,12) – EMA(CLOSE,26);
 DEA:=EMA(DIFF,9);
 MACD:=2*(DIFF-DEA);
 QZQ:=BARSLAST(REF(MACD,1)<0 AND MACD>0);
 QM:=LLVBARS(MACD,QZQ+20);
 MQDZ:=IF(QM>QZQ,REF(MACD,QM),0);
 XG1:=MACD<0 AND MACD>MQDZ
 AND CLOSE=LLV(CLOSE,QZQ+20) AND MQDZ<0;
 XG:REF(XG1,1)=1 AND MACD>REF(MACD,1);