Jump to content

SuperADX MQ4 indicator.......can anyone convert this to amibroker afl.......HELP

praveenkumar

By praveenkumar
in MetaTrader Expert Advisors

 Share

Recommended Posts

praveenkumar Newbie

praveenkumar

Posted
Posted

Can someone please convert this MT4 indicator into Amibroker AFL..or atleast show me a way or guide me to convert this into amibroker afl I'm not a coder though..indicator name is SUPERADX and looks good and could be of great help in trading.....

 

http://www.superadx.com/images/RedBar_example1a.png

 

http://www.superadx.com/images/RedBar_example2.png

 

http://www.superadx.com/images/RedBar_example3.png

 

http://www.forexagone.com/forum/images/g2360ac.jpg

 

http://www.forexagone.com/forum/images/g2299hb.jpg

 

/*
  Generated by EX4-TO-MQ4 decompiler V4.0.224.1 []
  Website: http://purebeam.biz
  E-mail : [email protected]
*/

#property indicator_separate_window
#property indicator_buffers 5
#property indicator_color1 Yellow
#property indicator_color2 Magenta
#property indicator_color3 Red
#property indicator_color4 DarkOrange
#property indicator_color5 DarkViolet

/*#import "MT4.SuperADX_Indicator.dll"
  bool Activate(int a0, int a1, string a2);
  string GetLastErrorDescription();
#import*/

//extern string License = "Enter License key here";
extern int WhiteBarTrigger = 35;
extern int RedBarTrigger = 10;
extern int WavePeriod = 10;
extern int AvgPeriod = 21;
extern bool SoundAlert = FALSE;
extern bool EmailAlert = FALSE;
extern int NumberOfBarsToUse = 500;
double g_ibuf_112[];
double g_ibuf_116[];
double g_ibuf_120[];
double g_ibuf_124[];
double g_ibuf_128[];
double gda_132[];
double gda_136[];
double gda_140[];
double gda_144[];
double gda_148[];
double gda_152[];
double gda_156[];
double gda_160[];
int gi_164 = -50;
int gi_168 = 53;
int gi_172;
bool gi_176 = FALSE;
bool gi_180 = FALSE;
string gs_184;

int init() {
  int li_8;
  string ls_0 = "!SuperADX";
  IndicatorShortName(ls_0);
  ArrayResize(gda_140, Bars);
  ArrayResize(gda_152, Bars);
  ArrayResize(gda_144, Bars);
  ArrayResize(gda_148, Bars);
  ArrayResize(gda_132, Bars);
  ArrayResize(gda_136, Bars);
  ArrayResize(gda_156, Bars);
  ArrayResize(gda_160, Bars);
  SetIndexBuffer(0, g_ibuf_124);
  SetIndexBuffer(1, g_ibuf_120);
  SetIndexBuffer(2, g_ibuf_116);
  SetIndexBuffer(3, g_ibuf_112);
  SetIndexBuffer(4, g_ibuf_128);
  SetIndexLabel(0, "Yellow Bar 53");
  SetIndexLabel(1, "Magenta Bar 53");
  SetIndexLabel(2, "Red Bar 53");
  SetIndexLabel(3, "DarkOrange Bar 53");
  SetIndexLabel(4, "DarkViolet Bar 53");
  SetIndexEmptyValue(0, 0);
  SetIndexEmptyValue(0, 1);
  SetIndexEmptyValue(0, 2);
  SetIndexEmptyValue(0, 3);
  SetIndexEmptyValue(0, 4);
  SetIndexDrawBegin(0, 1);
  SetIndexDrawBegin(1, 1);
  SetIndexDrawBegin(2, 1);
  SetIndexDrawBegin(3, 1);
  SetIndexDrawBegin(4, 1);
  SetIndexStyle(0, DRAW_HISTOGRAM, STYLE_SOLID, 4);
  SetIndexStyle(1, DRAW_HISTOGRAM, STYLE_SOLID, 4);
  SetIndexStyle(2, DRAW_HISTOGRAM, STYLE_SOLID, 4);
  SetIndexStyle(3, DRAW_HISTOGRAM, STYLE_SOLID, 4);
  SetIndexStyle(4, DRAW_HISTOGRAM, STYLE_SOLID, 4);
  /*if (IsDemo()) li_8 = 1;
  else li_8 = 2;
  if (AccountNumber() == 0) gi_176 = TRUE;
  gi_180 = Activate(AccountNumber(), li_8, License);
  gs_184 = GetLastErrorDescription();*/
  return (0);
}

int deinit() {
  return (0);
}

