通达信MACD金叉共振副图指标公式源码

{www.gszb.comMACD金叉共振}

DRAWGBK(C>0, RGB(1,1,1),RGB(1,1,1),0,'0',0);

{www.gszb.comMACD周金叉}

DFFF:=EMA(CLOSE,12)-EMA(CLOSE,26);

DAAA:=EMA(DFFF,9);

周DIF:="MACD.DIF#WEEK"(12,26,9),NODRAW;

周DEA:="MACD.DEA#WEEK"(12,26,9),NODRAW;

周金叉:=周DIF>周DEA;

STICKLINE(周金叉,DFFF,DAAA,0.8,0),COLOR0080FF;

{www.gszb.com30分钟MACD彩带}

DIF30分钟:=(EMA(CLOSE,12/4)-EMA(CLOSE,26/4)),NODRAW;

DEA30分钟:=(EMA(DIF30分钟,9/4)),NODRAW;

DRAWBAND(DIF30分钟,RGB(255,150,255),DEA30分钟,RGB(128,128,255));

{www.gszb.comDJG波段风暴}

DIFF:=EMA(CLOSE,21)-EMA(CLOSE,34);

DEAA:=EMA(DIFF,8);

MACDD:=3.8*(DIFF-DEAA);

MARDD:=SMA(MACDD,2,1);

STICKLINE(MACDD>MARDD,MACDD,MARDD,1.8,0),COLORMAGENTA;

STICKLINE(MACDD<MARDD,MACDD,MARDD,1.8,0),COLORFF8000;

{www.gszb.com底部信号}

BB值:=EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3);

AAA:=EMA(CLOSE,12)-EMA(CLOSE,26);

DRAWTEXT(CROSS(BB值,9),0,' 底部'),COLORYELLOW;

DRAWICON(CROSS(BB值,9),0,41);

STICKLINE(CROSS(BB值,9),AAA,0,2,0),COLORYELLOW;

{www.gszb.comDJG_MACD的柱线}

MACD2:=2*("MACD.DIF"-"MACD.DEA");

STICKLINE(MACD2>=0,0,MACD2,0,0),COLORRED;{www.gszb.com0上升}

STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,0,0),COLORGREEN;{www.gszb.com0上跌}

STICKLINE(MACD2<0,0,MACD2,0,0),COLORGREEN;{www.gszb.com0下跌}

STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,0,0),COLORRED;{www.gszb.com0下升}

{www.gszb.comDIF和DEA线}

DIF:EMA(CLOSE,12)-EMA(CLOSE,26)COLORWHITE,LINETHICK2;

DEA:EMA(DIF,9)COLOR0080FF;

DRAWTEXT(ISLASTBAR,DIF,' ←DIF'),COLORWHITE;

DRAWTEXT(ISLASTBAR,DEA,' ←DEA'),COLOR0080FF;

{www.gszb.com金叉和背离的标识}

JCCOUNT:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0));

二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;

DRAWICON(二次金叉,DEA*0.5,41) ;

DRAWTEXT(二次金叉,DEA*0.5,' 二次金叉'),COLORYELLOW;

A1:=BARSLAST(REF(CROSS(DIF,DEA),1));

底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA);

DRAWTEXT(底背离,DIF*1,' 底背离'),COLORWHITE;

DRAWICON(底背离,DIF*1,38);

A2:=BARSLAST(REF(CROSS(DEA,DIF),1));

顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF);

DRAWTEXT(顶背离,DIF*1,' 顶背离'),COLORGREEN;

DRAWICON(顶背离,DIF*1,39);

DA1:=BARSLAST(REF(CROSS(DIF,DEA),1));

D底背离:=REF(CLOSE,DA1+1)>CLOSE AND DIF>REF(DIF,DA1+1) AND CROSS(DIF,DEA);

底背画线:DRAWLINE(DA1=0,DEA,D底背离,DEA,0),COLORWHITE,DOTLINE;

DA2:=BARSLAST(REF(CROSS(DEA,DIF),1));

D顶背离:=REF(CLOSE,DA2+1)<CLOSE AND REF(DIF,DA2+1)>DIF AND CROSS(DEA,DIF);

顶背画线:DRAWLINE(DA2=0,DEA,顶背离,DEA,0),COLORGREEN,DOTLINE;

{www.gszb.comMACD&KDJ 金叉共振}

{www.gszb.comDIF:EMA(CLOSE,12)-EMA(CLOSE,26);DEA:EMA(DIF,9);}

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9));

K:SMA(RSV,9,3),NODRAW;

D:SMA(K,9,3),NODRAW;

J:3*K-2*D,NODRAW;

A:=CROSS(DIF,DEA) AND CROSS(K,D) AND CROSS(J,D);

DRAWICON(A,DEA*1.2,25);

DRAWTEXT(A,DEA*1.2,' 金叉共振'),COLORYELLOW;

0,COLORGRAY,DOTLINE;