以下是通达信周k线叠加周MACD源码

{}
 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;

声明：本站所有文章，如无特殊说明或标注，均为本站原创发布。任何个人或组织，在未征得本站同意时，禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益，可联系我们进行处理。