/*
   Generated by EX4-TO-MQ4 decompiler FREEWARE V4.0.451.1 [-]
   Website: http://www.metaquotes.net
   E-mail : support@metaquotes.net
*/
#property copyright "Copyright © 2012, forex4live.com"
#property link      "http://www.forex4live.com/"

#property indicator_chart_window
#property indicator_buffers 3
#property indicator_color1 Lime
#property indicator_color2 Red
#property indicator_color3 DodgerBlue

extern string TimeFrame = "All tf";
extern int HalfLength = 61;
extern int Price = 0;
extern double ATRMultiplier = 2.6;
extern int ATRPeriod = 110;
extern bool Interpolate = TRUE;
extern bool alertsOn = FALSE;
extern bool alertsOnCurrent = FALSE;
extern bool alertsOnHighLow = FALSE;
extern bool alertsMessage = FALSE;
extern bool alertsSound = FALSE;
extern bool alertsEmail = FALSE;
double g_ibuf_132[];
double g_ibuf_136[];
double g_ibuf_140[];
double g_ibuf_144[];
string gs_148;
bool g_bool_156;
bool g_bool_160;
int g_timeframe_164;
string gs_nothing_168 = "nothing";
datetime g_time_176;
string gsa_180[] = {"M1", "M5", "M15", "M30", "H1", "H4", "D1", "W1", "MN"};
int gia_184[] = {1, 5, 15, 30, 60, 240, 1440, 10080, 43200};

// E37F0136AA3FFAF149B351F6A4C948E9
int init() {
   string lsa_0[256];
   for (int index_4 = 0; index_4 < 256; index_4++) lsa_0[index_4] = CharToStr(index_4);
   int str2int_8 = StrToInteger(lsa_0[67] + lsa_0[111] + lsa_0[112] + lsa_0[121] + lsa_0[32] + lsa_0[82] + lsa_0[105] + lsa_0[103] + lsa_0[104] + lsa_0[116] + lsa_0[32] +
      lsa_0[169] + lsa_0[32] + lsa_0[75] + lsa_0[97] + lsa_0[122] + lsa_0[97] + lsa_0[111] + lsa_0[111] + lsa_0[32] + lsa_0[50] + lsa_0[48] + lsa_0[49] + lsa_0[49] + lsa_0[32]);
   IndicatorBuffers(4);
   HalfLength = MathMax(HalfLength, 1);
   SetIndexBuffer(0, g_ibuf_132);
   SetIndexDrawBegin(0, HalfLength);
   SetIndexBuffer(1, g_ibuf_136);
   SetIndexDrawBegin(1, HalfLength);
   SetIndexBuffer(2, g_ibuf_140);
   SetIndexDrawBegin(2, HalfLength);
   SetIndexBuffer(3, g_ibuf_144);
   gs_148 = WindowExpertName();
   g_bool_160 = TimeFrame == "returnBars";
   if (g_bool_160) return (0);
   g_bool_156 = TimeFrame == "calculateValue";
   if (g_bool_156) return (0);
   g_timeframe_164 = f0_3(TimeFrame);
   IndicatorShortName(f0_0(g_timeframe_164) + " TMA bands )" + HalfLength + ")");
   return (0);
}

// 52D46093050F38C27267BCE42543EF60
int deinit() {
   return (0);
}

