input:n(9,3,100),m1(3,1,30),m2(3,1,30);
X:=ema(CLOSE/"SH1A0001$CLOSE"*1000,3);
LX:=ema(LOW/"SH1A0001$LOW"*1000,3);
HX:=ema(HIGH/"SH1A0001$HIGH"*1000,3);
HH:=hhv(hx,n);  
LL:=llv(lx,n);
Z:=(hh+ll)/2;  
k:sma((x-Z)/Z*100,m1,1);
d:sma(k,m2,1);
MACD :=2*(k-d),colorstick;
bbK:=K-ref(K,1);
bbD:=D-ref(D,1);
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,5,0),colorgreen;
STICKLINE(MACD<ref(MACD,1)and MACD<0,0,MACD,5,0),color009999;
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,5,0),COLOR0099FF;
STICKLINE(MACD>ref(MACD,1)and MACD>0,0,MACD,5,0),COLORCC99FF;
PARTLINE(bbD>0,D),coloryellow,LINETHICK2;
PARTLINE(bbD<=0,D),color00ff33,LINETHICK2;
PARTLINE(bbK>0,K),colorcc00ff,LINETHICK2;
PARTLINE(bbK<=0,K),colorcyan,LINETHICK2;

X:=ema(CLOSE/"SH1A0001$CLOSE"*1000,3);
LX:=ema(LOW/"SH1A0001$LOW"*1000,3);
HX:=ema(HIGH/"SH1A0001$HIGH"*1000,3);
HH:=hhv(hx,n);  
LL:=llv(lx,n);
Z:=(hh+ll)/2;  
k:sma((x-Z)/Z*100,m1,1);
d:sma(k,m2,1);
MACD :=2*(k-d),colorstick;
bbK:=K-ref(K,1);
bbD:=D-ref(D,1);
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,5,0),colorgreen;
STICKLINE(MACD<ref(MACD,1)and MACD<0,0,MACD,5,0),color009999;
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,5,0),COLOR0099FF;
STICKLINE(MACD>ref(MACD,1)and MACD>0,0,MACD,5,0),COLORCC99FF;
PARTLINE(bbD>0,D),coloryellow,LINETHICK2;
PARTLINE(bbD<=0,D),color00ff33,LINETHICK2;
PARTLINE(bbK>0,K),colorcc00ff,LINETHICK2;
PARTLINE(bbK<=0,K),colorcyan,LINETHICK2;

没动？
改成大智慧2的也行！！

N:=9;M1:=3;M2:=3;
X:=EMA(CLOSE/"999999$CLOSE"*1000,3);
LX:=EMA(LOW/"999999$LOW"*1000,3);
HX:=EMA(HIGH/"999999$HIGH"*1000,3);
HH:=HHV(HX,N);  
LL:=LLV(LX,N);
Z:=(HH+LL)/2;  
K:SMA((X-Z)/Z*100,M1,1);
D:SMA(K,M2,1);
MACD :=2*(K-D),COLORSTICK;
BBK:=K-REF(K,1);
BBD:=D-REF(D,1);
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,2,0),COLORGREEN;
STICKLINE(MACD<REF(MACD,1)AND MACD<0,0,MACD,2,0),COLOR009999;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,2,0),COLOR0099FF;
STICKLINE(MACD>REF(MACD,1)AND MACD>0,0,MACD,2,0),COLORCC99FF;
IF(BBD>0,D,DRAWNULL),COLORYELLOW,LINETHICK2;
IF(BBD<=0,D,DRAWNULL),COLOR00FF33,LINETHICK2;
IF(BBK>0,K,DRAWNULL),COLORCC00FF,LINETHICK2;
IF(BBK<=0,K,DRAWNULL),COLORCYAN,LINETHICK2;

谢谢沉出晚菊老师

dzh2
input:n(9,3,100),m1(3,1,30),m2(3,1,30);
X:=ema(CLOSE/"SH1A0001$CLOSE"*1000,3);
LX:=ema(LOW/"SH1A0001$LOW"*1000,3);
HX:=ema(HIGH/"SH1A0001$HIGH"*1000,3);
HH:=hhv(hx,n);  
LL:=llv(lx,n);
Z:=(hh+ll)/2;  
k:sma((x-Z)/Z*100,m1,1);
d:sma(k,m2,1);
MACD:2*(k-d),colorstick;
bbK:=K-ref(K,1);
bbD:=D-ref(D,1);
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,5,0),colorgreen;
STICKLINE(MACD<ref(MACD,1)and MACD<0,0,MACD,5,0),color009999;
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,5,0),COLOR0099FF;
STICKLINE(MACD>ref(MACD,1)and MACD>0,0,MACD,5,0),COLORCC99FF;
PARTLINE(D,bbD>0),coloryellow,LINETHICK2;
PARTLINE(D,bbD<=0),color00ff33,LINETHICK2;
PARTLINE(K,bbK>0),colorcc00ff,LINETHICK2;
PARTLINE(K,bbK<=0),colorcyan,LINETHICK2;

谢谢荣逸老师!
大智慧2能够用，通达信无显示！