通达信MACD多周期同显公式.MACD面积计算

给大家发一个我经常在用的MACD多周线共显示指标.还有面积计算哦.
    作用是,显示在5分周线下,显示5分MACD王白线与30分王白线..
 
 DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIF,9);
MACD:(DIF-DEA)*2,COLORSTICK;
红面积:SUM(MACD,BARSLAST(MACD<0))*1,COLOR0000FF,NODRAW;
绿面积:SUM(MACD,BARSLAST(MACD>0))*1,COLORFFFF00,NODRAW;
AA:=ROUND(REF(绿面积,1)*100);
BB:=ROUND(REF(红面积,1)*100);
DRAWNUMBER(CROSS(0,MACD),HHV(REF(MACD,1),5)+0.03,ABS(BB)),COLORMAGENTA;
DRAWNUMBER(CROSS(MACD,0),LLV(REF(MACD,1),5)-0.03,ABS(AA)),COLORGREEN;

DIFF:EMA(CLOSE,72)-EMA(CLOSE,156);
DE:EMA(DIFF,24);
IF(DIFF>REF(DIFF,1),DIFF,DRAWNULL),COLORRED;