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);
TOP := MACD3 > 0
AND MACD2 > 0
AND MACD4 > 0
AND MACD3 > MACD2 AND MACD3 > MACD1
AND MACD3 > MACD4 AND MACD3 > MACD5
AND MACD3 > MACD6
AND MACD3 > MACD0;
BOT := MACD3 < 0
AND MACD2 < 0
AND MACD4 < 0
AND MACD3 < MACD2 AND MACD3 < MACD1
AND MACD3 < MACD4 AND MACD3 < MACD5
AND MACD3 < MACD6
AND MACD3 < MACD0;
DRAWTEXT(TOP,MACD3 * 1 , VAR2STR(MACD3 * 100, 0)),COLORRED;
DRAWTEXT(BOT,MACD3 * 1 , VAR2STR(MACD3 * 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);
TOP := MACD3 > 0
AND MACD2 > 0
AND MACD4 > 0
AND MACD3 > MACD2 AND MACD3 > MACD1
AND MACD3 > MACD4 AND MACD3 > MACD5
AND MACD3 > MACD6
AND MACD3 > MACD0;
BOT := MACD3 < 0
AND MACD2 < 0
AND MACD4 < 0
AND MACD3 < MACD2 AND MACD3 < MACD1
AND MACD3 < MACD4 AND MACD3 < MACD5
AND MACD3 < MACD6
AND MACD3 < MACD0;
DRAWTEXT(TOP,MACD3 * 1 , VAR2STR(MACD3 * 100, 0)),COLORRED;
DRAWTEXT(BOT,MACD3 * 1 , VAR2STR(MACD3 * 100, 0)),COLORGREEN;
DRAWTEXT(ISLASTBAR,MACD * 1 , VAR2STR(MACD * 100, 0)),COLORYELLOW;