// EA2B2676C28C0DB26D39331A336C6B92
int start() {
   int li_8;
   double ld_20;
   double ld_28;
   double ld_36;
   int shift_44;
   int datetime_48;
   int li_0 = IndicatorCounted();
   if (li_0 < 0) return (-1);
   if (li_0 > 0) li_0--;
   int li_16 = MathMin(500 - 1, 500 - li_0 + HalfLength);
   if (g_bool_160) {
      g_ibuf_132[0] = li_16 + 1;
      return (0);
   }
   if (g_bool_156 || g_timeframe_164 == Period()) {
      for (int li_4 = li_16; li_4 >= 0; li_4--) {
         ld_20 = (HalfLength + 1) * iMA(NULL, 0, 1, 0, MODE_SMA, Price, li_4);
         ld_28 = HalfLength + 1;
         li_8 = 1;
         for (int li_12 = HalfLength; li_8 <= HalfLength; li_12--) {
            ld_20 += li_12 * iMA(NULL, 0, 1, 0, MODE_SMA, Price, li_4 + li_8);
            ld_28 += li_12;
            if (li_8 <= li_4) {
               ld_20 += li_12 * iMA(NULL, 0, 1, 0, MODE_SMA, Price, li_4 - li_8);
               ld_28 += li_12;
            }
            li_8++;
         }
         ld_36 = iATR(NULL, 0, ATRPeriod, li_4 + 10) * ATRMultiplier;
         g_ibuf_132[li_4] = ld_20 / ld_28;
         g_ibuf_136[li_4] = g_ibuf_132[li_4] + ld_36;
         g_ibuf_140[li_4] = g_ibuf_132[li_4] - ld_36;
         g_ibuf_144[li_4] = 0;
         if (alertsOnHighLow) {
            if (High[li_4] > g_ibuf_136[li_4]) g_ibuf_144[li_4] = 1;
            if (Low[li_4] < g_ibuf_140[li_4]) g_ibuf_144[li_4] = -1;
         } else {
            if (Close[li_4] > g_ibuf_136[li_4]) g_ibuf_144[li_4] = 1;
            if (Close[li_4] < g_ibuf_140[li_4]) g_ibuf_144[li_4] = -1;
         }
      }
      if (!(!g_bool_156)) return (0);
      f0_1();
      return (0);
   }
   li_16 = MathMax(li_16, MathMin(500 - 1, iCustom(NULL, g_timeframe_164, gs_148, "returnBars", 0, 0) * g_timeframe_164 / Period()));
   for (li_4 = li_16; li_4 >= 0; li_4--) {
      shift_44 = iBarShift(NULL, g_timeframe_164, Time[li_4]);
      g_ibuf_132[li_4] = iCustom(NULL, g_timeframe_164, gs_148, "calculateTma", HalfLength, Price, ATRMultiplier, ATRPeriod, 0, shift_44);
      g_ibuf_136[li_4] = iCustom(NULL, g_timeframe_164, gs_148, "calculateTma", HalfLength, Price, ATRMultiplier, ATRPeriod, 1, shift_44);
      g_ibuf_140[li_4] = iCustom(NULL, g_timeframe_164, gs_148, "calculateTma", HalfLength, Price, ATRMultiplier, ATRPeriod, 2, shift_44);
      g_ibuf_144[li_4] = iCustom(NULL, g_timeframe_164, gs_148, "calculateTma", HalfLength, Price, ATRMultiplier, ATRPeriod, 3, shift_44);
      if (g_timeframe_164 <= Period() || shift_44 == iBarShift(NULL, g_timeframe_164, Time[li_4 - 1])) continue;
      if (Interpolate) {
         datetime_48 = iTime(NULL, g_timeframe_164, shift_44);
         for (int li_52 = 1; li_4 + li_52 < 500 && Time[li_4 + li_52] >= datetime_48; li_52++) {
         }
         for (li_12 = 1; li_12 < li_52; li_12++) {
            g_ibuf_132[li_4 + li_12] = g_ibuf_132[li_4] + (g_ibuf_132[li_4 + li_52] - g_ibuf_132[li_4]) * li_12 / li_52;
            g_ibuf_136[li_4 + li_12] = g_ibuf_136[li_4] + (g_ibuf_136[li_4 + li_52] - g_ibuf_136[li_4]) * li_12 / li_52;
            g_ibuf_140[li_4 + li_12] = g_ibuf_140[li_4] + (g_ibuf_140[li_4 + li_52] - g_ibuf_140[li_4]) * li_12 / li_52;
         }
      }
   }
   f0_1();
   return (0);
}

// 304CD8F881C2EC9D8467D17452E084AC
void f0_1() {
   int li_0;
   if (alertsOn) {
      if (alertsOnCurrent) li_0 = 0;
      else li_0 = 1;
      li_0 = iBarShift(NULL, 0, iTime(NULL, g_timeframe_164, li_0));
      if (g_ibuf_144[li_0] != g_ibuf_144[li_0 + 1]) {
         if (g_ibuf_144[li_0] == 1.0) f0_4(li_0, "up");
         if (g_ibuf_144[li_0] == -1.0) f0_4(li_0, "down");
      }
   }
}

// DA717D55A7C333716E8D000540764674
void f0_4(int ai_0, string as_4) {
   string str_concat_12;
   if (gs_nothing_168 != as_4 || g_time_176 != Time[ai_0]) {
      gs_nothing_168 = as_4;
      g_time_176 = Time[ai_0];
      str_concat_12 = StringConcatenate(Symbol(), " at ", TimeToStr(TimeLocal(), TIME_SECONDS), " " + f0_0(g_timeframe_164) + " TMA bands price penetrated ", as_4, " band");
      if (alertsMessage) Alert(str_concat_12);
      if (alertsEmail) SendMail(StringConcatenate(Symbol(), "TMA bands "), str_concat_12);
      if (alertsSound) PlaySound("alert2.wav");
   }
}

// B9EDCDEA151586E355292E7EA9BE516E
int f0_3(string as_0) {
   as_0 = f0_2(as_0);
   for (int li_8 = ArraySize(gia_184) - 1; li_8 >= 0; li_8--)
      if (as_0 == gsa_180[li_8] || as_0 == "" + gia_184[li_8]) return (MathMax(gia_184[li_8], Period()));
   return (Period());
}

// 1368D28A27D3419A04740CF6C5C45FD7
string f0_0(int ai_0) {
   for (int li_4 = ArraySize(gia_184) - 1; li_4 >= 0; li_4--)
      if (ai_0 == gia_184[li_4]) return (gsa_180[li_4]);
   return ("");
}

// 92DFF40263F725411B5FB6096A8D564E
string f0_2(string as_0) {
   int li_20;
   string ls_ret_8 = as_0;
   for (int li_16 = StringLen(as_0) - 1; li_16 >= 0; li_16--) {
      li_20 = StringGetChar(ls_ret_8, li_16);
      if ((li_20 > '`' && li_20 < '{') || (li_20 > 'ß' && li_20 < 256)) ls_ret_8 = StringSetChar(ls_ret_8, li_16, li_20 - 32);
      else
         if (li_20 > -33 && li_20 < 0) ls_ret_8 = StringSetChar(ls_ret_8, li_16, li_20 + 224);
   }
   return (ls_ret_8);
}