[文华财经指标]MACD综合提供公式

DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26) ,COLORFFFFFF;

DEA:=EMA(DIFF,9) ,COLORYELLOW;

MACD1:=2*(DIFF-DEA) ;

MACD2:=EMA(MACD1,5);

STICKLINE1(MACD1>MACD2 AND MACD1>0,0,MACD1,3,0) ,COLOR000055;

STICKLINE1(MACD1>MACD2 AND MACD1>0,0,MACD1,2.5,0) ,COLOR000077;

STICKLINE1(MACD1>MACD2 AND MACD1>0,0,MACD1,1.5,0) ,COLOR000099;

STICKLINE1(MACD1>MACD2 AND MACD1>0,0,MACD1,1,0) ,COLOR0000FF;

STICKLINE1(MACD1>MACD2 AND MACD1<0,0,MACD1,3,0),COLOR222222;

STICKLINE1(MACD1>MACD2 AND MACD1<0,0,MACD1,2.5,0),COLOR444444;

STICKLINE1(MACD1>MACD2 AND MACD1<0,0,MACD1,1.5,0),COLOR666666;

STICKLINE1(MACD1>MACD2 AND MACD1<0,0,MACD1,0,0),COLOR999999;

STICKLINE1(MACD1<MACD2,0,MACD1,3,0),COLORA80000;

STICKLINE1(MACD1<MACD2,0,MACD1,2.5,0),COLORB80000;

STICKLINE1(MACD1<MACD2,0,MACD1,1.5,0),COLOREC1000;

STICKLINE1(MACD1<MACD2,0,MACD1,1,0),COLORFF4600;

STICKLINE1(MACD1<MACD2,0,MACD1,0,0),COLORFFAA00;

低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;

STICKLINE1(低位金叉,0,DIFF,3,0) ,COLOR002222;

STICKLINE1(低位金叉,0,DIFF,2.5,0),COLOR006666;

STICKLINE1(低位金叉,0,DIFF,1.5,0),COLOR009999;

STICKLINE1(低位金叉,0,DIFF,1,0),COLOR00FFFF;

DRAWTEXT(低位金叉,DIFF,’ 低位金叉’) ,COLORMAGENTA;

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

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

STICKLINE1(二次金叉,MACD1,-0.01,3,0),COLOR440044;

STICKLINE1(二次金叉,MACD1,-0.01,2.5,0),COLOR660066;

STICKLINE1(二次金叉,MACD1,-0.01,1.5,0),COLOR990099;

STICKLINE1(二次金叉,MACD1,-0.01,1,0),COLORFF00FF;

DRAWTEXT(二次金叉,DEA*1.3,’ 二次金叉’),COLORYELLOW;

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

高位死叉:=CROSS(DEA,DIFF) AND DIFF>0.1;

STICKLINE1(高位死叉,0,DIFF,3,0) ,COLORYELLOW;

DRAWTEXT(高位死叉,DIFF,’ 高位死叉’) ,COLORCYAN;

JKCOUNT:=COUNT(CROSS(DEA,DIFF),BARSLAST(DEA<=0));

二次死叉:=CROSS(DEA,DIFF) AND DEA>0 AND COUNT(JKCOUNT=2,21)=1;

STICKLINE1(二次死叉,MACD1,0.01,3,0),COLORWHITE;

DRAWTEXT(二次死叉,DEA*0.7,’二次死叉’),RGB(0,255,64);

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

STICKLINE(底背离,0,0.03,6,0) ,COLOR00FF00;

DRAWLINE1(CROSS(BACKSET(底背离,BARSLAST(A1=0)+1),0.5),DEA,CROSS(BACKSET(A1=0,BARSLAST(底背离)+1),0.5),DEA,0) ,COLORRED,LINETHICK1;

DRAWTEXT(底背离,0.03,’ 底背离’) ,COLORFF00FF;

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

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

DRAWLINE1(CROSS(BACKSET(顶背离,BARSLAST(A2=0)+1),0.5),DEA,CROSS(BACKSET(A2=0,BARSLAST(顶背离)+1),0.5),DEA,0),COLORFF8800,LINETHICK1;

DRAWTEXT(顶背离,-0.02,’ 顶背离’),COLORFFFF00;

ZT:=CROSS(DEA,DIFF);

