目前我所看到的最好MACD主图指标（含通用原码）

 

这是我所看到的最好的MACD主图，由理想论坛的闻昕老师创作，自己修改了一下，FH的加了MACD柱子

＝＝＝
原闻昕老师主图指标
一、飞狐版本
{主图MACD&量价评台,参数与MACD同}
INPUT:N(18),S(26),P(12),M(9);{N为考查量变周期,可按个人喜好设置其数值}
a:=EMA(CLOSE,s);
T:=EMA(CLOSE,P);
b:=ema(a,m);
t1:=ema(t,m);
DEA:ema(T-(t1-T),2),colorff8866,LINETHICK2;//蓝,MACD>0,DEA<0
diff:DEA-EMA(((a-b)-(t-t1)),1)*6,colorffff66,LINETHICK2;;
MACD_:STICKLINE(diff>DEA,diff,DEA,0.1,0),COLORccccff;
      STICKLINE(diff<DEA,diff,DEA,0.1,0),COLOREEAA88;
KLINE(O,H,L,C,0);
PARTLINE(a-b<t-t1,DEA),colorred,LINETHICK2;//红,MACD>0,DEA>0
PARTLINE(A>T AND a-b>t-t1,DEA),color00ff00,LINETHICK2;//绿,MACD<0,DEA<0
PARTLINE(A>T AND a-b<t-t1,DEA),colorFF00BB,LINETHICK2;//紫,MACD>0,DEA>0
大量高价线:VALUEWHEN(V>REF(HHV(V,N),1),HIGH),LINETHICK;
小量低价线:VALUEWHEN(V<REF(LLV(V,N),1),L),LINETHICK;
PARTLINE(小量低价线=REF(小量低价线,1),小量低价线),COLORFF00FF;
PARTLINE(大量高价线=REF(大量高价线,1),大量高价线),COLOR00FFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS,SYSPARAM(5),'DEA线变色的意义: ■ 红:MACD＞０,DEA＞０  ■ 紫:MACD＞０,DEA<0  ■ 绿:MACD＜０,DEA＜０  ■ 蓝:MACD＜0,DEA＞０ '),COLORFFCCEE;
 

通达信用

{INPUT:N(18),S(26),P(12),M(9);}
A:=EMA(CLOSE,S);
T:=EMA(CLOSE,P);
B:=EMA(A,M);
T1:=EMA(T,M);
DEA:EMA(T-(T1-T),2),COLORFF8866,LINETHICK2;
DIFF:DEA-EMA(((A-B)-(T-T1)),1)*6,COLORFFFF66,LINETHICK2;
MACD_:STICKLINE(DIFF>DEA,DIFF,DEA,0,0),COLORCCCCFF;
      STICKLINE(DIFF<DEA,DIFF,DEA,0,0),COLOREEAA88;

IF(A-B<T-T1,DEA,DRAWNULL),COLORRED,LINETHICK2;
IF(A>T AND A-B>T-T1,DEA,DRAWNULL),COLOR00FF00,LINETHICK2;
IF(A>T AND A-B<T-T1,DEA,DRAWNULL),COLORFF00BB,LINETHICK2;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);


大量:=HHV(V,N)=V;
小量:=LLV(V,N)=V;
大量高价线:IF(BARSLAST(大量)>0,REF(H,大量),DRAWNULL),COLORFF00FF;
小量低价线:IF(BARSLAST(小量)>0,REF(H,小量),DRAWNULL),COLOR00FFFF;

DZHL2用

INPUT:N(18),S(26),P(12),M(9);
A:=EMA(CLOSE,S);
T:=EMA(CLOSE,P);
B:=EMA(A,M);
T1:=EMA(T,M);
DEA:EMA(T-(T1-T),2),COLORFF8866,LINETHICK2;
DIFF:DEA-EMA(((A-B)-(T-T1)),1)*6,COLORFFFF66,LINETHICK2;
MACD_:STICKLINE(DIFF>DEA,DIFF,DEA,0,0),COLORCCCCFF;
      STICKLINE(DIFF<DEA,DIFF,DEA,0,0),COLOREEAA88;
PARTLINE(DEA,A-B<T-T1,RGB(255,0,0),A>T AND A-B>T-T1,RGB(0,255,0),A>T AND A-B<T-T1,RGB(200,0,255) ),LINETHICK2;
 

我修改的FH的，加了MACD柱子

DRAWGBK(CLOSE=CLOSE,COLORRGB(30,30,60),COLORRGB(30,30,60),1);

em26:=EMA(CLOSE,26);
em12:=EMA(CLOSE,12);
em269:=ema(em26,9);
em129:=ema(em12,9);
DEz:ema(em12-(em129-em12),2),Color4D569F,LINETHICK,PRECISION2;//蓝,MACD>0,DEA<0
diz:DEz-EMA(((em26-em269)-(em12-em129)),1)*6,ColorD87484,LINETHICK,PRECISION2;
FILLRGN(diz>dez,diz,dez),ColorD87484;
FILLRGN(diz<=dez,diz,dez),Color6C7480;
n1:=SYSPARAM(3);
nn:=n1-SYSPARAM(2)+1;
hh:=HHV(c,nn);
ll:=LLV(c,nn);
最高:=hh[n1];
最低:=ll[n1];
中:=最低+(最高-最低)*0.5;
STICKLINE(c,中,中,8,0),COLORGRAY,LINEDOT;
macdz:=(diz-dez)*1;
STICKLINE(diz<DEz and diz<=ref(diz,1),中,中+macdz,0.1,0),Color008080;
STICKLINE(diz<=DEz and diz>ref(diz,1),中,中+macdz,0.1,0),ColorC080FF;
STICKLINE(diz>DEz and diz>ref(diz,1),中,中+macdz,0.1,0),Color400080;
STICKLINE(diz>DEz and diz<=ref(diz,1),中,中+macdz,0.1,0),Color0080FF;