int start() {
  //int li_unused_0;
  int li_4;
  double l_ima_on_arr_8;
  int li_16;
  bool li_48;
  bool l_bool_52;
  bool l_bool_56;
  /*if (gi_176) {
     if (AccountNumber() == 0) {
        Comment("Connecting to server...");
        return (0);
     }
     gi_176 = FALSE;
     if (IsDemo()) li_unused_0 = 1;
     else li_unused_0 = 2;
     gi_180 = TRUE;
     gs_184 = GetLastErrorDescription();
     li_4 = 0;
  } else 
  if (gi_180 == FALSE) {
     Comment(gs_184);
     return (0);
  }
  Comment("License Activated");*/
  double l_icustom_20 = 0;
  double l_icustom_28 = 0;
  double l_icustom_36 = 0;
  li_4 = IndicatorCounted();
  if (li_4 < 0) return (-1);
  if (li_4 > 0) li_4--;
  if (NumberOfBarsToUse == 0) li_16 = Bars - 1;
  else li_16 = NumberOfBarsToUse;
  for (int li_44 = li_16; li_44 > 0; li_44--) {
     gda_140[li_44] = iMA(NULL, 0, WavePeriod, 0, MODE_EMA, PRICE_TYPICAL, li_44);
     ArraySetAsSeries(gda_140, TRUE);
  }
  for (li_44 = li_16; li_44 > 0; li_44--) {
     gda_152[li_44] = MathAbs((iHigh(NULL, 0, li_44) + iClose(NULL, 0, li_44) + iLow(NULL, 0, li_44)) / 3.0 - gda_140[li_44]);
     ArraySetAsSeries(gda_152, TRUE);
  }
  for (li_44 = li_16; li_44 > 0; li_44--) {
     l_ima_on_arr_8 = iMAOnArray(gda_152, 0, WavePeriod, 0, MODE_EMA, li_44);
     gda_144[li_44] = l_ima_on_arr_8;
     ArraySetAsSeries(gda_144, TRUE);
  }
  for (li_44 = li_16; li_44 > 0; li_44--) {
     if (gda_144[li_44] > 0.0) gda_148[li_44] = ((iHigh(NULL, 0, li_44) + iClose(NULL, 0, li_44) + iLow(NULL, 0, li_44)) / 3.0 - gda_140[li_44]) / (0.015 * gda_144[li_44]);
     else gda_148[li_44] = 0;
     ArraySetAsSeries(gda_148, TRUE);
  }
  for (li_44 = li_16; li_44 > 0; li_44--) {
     l_ima_on_arr_8 = iMAOnArray(gda_148, 0, AvgPeriod, 0, MODE_EMA, li_44);
     gda_132[li_44] = l_ima_on_arr_8;
     ArraySetAsSeries(gda_132, TRUE);
  }
  for (li_44 = li_16; li_44 > 0; li_44--) {
     l_ima_on_arr_8 = iMAOnArray(gda_132, 0, 4, 0, MODE_SMA, li_44);
     gda_136[li_44] = l_ima_on_arr_8;
     ArraySetAsSeries(gda_136, TRUE);
  }
  for (li_44 = li_16 - 1; li_44 > 0; li_44--) {
     if (gda_132[li_44] >= gda_136[li_44] && gda_132[li_44 + 1] <= gda_136[li_44 + 1] && gda_132[li_44] <= gi_164) gda_156[li_44] = 1;
     else gda_156[li_44] = 0;
     if (gda_132[li_44] <= gda_136[li_44] && gda_132[li_44 + 1] >= gda_136[li_44 + 1] && gda_132[li_44] >= gi_168) gda_160[li_44] = 1;
     else gda_160[li_44] = 0;
  }
  for (li_44 = li_16 - 2; li_44 > 0; li_44--) {
     l_icustom_20 = iCustom(NULL, 0, "!SupportingADX", 14, NumberOfBarsToUse, 0, li_44);
     l_icustom_28 = iCustom(NULL, 0, "!SupportingADX", 14, NumberOfBarsToUse, 0, li_44 + 1);
     l_icustom_36 = iCustom(NULL, 0, "!SupportingADX", 14, NumberOfBarsToUse, 0, li_44 + 2);
     li_48 = MACDSignal(li_44);
     l_bool_52 = l_icustom_28 > WhiteBarTrigger && l_icustom_20 < l_icustom_28 && l_icustom_28 > l_icustom_36;
     l_bool_56 = l_icustom_20 < RedBarTrigger && l_icustom_20 > l_icustom_28 && l_icustom_28 < l_icustom_36;
     g_ibuf_112[li_44] = 0;
     g_ibuf_120[li_44] = 0;
     g_ibuf_128[li_44] = 0;
     g_ibuf_124[li_44] = 0;
     if (l_bool_52 && gda_156[li_44] != 0.0 || gda_160[li_44] != 0.0) {
        g_ibuf_124[li_44] = 2.5 * l_icustom_20;
        if (li_44 == 1) SendAlert("yb");
     }
     if (l_bool_52) {
        if (li_48) {
           g_ibuf_128[li_44] = 1.5 * l_icustom_20;
           if (li_44 == 1) SendAlert("wbmacd");
        } else {
           g_ibuf_112[li_44] = 1.5 * l_icustom_20;
           if (li_44 == 1) SendAlert("wb");
        }
     }
     if (ThreeBars(li_44) && l_bool_52) {
        g_ibuf_120[li_44] = 2.0 * l_icustom_20;
        if (li_44 == 1) SendAlert("tb");
     }
     if (l_bool_56) {
        g_ibuf_116[li_44] = 2.0 * l_icustom_20;
        if (li_44 == 1) SendAlert("rb");
     } else g_ibuf_116[li_44] = 0;
  }
  return (0);
}

