通达信日周MACD同图（日线公式）

日周MACD同图（日线公式）

本副图公式同时显示日线MACD图形和周线MACD图形。注意，周线MACD图形相当于被机械地黏贴到日线分析图中来。换句话说，如果你比较在本公式中显示的周线macd图形和在周线图中看到的macd图形，它们在外表上是一模一样的。
 现在，除了在最右边K线位置上日与周在时间上还对应外，其他位置就“差之千里”了：最右边的K线位置是日线的“今天”和周线的“本周”，前一条K线位置是日线的“昨天”和周线的“上一周”，… 如此下去，倒数第n条K线是倒数第n天和倒数第n周，时间上就越差越远了。
 还有，你不要用纵坐标值看周线macd曲线的数值，本公式主要是为了在日线macd指标中同时观察周线MACD曲线的趋势。当然，如果你确想知道倒数第n条周K线上的周线MACD的具体数值，就把光标移到本图的第n条K线位置上，看顶行显示的后4个数据：该周日期（倒数第n周周末交易日的日期）WDate、WDif、WDea、和WMacd值。这些值是准确的、没有变换的周线macd值。

声明：本公式发布前没有搜索本论坛。如果与已有公式雷同，纯属巧合。

{WD_MACD}
 DDATE:DATE,NODRAW,COLOR0000FF;
 DIF:EMA(C,12)-EMA(C,26),COLORFF00FF;
 DEA:EMA(DIF,9),COLORFF00FF;
 MACD:(DIF-DEA)*2,COLORFF00FF,NODRAW;
 NOTEXTMACD:MACD,COLORSTICK;
 TESTSKIP(PERIOD!=5);
 D1:=DATE;
 DIF1:=MACD.DIF#WEEK;
 DEA1:=MACD.DEA#WEEK;
 WEK:=REFX(WEEKDAY<REF(WEEKDAY,1) OR
 DATETODAY(DATE)-DATETODAY(REF(DATE,1))>=7,1) OR ISLASTBAR;
 D2:=IF(WEK,D1,DRAWNULL);
 DIF2:=IF(WEK,DIF1,DRAWNULL);
 DEA2:=IF(WEK,DEA1,DRAWNULL);
 WDATE:ALIGNRIGHT(D2),NODRAW,COLOR00BB99;
 WDIF:ALIGNRIGHT(DIF2),NODRAW,COLOR00FF99;
 WDEA:ALIGNRIGHT(DEA2),NODRAW,COLOR00FF99;
 WMACD:(WDIF-WDEA)*2,NODRAW,COLOR00FF99;
 A1:=CONST(LLV(MACD,150))*2;
 Q:=0.6;
 NOTEXT0:0,COLOR0000FF;
 NOTEXT1:A1,COLOR336699,DOTLINE;
 STICKLINE(MACD>0,0,MACD,1,0),COLOR0000AA;
 STICKLINE(MACD<0,0,MACD,1,0),COLORFF0033;
 STICKLINE(WMACD>0,A1,WMACD*Q+A1,0,-1),COLOR0099FF;
 STICKLINE(WMACD<0,A1,WMACD*Q+A1,0,-1),COLOR999900;
 NOTEXT1A:WDIF*Q+A1,COLOR00FF99,DOTLINE;
 NOTEXT1B:WDEA*Q+A1,COLOR00FF99,DOTLINE;
 NOTEXTA:DIF,COLORFF00FF,LINETHICK2;
 NOTEXTB:DEA,COLORFF00FF,LINETHICK2;