M13:MA(C,13),COLORBROWN,LINETHICK,PRECISION2;
PARTLINE(m13<ref(m13,1),m13),COLORWHITE,LINETHICK2;
PARTLINE(m13>=ref(m13,1),m13),COLORBROWN,LINETHICK2;
PARTLINE(dez>ref(dez,1),dez),Color4D569F,LINETHICK2;
{K线}
STICKLINE(c>o,c,o,9,1 ),COLOr0033CC;
STICKLINE(c<o,c,o,9,1 ),COLORCYAN;
多空:=OPEN;
STICKLINE(CLOSE>多空,HIGH,LOW,2,0),colorFF;
STICKLINE(CLOSE>多空 AND CLOSE>OPEN,OPEN,CLOSE,6.5,0),color102088;
STICKLINE(CLOSE>多空 AND CLOSE>OPEN,OPEN,CLOSE,6,0),color102099;
STICKLINE(CLOSE>多空 AND CLOSE>OPEN,OPEN,CLOSE,5.5,0),color1020AA;
STICKLINE(CLOSE>多空 AND CLOSE>OPEN,OPEN,CLOSE,5,0),color1020BB;
STICKLINE(CLOSE>多空 AND CLOSE>OPEN,OPEN,CLOSE,4,0),color1020CC;
STICKLINE(CLOSE>多空 AND CLOSE>OPEN,OPEN,CLOSE,3,0),color1020DD;
STICKLINE(CLOSE>多空 AND CLOSE>OPEN,OPEN,CLOSE,2,0),color1020EE;
STICKLINE(CLOSE>多空 AND CLOSE>OPEN,OPEN,CLOSE,1,0),color1020FF;
STICKLINE(CLOSE>多空 AND CLOSE<OPEN,OPEN,OPEN,6.5,0),color102088;
STICKLINE(CLOSE>多空 AND CLOSE<OPEN,OPEN,OPEN,6,0),color102099;
STICKLINE(CLOSE>多空 AND CLOSE<OPEN,OPEN,OPEN,5.5,0),color1020AA;
STICKLINE(CLOSE>多空 AND CLOSE<OPEN,OPEN,OPEN,5,0),color1020BB;
STICKLINE(CLOSE>多空 AND CLOSE<OPEN,OPEN,OPEN,4,0),color1020CC;
STICKLINE(CLOSE>多空 AND CLOSE<OPEN,OPEN,OPEN,3,0),color1020DD;
STICKLINE(CLOSE>多空 AND CLOSE<OPEN,OPEN,OPEN,2,0),color1020EE;
STICKLINE(CLOSE>多空 AND CLOSE<OPEN,OPEN,OPEN,1,0),color1020FF;
STICKLINE(CLOSE<多空,HIGH,LOW,2,0),colorFF8800;
STICKLINE(CLOSE<多空 AND CLOSE<OPEN,OPEN,CLOSE,6.5,0),colorFF7700;
STICKLINE(CLOSE<多空 AND CLOSE<OPEN,OPEN,CLOSE,6,0),colorFF8800;
STICKLINE(CLOSE<多空 AND CLOSE<OPEN,OPEN,CLOSE,5.5,0),colorFF9900;
STICKLINE(CLOSE<多空 AND CLOSE<OPEN,OPEN,CLOSE,5,0),colorFFAA00;
STICKLINE(CLOSE<多空 AND CLOSE<OPEN,OPEN,CLOSE,4,0),colorFFBB00;
STICKLINE(CLOSE<多空 AND CLOSE<OPEN,OPEN,CLOSE,3,0),colorFFCC00;
STICKLINE(CLOSE<多空 AND CLOSE<OPEN,OPEN,CLOSE,2,0),colorFFDD00;
STICKLINE(CLOSE<多空 AND CLOSE<OPEN,OPEN,CLOSE,1,0),colorFFEE00;
STICKLINE(CLOSE<多空 AND CLOSE>OPEN,OPEN,OPEN,6.5,0),colorFF7700;
STICKLINE(CLOSE<多空 AND CLOSE>OPEN,OPEN,OPEN,6,0),colorFF8800;
STICKLINE(CLOSE<多空 AND CLOSE>OPEN,OPEN,OPEN,5.5,0),colorFF9900;
STICKLINE(CLOSE<多空 AND CLOSE>OPEN,OPEN,OPEN,5,0),colorFFAA00;
STICKLINE(CLOSE<多空 AND CLOSE>OPEN,OPEN,OPEN,4,0),colorFFBB00;
STICKLINE(CLOSE<多空 AND CLOSE>OPEN,OPEN,OPEN,3,0),colorFFCC00;
STICKLINE(CLOSE<多空 AND CLOSE>OPEN,OPEN,OPEN,2,0),colorFFDD00;
STICKLINE(CLOSE<多空 AND CLOSE>OPEN,OPEN,OPEN,1,0),colorFFEE00;
STICKLINE(CLOSE=多空,OPEN,CLOSE,6.5,0),colorFFFF00;
STICKLINE(CLOSE=多空,HIGH,LOW,2,0),colorFFFF00;
{直线板K}
STICKLINE(HIGH=LOW and CLOSE=OPEN  and (CLOSE/REF(CLOSE,1))>1.048,HIGH,LOW,9,0) ,COLORRED;
STICKLINE(HIGH=LOW and CLOSE=OPEN  and (REF(CLOSE,1)/CLOSE)>1.048,HIGH,LOW,9,0) ,COLOR00FF00;
持股线:MA(C,8);