Re: ADX DMI Indicators for MT4

306
goldwise wrote: Tue Nov 24, 2020 3:48 am


No, my meaning was to have only 2 colors, and that the gray or now blank bars would be the same color as the current direction.
I just want the color to change when we have the change of direction signal.
The gray or blank bars are useless information for me.
Thanks a lot.
Like this?
These users thanked the author mrtools for the post (total 2):
pipsquirrel, mario_lima

Re: ADX DMI Indicators for MT4

307
mrtools wrote: Tue Nov 24, 2020 4:55 am

Like this?

Hi mrtools,
I don't know what happened, my last post has disappeared, so I want to thank you again for this indicator.
I am now looking for a 4TF version of this same indicator, with alerts when 3 out of 4 TFs are aligned.
Maybe you or someone else can take the time to code it.
Much appreciated.

Re: ADX DMI Indicators for MT4

308
Hello mrtools,
The time to use these indi has expired. "FDM Trend Power"
download/file.php?id=3382991


found this source code on the internet.

Code: Select all

/*
   
*/
#property copyright "Copyright © 2008, Forex Day Monster"
#property link      ""

#property indicator_separate_window

extern int SpreadThreshold = 6;
extern bool Show_D1_ADX = TRUE;

int init() {
   IndicatorShortName("FDM Trend Power (" + Symbol() + ")");
   return (0);
}

int deinit() {
   ObjectsDeleteAll(0, OBJ_LABEL);
   ObjectDelete("FDM Trend Power-1");
   ObjectDelete("FDM Trend Power-2");
   ObjectDelete("FDM Trend Power-3");
   ObjectDelete("FDM Trend Power-4");
   ObjectDelete("FDM Trend Power-5");
   ObjectDelete("FDM Trend Power-6");
   ObjectDelete("FDM Trend Power-7");
   ObjectDelete("FDM Trend Power-8");
   ObjectDelete("FDM Trend Power-9");
   ObjectDelete("FDM Trend Power-10");
   ObjectDelete("FDM Trend Power-11");
   ObjectDelete("FDM Trend Power-12");
   ObjectDelete("FDM Trend Power-2a");
   ObjectDelete("FDM Trend Power-4a");
   ObjectDelete("FDM Trend Power-6a");
   ObjectDelete("FDM Trend Power-8a");
   ObjectDelete("FDM Trend Power-10a");
   ObjectDelete("FDM Trend Power-12a");
   return (0);
}