LS0:=BARSLAST(ZT);

S1:=IF(1,LS0=1,ZT) AND IF(1,DIFF<DEA,0);

DRAWTEXT(S1 AND DIFF>0,DIFF*0.8,’1′) ,COLOR00FF00;

DRAWTEXT(S1 AND DIFF<0,DIFF*1.8,’1′) ,COLOR00FF00;

S3:=IF(3,LS0=3,ZT) AND IF(3,DIFF<DEA,0);

DRAWTEXT(S3 AND DIFF>0,DIFF*0.8,’3′),COLOR00FF00;

DRAWTEXT(S3 AND DIFF<0,DIFF*1.4,’3′),COLOR00FF00;

S5:=IF(5,LS0=5,ZT) AND IF(5,DIFF<DEA,0);

DRAWTEXT(S5 AND DIFF>0,DIFF*0.8,’5′),COLOR00FF00;

DRAWTEXT(S5 AND DIFF<0,DIFF*1.4,’5′),COLOR00FF00;

S8:=IF(8,LS0=8,ZT) AND IF(8,DIFF<DEA,0);

DRAWTEXT(S8 AND DIFF>0,DIFF*0.8,’8′),COLOR00FF00;

DRAWTEXT(S8 AND DIFF<0,DIFF*1.8,’8′),COLOR00FF00;

S13:=IF(13,LS0=13,ZT) AND IF(8,DIFF<DEA,0);

DRAWTEXT(S13 AND DIFF>0,DIFF*0.8,’13’),COLOR00FF00;

DRAWTEXT(S13 AND DIFF<0,DIFF*1.2,’13’),COLOR00FF00;

S21:=IF(21,LS0=21,ZT) AND IF(21,DIFF<DEA,0);

DRAWTEXT(S21 AND DIFF>0,DIFF*0.8,’21’),COLOR00FF00;

DRAWTEXT(S21 AND DIFF<0,DIFF*1.2,’21’),COLOR00FF00;

S26:=IF(26,LS0=26,ZT) AND IF(26,DIFF<DEA,0);

DRAWTEXT(S26 AND DIFF>0,DIFF*0.8,’26’),COLOR00FF00;

DRAWTEXT(S26 AND DIFF<0,DIFF*1.2,’26’),COLOR00FF00;

S29:=IF(29,LS0=29,ZT) AND IF(29,DIFF<DEA,0);

DRAWTEXT(S29 AND DIFF>0,DIFF*0.8,’29’),COLOR00FF00;

DRAWTEXT(S29 AND DIFF<0,DIFF*1.2,’29’),COLOR00FF00;

S34:=IF(34,LS0=34,ZT) AND IF(34,DIFF<DEA,0);

DRAWTEXT(S34 AND DIFF>0,DIFF*0.8,’34’),COLOR00FF00;

DRAWTEXT(S34 AND DIFF<0,DIFF*1.8,’34’),COLOR00FF00;

S55:=IF(55,LS0=55,ZT) AND IF(55,DIFF<DEA,0);

DRAWTEXT(S55 AND DIFF>0,DIFF*0.8,’55’),COLOR00FF00;

DRAWTEXT(S55 AND DIFF<0,DIFF*1.8,’55’),COLOR00FF00;

S68:=IF(68,LS0=68,ZT) AND IF(68,DIFF<DEA,0);

DRAWTEXT(S68 AND DIFF>0,DIFF*0.8,’68’),COLOR00FF00;

DRAWTEXT(S68 AND DIFF<0,DIFF*1.8,’68’),COLOR00FF00;

ZTJ:=CROSS(DIFF,DEA) ;

LSJ:=BARSLAST(ZTJ) ;

SJ1:=IF(1,LSJ=1,ZTJ) AND IF(1,DIFF>DEA,0) ;

DRAWTEXT(SJ1 AND DIFF>0,DIFF*1.2,’1′),COLORFFFFFF;

DRAWTEXT(SJ1 AND DIFF<0,DIFF*0.8,’1′),COLORFFFFFF;

SJ3:=IF(3,LSJ=3,LSJ) AND IF(3,DIFF>DEA,0);

DRAWTEXT(SJ3 AND DIFF>0,DIFF*1.2,’3′),COLORFFFFFF;

