通达信MACD周期飘带指标公式源码副图

{周macd}
DIF55:(EMA(CLOSE,30)-EMA(CLOSE,90))*0.55;
DEA55:(EMA(DIF55,26));
MACD周:=(DIF55-DEA55)*2, COLORSTICK;
DRAWBAND(DEA55,RGB(135,255,35),DIF55,RGB(240,160,0));
DRAWTEXT(CURRBARSCOUNT=1,DIF55,'--周MACD'),COLORRED;
{日MACD}
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
DRAWBAND(DIFF,RGB(255,80,120),DEA,RGB(21,138,255));
DRAWTEXT(CURRBARSCOUNT=1,DIFF,'--日MACD'),COLOR00FFFF;
{60分MACD}
DIF60:=EMA(CLOSE,12/2)-EMA(CLOSE,26/2);
DEA60:=EMA(DIF60,9/2);
DRAWBAND(DIF60,RGB(120,20,255),DEA60,RGB(80,255,20));
DRAWTEXT(CURRBARSCOUNT=1,DIF60,'--60分钟MACD'),COLORFF00FF;
{30分MACD}
DIF30:=(EMA(CLOSE,10/4)-EMA(CLOSE,20/4)),COLORGREEN,LINETHICK2;
DEA30:=(EMA(DIF30,15/4)),COLORMAGENTA,LINETHICK2;
DRAWBAND(DIF30,RGB(220,50,50),DEA30,RGB(50,120,50));
DRAWTEXT(CURRBARSCOUNT=1,DIF30,'--30分钟MACD'),COLORGREEN;
{日MACD柱}
0,COLORWHITE,DOTLINE;
MACD:(DIFF-DEA)*2,COLORSTICK;
STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,1,1),COLORRED;
STICKLINE(MACD<REF(MACD,1) AND MACD>0,0,MACD,1,1),COLOR4080FF;
STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,1,1),COLORYELLOW;
STICKLINE(MACD<REF(MACD,1) AND MACD<0,0,MACD,1,1),COLORLIGREEN;