将通达信的(双色MACD)修改成大智慧的

股DIF:=EMA(CLOSE,12)-EMA(CLOSE,26),COLORFFFFFF; BV:=SUM((股DIF-EMA(股DIF,9))*4,0); BA:=IF(MAX(BV,REF(BV,2))REF(BV,1),1,0); BC:=BARSLAST(BA)+1; SMACD:=(BV-REF(BV,BC))/(15*1),COLORSTICK; {面积MACD顶底背离} DRAWBAND(SMACD,RGB(88,0,0),0,RGB(100,100,100)); DIF:EMA(CLOSE,12)-EMA(CLOSE,26),COLORFFFFFF; DEA:EMA(DIF,9),COLOR00FFFF; MACD:(DIF-DEA)*2,COLORSTICK; DIFF1:0-DIF,COLORFF00FF,DOTLINE; DEA1:0-DEA,COLOR00FF00,DOTLINE; 求高手将以上通达信的双色MACD修改成大智慧的好吗

爱约股解答：

股DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);

BV:=SUM((股DIF-EMA(股DIF,9))*4,0);

BA:=IF(MAX(BV,REF(BV,2))<REF(BV,1) OR MIN(BV,REF(BV,2))>REF(BV,1),1,0);

BC:=BARSLAST(BA)+1;

SMACD:=(BV-REF(BV,BC))/(15*1);

{面积MACD顶底背离}

FILLRGN(SMACD,0,SMACD>0,RGB(88,0,0),SMACD<=0,RGB(100,100,100));

DIF:EMA(CLOSE,12)-EMA(CLOSE,26),COLORFFFFFF;

DEA:EMA(DIF,9),COLOR00FFFF;

MACD:(DIF-DEA)*2,COLORSTICK;

DIFF1:0-DIF,COLORFF00FF,DOTLINE;

DEA1:0-DEA,COLOR00FF00,DOTLINE;