DRAWTEXT(SJ3 AND DIFF<0,DIFF*0.8,’3′),COLORFFFFFF;

SJ5:=IF(5,LSJ=5,ZTJ) AND IF(5,DIFF>DEA,0);

DRAWTEXT(SJ5 AND DIFF>0,DIFF*1.2,’5′),COLORFFFFFF;

DRAWTEXT(SJ5 AND DIFF<0,DIFF*0.8,’5′),COLORFFFFFF;

SJ8:=IF(8,LSJ=8,ZTJ) AND IF(8,DIFF>DEA,0);

DRAWTEXT(SJ8 AND DIFF>0,DIFF*1.2,’8′),COLORFFFFFF;

DRAWTEXT(SJ8 AND DIFF<0,DIFF*0.8,’8′),COLORFFFFFF;

SJ13:=IF(13,LSJ=13,ZTJ) AND IF(8,DIFF>DEA,0);

DRAWTEXT(SJ13 AND DIFF>0,DIFF*1.2,’13’),COLORFFFFFF;

DRAWTEXT(SJ13 AND DIFF<0,DIFF*0.8,’13’),COLORFFFFFF;

SJ18:=IF(18,LSJ=18,ZTJ) AND IF(8,DIFF>DEA,0);

DRAWTEXT(SJ18 AND DIFF>0,DIFF*1.2,’18’),COLORFFFFFF;

DRAWTEXT(SJ18 AND DIFF<0,DIFF*0.8,’18’),COLORFFFFFF;

SJ21:=IF(21,LSJ=21,ZTJ) AND IF(21,DIFF>DEA,0);

DRAWTEXT(SJ21 AND DIFF>0,DIFF*1.2,’21’),COLORFFFFFF;

DRAWTEXT(SJ21 AND DIFF<0,DIFF*0.8,’21’),COLORFFFFFF;

SJ26:=IF(26,LSJ=26,ZTJ) AND IF(26,DIFF>DEA,0);

DRAWTEXT(SJ26 AND DIFF>0,DIFF*1.2,’26’),COLORFFFFFF;

DRAWTEXT(SJ26 AND DIFF<0,DIFF*0.8,’26’),COLORFFFFFF;

SJ29:=IF(29,LSJ=29,ZTJ) AND IF(29,DIFF>DEA,0);

DRAWTEXT(SJ29 AND DIFF>0,DIFF*1.2,’29’),COLORFFFFFF;

DRAWTEXT(SJ29 AND DIFF<0,DIFF*0.8,’29’),COLORFFFFFF;

SJ34:=IF(34,LSJ=34,ZTJ) AND IF(34,DIFF>DEA,0);

DRAWTEXT(SJ34 AND DIFF>0,DIFF*1.2,’34’),COLORFFFFFF;

DRAWTEXT(SJ34 AND DIFF<0,DIFF*0.8,’34’),COLORFFFFFF;

SJ47:=IF(47,LSJ=47,ZTJ) AND IF(47,DIFF>DEA,0);

DRAWTEXT(SJ47 AND DIFF>0,DIFF*1.2,’47’),COLORFFFFFF;

DRAWTEXT(SJ47 AND DIFF<0,DIFF*0.8,’47’),COLORFFFFFF;

SJ55:=IF(55,LSJ=55,ZTJ) AND IF(55,DIFF>DEA,0);

DRAWTEXT(SJ55 AND DIFF>0,DIFF*1.2,’55’),COLORFFFFFF;

DRAWTEXT(SJ55 AND DIFF<0,DIFF*0.8,’55’),COLORFFFFFF;

SJ60:=IF(60,LSJ=60,ZTJ) AND IF(60,DIFF>DEA,0);

DRAWTEXT(SJ60 AND DIFF>0,DIFF*1.2,’63’) ,COLORFFFFFF;

DRAWTEXT(SJ60 AND DIFF<0,DIFF*0.8,’63’) ,COLORFFFFFF;

SJ68:=IF(68,LSJ=68,ZTJ) AND IF(68,DIFF>DEA,0);

DRAWTEXT(SJ68 AND DIFF>0,DIFF*1.2,’68’),COLORFFFFFF;

DRAWTEXT(SJ68 AND DIFF<0,DIFF*0.8,’68’) ,COLORFFFFFF;