MACD背离副图指标贴图源码通达信指标公式.doc

MACD2:=2*(-);STICKLINE(MACD2>=0ANDMACD2>REF(MACD2,l)zO,,0)zCOLOROOOOA5;STICKLINE(MACD2>=0ANDMACD2<REF(MACD2,1),0,)ZCOLORAA7800;STICKLINE(MACD2<0ANDMACD2<REF(MACD2,l),,0),COLOR00A500;STICKLINE(MACD2<0ANDMACD2>REF(MACD2,1),0ZMACD2,,0),COLORA500A5;DIF:EMA(CLOSE,12)-EMA(CLOSEZ26);DEA:EMA(DIF=9);MACD:(DIF-DEA)*2,N0DRAW;{MACD口线二次金叉}JCCOUNT:=COUNT(CROSS(DIF;DEA)ZBARSLAST(DEA>=0));二次金叉:=CROSS(DI£DEA)ANDDEA<0ANDCOUNT(JCCOUNT=2,21)=1;DRAWTEXT(二次金叉,DEA*1・25,零下二金*),COLORWHITE;{MACD日线底背离}A1:=BARSLAST(REF(CROSS(DIF=DEA)Z1));底背离:=REF(CLOSE,A1+1)>CLOSEANDDIF>REF(DIF,A1+1)ANDCROSS(DIEDEA);DRAWTEXT(底背离,DIF*0・5,日底背')ZCOLORRED;{日底背画线:DRAWLINE(A1=O,DEA,底背离,DEA,0),COLORRED,DOTLINE;}{MACD日线顶背离}A2:=BARSUXST(REF(CROSS(DEA,DIF),1));顶背离:=REF(CLOSE,A2+l)vCLOSEANDREF(DI£A2+1)>DIFANDCROSS(DEAQIF);DRAWTEXT(顶背离ZDIF*,'日顶背*),REEN;{日顶背画线:DRAWLINE(A2=0,DEA,顶背离,DEA,0),REEN,DOTLINE;}{MACD_KDJ的金叉共振}{DIF:EMA(CLOSEZ12)-EMA(CLOSEZ26);DEA:EMA(DIF=9);}RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOWZ9));K:=SMA(RS\49,3),NODRAW;D:=SMA(K,9,3),NODRAW;J:=3*K-2*D,NODRAW;M&K金共:=CROSS(DI£DEA)ANDCROSS(K,D)ANDCROSS(JQ);DRAWTEXT(M&K金共,DEA*;金叉共振jCOLORYE山DW;{MACD柱背离}MACD高:=HHV(MACD,5);C1:=BARSU\ST(REF(CROSS(DEA,DIF),1));E:=REF(C,C1+1)>CANDDEA>0ANDREF(MACD高ZC1+1)<MACD高ANDCROSS(DEAQIF);DRAWTEXT(E>0,-,1柱顶背*),COLORCYAN;F:=REF(C,A1+1)>CANDDEA<0ANDREF(MACD高,A1+1)<MACD高ANDCROSS(DIF,DE