DIF:EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA:EMA(DIF,MID);
MACD:(DIF-DEA)*2,COLORSTICK;
MACD0 := MACD;
MACD1 := REF(MACD, 1);
MACD2 := REF(MACD, 2);
MACD3 := REF(MACD, 3);
MACD4 := REF(MACD, 4);
MACD5 := REF(MACD, 5);
MACD6 := REF(MACD, 6);
MACD7 := REF(MACD, 7);
MACD8 := REF(MACD, 8);
TOP := MACD4 > 0
AND MACD3 > 0
AND MACD5 > 0
AND MACD4 > MACD3 AND MACD4 > MACD2 AND MACD4 > MACD1
AND MACD4 > MACD5 AND MACD4 > MACD6 AND MACD4 > MACD7
AND MACD4 > MACD0
AND MACD4 > MACD8;
BOT := MACD4 < 0
AND MACD3 < 0
AND MACD5 < 0
AND MACD4 < MACD3 AND MACD4 < MACD2 AND MACD4 < MACD1
AND MACD4 < MACD5 AND MACD4 < MACD6 AND MACD4 < MACD7
AND MACD4 < MACD0
AND MACD4 < MACD8;
DRAWTEXT(TOP,MACD4 * 1 , VAR2STR(MACD4 * 100, 0)),COLORRED;
DRAWTEXT(BOT,MACD4 * 1 , VAR2STR(MACD4 * 100, 0)),COLORGREEN;
DRAWTEXT(ISLASTBAR,MACD * 1 , VAR2STR(MACD * 100, 0)),COLORYELLOW;
DEA:EMA(DIF,MID);
MACD:(DIF-DEA)*2,COLORSTICK;
MACD0 := MACD;
MACD1 := REF(MACD, 1);
MACD2 := REF(MACD, 2);
MACD3 := REF(MACD, 3);
MACD4 := REF(MACD, 4);
MACD5 := REF(MACD, 5);
MACD6 := REF(MACD, 6);
MACD7 := REF(MACD, 7);
MACD8 := REF(MACD, 8);
TOP := MACD4 > 0
AND MACD3 > 0
AND MACD5 > 0
AND MACD4 > MACD3 AND MACD4 > MACD2 AND MACD4 > MACD1
AND MACD4 > MACD5 AND MACD4 > MACD6 AND MACD4 > MACD7
AND MACD4 > MACD0
AND MACD4 > MACD8;
BOT := MACD4 < 0
AND MACD3 < 0
AND MACD5 < 0
AND MACD4 < MACD3 AND MACD4 < MACD2 AND MACD4 < MACD1
AND MACD4 < MACD5 AND MACD4 < MACD6 AND MACD4 < MACD7
AND MACD4 < MACD0
AND MACD4 < MACD8;
DRAWTEXT(TOP,MACD4 * 1 , VAR2STR(MACD4 * 100, 0)),COLORRED;
DRAWTEXT(BOT,MACD4 * 1 , VAR2STR(MACD4 * 100, 0)),COLORGREEN;
DRAWTEXT(ISLASTBAR,MACD * 1 , VAR2STR(MACD * 100, 0)),COLORYELLOW;