通达信周k线叠加周macd源码贴图

两个指标

周k线+周macd指标：就是周k线图和周macd叠加在同一图里，在日线图显示，效果和周线图一样

周macd副图:可以在日线图显示，效果和周线图一样。

指标在日线图看时，每一根k线代表一周，macd也一样

p.s. 原创的不是我，我只是把别人的公式修改一下.....
 

在日线图显示效果，上面是日k线图,下面是周k线图（每一个k线代表一周）
 

在周线图的显示效果,上边是系统默认的周k图,下边是我的
{}
DRAWGBK(O>=0,RGB(0,1,0),RGB(30,31,30),0,'0',0);
{}
MON:=WEEKOFYEAR!=REF(WEEKOFYEAR,1);
MC2:=IF(MON,C#WEEK,DRAWNULL);
ML2:=IF(MON,L#WEEK,DRAWNULL);
MO2:=IF(MON,O#WEEK,DRAWNULL);
MH2:=IF(MON,H#WEEK,DRAWNULL);
周开:ALIGNRIGHT(MO2),NODRAW,COLORGRAY;
周收:ALIGNRIGHT(MC2),NODRAW,COLORGRAY;
周高:ALIGNRIGHT(MH2),NODRAW,COLORGRAY;
周低:ALIGNRIGHT(ML2),NODRAW,COLORGRAY;
{}
DIFZ:=EMA(周收,12)-EMA(周收,26);
DEAZ:=EMA(DIFZ,9);
MACDZ:=4*(DIFZ-DEAZ);
{}
中轴:REFDATE(HHV(周高,52),DATE),COLORGRAY;
{}
DRAWBAND(DIFZ*2+中轴,RGB(255,128,0),EMA(DIFZ*2+中轴,9),RGB(0,128,192));
{}
STICKLINE((中轴+MACDZ)>中轴 AND (中轴+MACDZ)>REF(中轴+MACDZ,1),中轴,中轴+MACDZ,0.8,0),COLOR000096;
STICKLINE((中轴+MACDZ)>中轴 AND (中轴+MACDZ)<=REF(中轴+MACDZ,1),中轴,中轴+MACDZ,0.8,0),COLOR009600;
STICKLINE((中轴+MACDZ)<=中轴 AND (中轴+MACDZ)<=REF(中轴+MACDZ,1),中轴,中轴+MACDZ,0.8,0),COLOR009600;
STICKLINE((中轴+MACDZ)<=中轴 AND (中轴+MACDZ)>REF(中轴+MACDZ,1),中轴,中轴+MACDZ,0.8,0),COLOR000096;
{}
DRAWKLINE(周高,周开,周低,周收);
{}
MA5周:MA(周收,5)COLORWHITE;
MA10周:MA(周收,10)COLORYELLOW;
MA20周:MA(周收,20)COLORMAGENTA;
MA60周:MA(周收,60)COLORGREEN;