int start() {
   color l_color_156;
   color l_color_160;
   color l_color_164;
   color l_color_168;
   color l_color_172;
   color l_color_176;
   string l_text_180;
   string l_text_188;
   string l_text_196;
   string l_text_204;
   string l_text_212;
   string l_text_220;
   string ls_0 = "2015.11.01";
   int l_str2time_8 = StrToTime(ls_0);
   if (TimeCurrent() >= l_str2time_8) {
      Alert(" Trial version has expired! Email support@forexprofitmonster.com with broker account number for rights to full version!");
      return (0);
   }
   double l_iadx_12 = iADX(NULL, PERIOD_M5, 14, PRICE_CLOSE, MODE_MAIN, 0);
   double l_iadx_20 = iADX(NULL, PERIOD_M5, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
   double l_iadx_28 = iADX(NULL, PERIOD_M5, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
   double l_iadx_36 = iADX(NULL, PERIOD_M15, 14, PRICE_CLOSE, MODE_MAIN, 0);
   double l_iadx_44 = iADX(NULL, PERIOD_M15, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
   double l_iadx_52 = iADX(NULL, PERIOD_M15, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
   double l_iadx_60 = iADX(NULL, PERIOD_M30, 14, PRICE_CLOSE, MODE_MAIN, 0);
   double l_iadx_68 = iADX(NULL, PERIOD_M30, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
   double l_iadx_76 = iADX(NULL, PERIOD_M30, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
   double l_iadx_84 = iADX(NULL, PERIOD_H1, 14, PRICE_CLOSE, MODE_MAIN, 0);
   double l_iadx_92 = iADX(NULL, PERIOD_H1, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
   double l_iadx_100 = iADX(NULL, PERIOD_H1, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
   double l_iadx_108 = iADX(NULL, PERIOD_H4, 14, PRICE_CLOSE, MODE_MAIN, 0);
   double l_iadx_116 = iADX(NULL, PERIOD_H4, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
   double l_iadx_124 = iADX(NULL, PERIOD_H4, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
   double l_iadx_132 = iADX(NULL, PERIOD_D1, 14, PRICE_CLOSE, MODE_MAIN, 0);
   double l_iadx_140 = iADX(NULL, PERIOD_D1, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
   double l_iadx_148 = iADX(NULL, PERIOD_D1, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
   if (l_iadx_12 < 23.0 && l_iadx_12 != 0.0) l_color_156 = LightSkyBlue;
   if (l_iadx_12 >= 23.0 && l_iadx_20 > l_iadx_28) l_color_156 = Lime;
   if (l_iadx_12 >= 23.0 && l_iadx_20 < l_iadx_28) l_color_156 = Red;
   if (l_iadx_36 < 23.0 && l_iadx_36 != 0.0) l_color_160 = LightSkyBlue;
   if (l_iadx_36 >= 23.0 && l_iadx_44 > l_iadx_52) l_color_160 = Lime;
   if (l_iadx_36 >= 23.0 && l_iadx_44 < l_iadx_52) l_color_160 = Red;
   if (l_iadx_60 < 23.0 && l_iadx_60 != 0.0) l_color_164 = LightSkyBlue;
   if (l_iadx_60 >= 23.0 && l_iadx_68 > l_iadx_76) l_color_164 = Lime;
   if (l_iadx_60 >= 23.0 && l_iadx_68 < l_iadx_76) l_color_164 = Red;
   if (l_iadx_84 < 23.0 && l_iadx_84 != 0.0) l_color_168 = LightSkyBlue;
   if (l_iadx_84 >= 23.0 && l_iadx_92 > l_iadx_100) l_color_168 = Lime;
   if (l_iadx_84 >= 23.0 && l_iadx_92 < l_iadx_100) l_color_168 = Red;
   if (l_iadx_108 < 23.0 && l_iadx_108 != 0.0) l_color_172 = LightSkyBlue;
   if (l_iadx_108 >= 23.0 && l_iadx_116 > l_iadx_124) l_color_172 = Lime;
   if (l_iadx_108 >= 23.0 && l_iadx_116 < l_iadx_124) l_color_172 = Red;
   if (l_iadx_132 < 23.0 && l_iadx_132 != 0.0) l_color_176 = LightSkyBlue;
   if (l_iadx_132 >= 23.0 && l_iadx_140 > l_iadx_148) l_color_176 = Lime;
   if (l_iadx_132 >= 23.0 && l_iadx_140 < l_iadx_148) l_color_176 = Red;
   string l_iadx_228 = l_iadx_12;
   string l_iadx_236 = l_iadx_36;
   string l_iadx_244 = l_iadx_60;
   string l_iadx_252 = l_iadx_84;
   string l_iadx_260 = l_iadx_108;
   string l_iadx_268 = l_iadx_132;
   if (l_iadx_12 < 23.0 && l_iadx_12 != 0.0) l_text_180 = "h";
   if (l_iadx_12 >= 23.0 && l_iadx_12 < 28.0 && l_iadx_20 > l_iadx_28) l_text_180 = "ì";
   if (l_iadx_12 >= 23.0 && l_iadx_12 < 28.0 && l_iadx_20 < l_iadx_28) l_text_180 = "î";
   if (l_iadx_12 >= 28.0 && l_iadx_20 > l_iadx_28) l_text_180 = "é";
   if (l_iadx_12 >= 28.0 && l_iadx_20 < l_iadx_28) l_text_180 = "ê";
   if (l_iadx_36 < 23.0 && l_iadx_36 != 0.0) l_text_188 = "h";
   if (l_iadx_36 >= 23.0 && l_iadx_36 < 28.0 && l_iadx_44 > l_iadx_52) l_text_188 = "ì";
   if (l_iadx_36 >= 23.0 && l_iadx_36 < 28.0 && l_iadx_44 < l_iadx_52) l_text_188 = "î";
   if (l_iadx_36 >= 28.0 && l_iadx_44 > l_iadx_52) l_text_188 = "é";
   if (l_iadx_36 >= 28.0 && l_iadx_44 < l_iadx_52) l_text_188 = "ê";
   if (l_iadx_60 < 23.0 && l_iadx_60 != 0.0) l_text_196 = "h";
   if (l_iadx_60 >= 23.0 && l_iadx_60 < 28.0 && l_iadx_68 > l_iadx_76) l_text_196 = "ì";
   if (l_iadx_60 >= 23.0 && l_iadx_60 < 28.0 && l_iadx_68 < l_iadx_76) l_text_196 = "î";
   if (l_iadx_60 >= 28.0 && l_iadx_68 > l_iadx_76) l_text_196 = "é";
   if (l_iadx_60 >= 28.0 && l_iadx_68 < l_iadx_76) l_text_196 = "ê";
   if (l_iadx_84 < 23.0 && l_iadx_84 != 0.0) l_text_204 = "h";
   if (l_iadx_84 >= 23.0 && l_iadx_84 < 28.0 && l_iadx_92 > l_iadx_100) l_text_204 = "ì";
   if (l_iadx_84 >= 23.0 && l_iadx_84 < 28.0 && l_iadx_92 < l_iadx_100) l_text_204 = "î";
   if (l_iadx_84 >= 28.0 && l_iadx_92 > l_iadx_100) l_text_204 = "é";
   if (l_iadx_84 >= 28.0 && l_iadx_92 < l_iadx_100) l_text_204 = "ê";
   if (l_iadx_108 < 23.0 && l_iadx_108 != 0.0) l_text_212 = "h";
   if (l_iadx_108 >= 23.0 && l_iadx_108 < 28.0 && l_iadx_116 > l_iadx_124) l_text_212 = "ì";
   if (l_iadx_108 >= 23.0 && l_iadx_108 < 28.0 && l_iadx_116 < l_iadx_124) l_text_212 = "î";
   if (l_iadx_108 >= 28.0 && l_iadx_116 > l_iadx_124) l_text_212 = "é";
   if (l_iadx_108 >= 28.0 && l_iadx_116 < l_iadx_124) l_text_212 = "ê";
   if (l_iadx_132 < 23.0 && l_iadx_132 != 0.0) l_text_220 = "h";
   if (l_iadx_132 >= 23.0 && l_iadx_132 < 28.0 && l_iadx_140 > l_iadx_148) l_text_220 = "ì";
   if (l_iadx_132 >= 23.0 && l_iadx_132 < 28.0 && l_iadx_140 < l_iadx_148) l_text_220 = "î";
   if (l_iadx_132 >= 28.0 && l_iadx_140 > l_iadx_148) l_text_220 = "é";
   if (l_iadx_132 >= 28.0 && l_iadx_140 < l_iadx_148) l_text_220 = "ê";
   ObjectCreate("FDM Trend Power-1", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
   ObjectSetText("FDM Trend Power-1", "5 Min:", 9, "Lucida Sans Regular", LightSteelBlue);
   ObjectSet("FDM Trend Power-1", OBJPROP_CORNER, 0);
   ObjectSet("FDM Trend Power-1", OBJPROP_XDISTANCE, 185);
   ObjectSet("FDM Trend Power-1", OBJPROP_YDISTANCE, 2);
   ObjectCreate("FDM Trend Power-2", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
   ObjectSetText("FDM Trend Power-2", " ADX " + StringSubstr(l_iadx_228, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_156);
   ObjectSet("FDM Trend Power-2", OBJPROP_CORNER, 0);
   ObjectSet("FDM Trend Power-2", OBJPROP_XDISTANCE, 225);
   ObjectSet("FDM Trend Power-2", OBJPROP_YDISTANCE, 2);
   ObjectCreate("FDM Trend Power-2a", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
   ObjectSetText("FDM Trend Power-2a", l_text_180, 9, "Wingdings", l_color_156);
   ObjectSet("FDM Trend Power-2a", OBJPROP_CORNER, 0);
   ObjectSet("FDM Trend Power-2a", OBJPROP_XDISTANCE, 288);
   ObjectSet("FDM Trend Power-2a", OBJPROP_YDISTANCE, 2);
   ObjectCreate("FDM Trend Power-3", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
   ObjectSetText("FDM Trend Power-3", "15 Min:", 9, "Lucida Sans Regular", LightSteelBlue);
   ObjectSet("FDM Trend Power-3", OBJPROP_CORNER, 0);
   ObjectSet("FDM Trend Power-3", OBJPROP_XDISTANCE, 318);
   ObjectSet("FDM Trend Power-3", OBJPROP_YDISTANCE, 2);
   ObjectCreate("FDM Trend Power-4", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
   ObjectSetText("FDM Trend Power-4", " ADX " + StringSubstr(l_iadx_236, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_160);
   ObjectSet("FDM Trend Power-4", OBJPROP_CORNER, 0);
   ObjectSet("FDM Trend Power-4", OBJPROP_XDISTANCE, 363);
   ObjectSet("FDM Trend Power-4", OBJPROP_YDISTANCE, 2);
   ObjectCreate("FDM Trend Power-4a", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
   ObjectSetText("FDM Trend Power-4a", l_text_188, 9, "Wingdings", l_color_160);
   ObjectSet("FDM Trend Power-4a", OBJPROP_CORNER, 0);
   ObjectSet("FDM Trend Power-4a", OBJPROP_XDISTANCE, 426);
   ObjectSet("FDM Trend Power-4a", OBJPROP_YDISTANCE, 2);
   ObjectCreate("FDM Trend Power-5", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
   ObjectSetText("FDM Trend Power-5", "M30:", 9, "Lucida Sans Regular", LightSteelBlue);
   ObjectSet("FDM Trend Power-5", OBJPROP_CORNER, 0);
   ObjectSet("FDM Trend Power-5", OBJPROP_XDISTANCE, 456);
   ObjectSet("FDM Trend Power-5", OBJPROP_YDISTANCE, 2);
   ObjectCreate("FDM Trend Power-6", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
   ObjectSetText("FDM Trend Power-6", " ADX " + StringSubstr(l_iadx_244, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_164);
   ObjectSet("FDM Trend Power-6", OBJPROP_CORNER, 0);
   ObjectSet("FDM Trend Power-6", OBJPROP_XDISTANCE, 490);
   ObjectSet("FDM Trend Power-6", OBJPROP_YDISTANCE, 2);
   ObjectCreate("FDM Trend Power-6a", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
   ObjectSetText("FDM Trend Power-6a", l_text_196, 9, "Wingdings", l_color_164);
   ObjectSet("FDM Trend Power-6a", OBJPROP_CORNER, 0);
   ObjectSet("FDM Trend Power-6a", OBJPROP_XDISTANCE, 553);
   ObjectSet("FDM Trend Power-6a", OBJPROP_YDISTANCE, 2);
   ObjectCreate("FDM Trend Power-7", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
   ObjectSetText("FDM Trend Power-7", "1 Hr:", 9, "Lucida Sans Regular", LightSteelBlue);
   ObjectSet("FDM Trend Power-7", OBJPROP_CORNER, 0);
   ObjectSet("FDM Trend Power-7", OBJPROP_XDISTANCE, 580);
   ObjectSet("FDM Trend Power-7", OBJPROP_YDISTANCE, 2);
   ObjectCreate("FDM Trend Power-8", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
   ObjectSetText("FDM Trend Power-8", " ADX " + StringSubstr(l_iadx_252, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_168);
   ObjectSet("FDM Trend Power-8", OBJPROP_CORNER, 0);
   ObjectSet("FDM Trend Power-8", OBJPROP_XDISTANCE, 610);
   ObjectSet("FDM Trend Power-8", OBJPROP_YDISTANCE, 2);
   ObjectCreate("FDM Trend Power-8a", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
   ObjectSetText("FDM Trend Power-8a", l_text_204, 9, "Wingdings", l_color_168);
   ObjectSet("FDM Trend Power-8a", OBJPROP_CORNER, 0);
   ObjectSet("FDM Trend Power-8a", OBJPROP_XDISTANCE, 672);
   ObjectSet("FDM Trend Power-8a", OBJPROP_YDISTANCE, 2);
   ObjectCreate("FDM Trend Power-9", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
   ObjectSetText("FDM Trend Power-9", "4 Hr:", 9, "Lucida Sans Regular", LightSteelBlue);
   ObjectSet("FDM Trend Power-9", OBJPROP_CORNER, 0);
   ObjectSet("FDM Trend Power-9", OBJPROP_XDISTANCE, 702);
   ObjectSet("FDM Trend Power-9", OBJPROP_YDISTANCE, 2);
   ObjectCreate("FDM Trend Power-10", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
   ObjectSetText("FDM Trend Power-10", " ADX " + StringSubstr(l_iadx_260, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_172);
   ObjectSet("FDM Trend Power-10", OBJPROP_CORNER, 0);
   ObjectSet("FDM Trend Power-10", OBJPROP_XDISTANCE, 732);
   ObjectSet("FDM Trend Power-10", OBJPROP_YDISTANCE, 2);
   ObjectCreate("FDM Trend Power-10a", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
   ObjectSetText("FDM Trend Power-10a", l_text_212, 9, "Wingdings", l_color_172);
   ObjectSet("FDM Trend Power-10a", OBJPROP_CORNER, 0);
   ObjectSet("FDM Trend Power-10a", OBJPROP_XDISTANCE, 793);
   ObjectSet("FDM Trend Power-10a", OBJPROP_YDISTANCE, 2);
   if (Show_D1_ADX == TRUE) {
      ObjectCreate("FDM Trend Power-11", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
      ObjectSetText("FDM Trend Power-11", "1 Day:", 9, "Lucida Sans Regular", LightSteelBlue);
      ObjectSet("FDM Trend Power-11", OBJPROP_CORNER, 0);
      ObjectSet("FDM Trend Power-11", OBJPROP_XDISTANCE, 823);
      ObjectSet("FDM Trend Power-11", OBJPROP_YDISTANCE, 2);
      ObjectCreate("FDM Trend Power-12", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
      ObjectSetText("FDM Trend Power-12", " ADX " + StringSubstr(l_iadx_268, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_176);
      ObjectSet("FDM Trend Power-12", OBJPROP_CORNER, 0);
      ObjectSet("FDM Trend Power-12", OBJPROP_XDISTANCE, 863);
      ObjectSet("FDM Trend Power-12", OBJPROP_YDISTANCE, 2);
      ObjectCreate("FDM Trend Power-12a", OBJ_LABEL, WindowFind("FDM Trend Power (" + Symbol() + ")"), 0, 0);
      ObjectSetText("FDM Trend Power-12a", l_text_220, 9, "Wingdings", l_color_176);
      ObjectSet("FDM Trend Power-12a", OBJPROP_CORNER, 0);
      ObjectSet("FDM Trend Power-12a", OBJPROP_XDISTANCE, 923);
      ObjectSet("FDM Trend Power-12a", OBJPROP_YDISTANCE, 2);
   }
   return (0);
}

But it shows a couple of errors and I have no idea about programming.
Maybe you can get this indicator going again.
Unfortunately I have not found another ADX dashboard with exact ADX values.
I don't know if it's too much to ask; if + DI and -DI are also displayed the values (not visual, just the exact values)
Thanks
Skyold
We create order out of chaos - we trade that order, but sometimes that chaos is out of order, so we WAIT!!! for the order to return - and we trade again. XARD777

Re: ADX DMI Indicators for MT4

309
mrtools wrote: Tue Nov 24, 2020 3:35 am

Like this?
Hello mrtools,

1. Please create a histo version of the regular ADX (MT4) without any average method (type CLOSE). Only the period setting and level. 2 colors and bar width (like this indi)
2. If possible: at the intersection of + DI and -DI, ​​the setting for the level
for example only highlight the intersections above level 20 (third color)
Thank you very much
Sykold
We create order out of chaos - we trade that order, but sometimes that chaos is out of order, so we WAIT!!! for the order to return - and we trade again. XARD777


Who is online

Users browsing this forum: ChatGPT [Bot], DotNetDotCom [Bot], Mickey Abi, SEMrush [Bot], Tur005, vvFish and 93 guests