int MACDSignal(int ai_0) {
  double l_icustom_4 = iCustom(Symbol(), 0, "!SupportingMACD", 12, 26, 9, 0, ai_0);
  double l_icustom_12 = iCustom(Symbol(), 0, "!SupportingMACD", 12, 26, 9, 0, ai_0 + 1);
  double l_icustom_20 = iCustom(Symbol(), 0, "!SupportingMACD", 12, 26, 9, 1, ai_0);
  double l_icustom_28 = iCustom(Symbol(), 0, "!SupportingMACD", 12, 26, 9, 1, ai_0 + 1);
  if (l_icustom_4 > l_icustom_20 && l_icustom_12 <= l_icustom_28) return (1);
  if (l_icustom_4 < l_icustom_20 && l_icustom_12 >= l_icustom_28) return (1);
  return (0);
}

int ThreeBars(int ai_0) {
  int l_count_4 = 0;
  for (int l_count_8 = 0; l_count_8 < 16; l_count_8++)
     if (g_ibuf_112[ai_0 + l_count_8] != 0.0 || g_ibuf_128[ai_0 + l_count_8] != 0.0) l_count_4++;
  if (l_count_4 > 2) return (1);
  return (0);
}

void SendAlert(string as_0) {
  if (Time[1] != gi_172) {
     if (SoundAlert) {
        if (as_0 == "wb") Alert(Symbol() + " => TF: " + Period() + "M => " + TimeToStr(TimeCurrent()) + " white bar");
        if (as_0 == "wbmacd") Alert(Symbol() + " => TF: " + Period() + "M => " + TimeToStr(TimeCurrent()) + " white bar + macd");
        if (as_0 == "rb") Alert(Symbol() + " => TF: " + Period() + "M => " + TimeToStr(TimeCurrent()) + " red bar");
        if (as_0 == "tb") Alert(Symbol() + " => TF: " + Period() + "M => " + TimeToStr(TimeCurrent()) + " three bars");
        if (as_0 == "yb") Alert(Symbol() + " => TF: " + Period() + "M => " + TimeToStr(TimeCurrent()) + " whitebar + trendwave");
     }
     if (EmailAlert) {
        if (as_0 == "wb") SendMail("!SuperADX Alert", Symbol() + " => TF: " + Period() + "M => " + TimeToStr(TimeCurrent()) + " white bar");
        if (as_0 == "wbmacd") SendMail("!SuperADX Alert", Symbol() + " => TF: " + Period() + "M => " + TimeToStr(TimeCurrent()) + " white bar + macd");
        if (as_0 == "rb") SendMail("!SuperADX Alert", Symbol() + " => TF: " + Period() + "M => " + TimeToStr(TimeCurrent()) + " red bar");
        if (as_0 == "tb") SendMail("!SuperADX Alert", Symbol() + " => TF: " + Period() + "M => " + TimeToStr(TimeCurrent()) + " three bars");
        if (as_0 == "yb") SendMail("!SuperADX Alert", Symbol() + " => TF: " + Period() + "M => " + TimeToStr(TimeCurrent()) + " whitebar + trendwave");
     }
     gi_172 = Time[1];
  }
}

Link to comment
Share on other sites
  • 5 months later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
 Share
Go to topic listing


About us

Indo-Investasi.com, is since 2008, one of the prime online destinations for information and discussion about forex trading, and online investments.

Share your experiences, find tools and learning materials, seek help, and make friends. More About us.

Indo-Investasi Community

Important Pages

Financial Disclaimer: Trading FOREX on margin carries a high level of risk, and may not be suitable for everyone. Past performance is not a guarantee of future results. The high degree of leverage can work against you as well as for you. Before deciding to invest in foreign exchange you should carefully consider your investment objectives, level of experience, and risk appetite. The possibility exists that you could sustain a loss of some or all of your initial investment and therefore you should not invest money that you cannot afford to lose. Please see our Terms & Conditions for more information.
×
×
  • Create New...