#property copyright "Copyright © 2008, MetaQuotes Software Corp."
#property link      ""

#property indicator_chart_window
#property indicator_buffers 1
#property indicator_color1 Black

extern int Corner = 0;
extern int y_distance=0;

int init() {
   string l_name_0 = "eur MN";
   ObjectDelete(l_name_0);
   ObjectCreate(l_name_0, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_0, "MN", 7, "Arial Bold", LightSalmon);
   ObjectSet(l_name_0, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_0, OBJPROP_XDISTANCE, 230);
   ObjectSet(l_name_0, OBJPROP_YDISTANCE, 260+y_distance );
   string l_name_8 = "eur W1";
   ObjectDelete(l_name_8);
   ObjectCreate(l_name_8, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_8, "W1", 7, "Arial Bold", LightSalmon);
   ObjectSet(l_name_8, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_8, OBJPROP_XDISTANCE, 210);
   ObjectSet(l_name_8, OBJPROP_YDISTANCE, 260+y_distance );
   string l_name_16 = "eur D1";
   ObjectDelete(l_name_16);
   ObjectCreate(l_name_16, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_16, "D1", 7, "Arial Bold", LightSalmon);
   ObjectSet(l_name_16, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_16, OBJPROP_XDISTANCE, 190);
   ObjectSet(l_name_16, OBJPROP_YDISTANCE, 260+y_distance );
   string l_name_24 = "eur TF H4";
   ObjectDelete(l_name_24);
   ObjectCreate(l_name_24, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_24, "H4", 7, "Arial Bold", LightSalmon);
   ObjectSet(l_name_24, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_24, OBJPROP_XDISTANCE, 160);
   ObjectSet(l_name_24, OBJPROP_YDISTANCE, 260+y_distance );
   string l_name_32 = "eur TF H1";
   ObjectDelete(l_name_32);
   ObjectCreate(l_name_32, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_32, "H1", 7, "Arial Bold", LightSalmon);
   ObjectSet(l_name_32, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_32, OBJPROP_XDISTANCE, 140);
   ObjectSet(l_name_32, OBJPROP_YDISTANCE, 260+y_distance );
   string l_name_40 = "eur TF M30";
   ObjectDelete(l_name_40);
   ObjectCreate(l_name_40, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_40, "M30", 7, "Arial Bold", LightSalmon);
   ObjectSet(l_name_40, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_40, OBJPROP_XDISTANCE, 120);
   ObjectSet(l_name_40, OBJPROP_YDISTANCE, 260+y_distance );
   string l_name_48 = "eur TF M15";
   ObjectDelete(l_name_48);
   ObjectCreate(l_name_48, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_48, "M15", 7, "Arial Bold", LightSalmon);
   ObjectSet(l_name_48, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_48, OBJPROP_XDISTANCE, 97);
   ObjectSet(l_name_48, OBJPROP_YDISTANCE, 260+y_distance );
   string l_name_56 = "eur TF M5";
   ObjectDelete(l_name_56);
   ObjectCreate(l_name_56, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_56, "M5", 7, "Arial Bold", LightSalmon);
   ObjectSet(l_name_56, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_56, OBJPROP_XDISTANCE, 77);
   ObjectSet(l_name_56, OBJPROP_YDISTANCE, 260+y_distance );
   string l_name_64 = "eur TF M1";
   ObjectDelete(l_name_64);
   ObjectCreate(l_name_64, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_64, "M1", 7, "Arial Bold", LightSalmon);
   ObjectSet(l_name_64, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_64, OBJPROP_XDISTANCE, 60);
   ObjectSet(l_name_64, OBJPROP_YDISTANCE, 260+y_distance );
   string l_name_72 = "eur Line1";
   ObjectDelete(l_name_72);
   ObjectCreate(l_name_72, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_72, "------------------------------------", 7, "Arial Bold", Gainsboro);
   ObjectSet(l_name_72, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_72, OBJPROP_XDISTANCE, 62);
   ObjectSet(l_name_72, OBJPROP_YDISTANCE, 270+y_distance );
   string l_name_80 = "eur Line2";
   ObjectDelete(l_name_80);
   ObjectCreate(l_name_80, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_80, "------------------", 7, "Arial Bold", Gainsboro);
   ObjectSet(l_name_80, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_80, OBJPROP_XDISTANCE, 190);
   ObjectSet(l_name_80, OBJPROP_YDISTANCE, 270+y_distance );
   string l_name_88 = "eur EURGBP";
   ObjectDelete(l_name_88);
   ObjectCreate(l_name_88, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_88, "EURGBP", 7, "Arial Bold", Gainsboro);
   ObjectSet(l_name_88, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_88, OBJPROP_XDISTANCE, 3);
   ObjectSet(l_name_88, OBJPROP_YDISTANCE, 290+y_distance );
   string l_name_96 = "eur EJ";
   ObjectDelete(l_name_96);
   ObjectCreate(l_name_96, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_96, "EURJPY", 7, "Arial Bold", Gainsboro);
   ObjectSet(l_name_96, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_96, OBJPROP_XDISTANCE, 3);
   ObjectSet(l_name_96, OBJPROP_YDISTANCE, 310+y_distance );
   string l_name_104 = "eur EA";
   ObjectDelete(l_name_104);
   ObjectCreate(l_name_104, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_104, "EURAUD", 7, "Arial Bold", Gainsboro);
   ObjectSet(l_name_104, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_104, OBJPROP_XDISTANCE, 3);
   ObjectSet(l_name_104, OBJPROP_YDISTANCE, 330+y_distance );
   string l_name_112 = "eur EN";
   ObjectDelete(l_name_112);
   ObjectCreate(l_name_112, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_112, "EURNZD", 7, "Arial Bold", Gainsboro);
   ObjectSet(l_name_112, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_112, OBJPROP_XDISTANCE, 3);
   ObjectSet(l_name_112, OBJPROP_YDISTANCE, 350+y_distance );
   string l_name_120 = "eur ECh";
   ObjectDelete(l_name_120);
   ObjectCreate(l_name_120, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_120, "EURCHF", 7, "Arial Bold", Gainsboro);
   ObjectSet(l_name_120, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_120, OBJPROP_XDISTANCE, 3);
   ObjectSet(l_name_120, OBJPROP_YDISTANCE, 370+y_distance );
   string l_name_128 = "eur ECd";
   ObjectDelete(l_name_128);
   ObjectCreate(l_name_128, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_128, "EURCAD", 7, "Arial Bold", Gainsboro);
   ObjectSet(l_name_128, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_128, OBJPROP_XDISTANCE, 3);
   ObjectSet(l_name_128, OBJPROP_YDISTANCE, 390+y_distance );
   string l_name_136 = "eur EU";
   ObjectDelete(l_name_136);
   ObjectCreate(l_name_136, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_136, "EURUSD", 7, "Arial Bold", Gainsboro);
   ObjectSet(l_name_136, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_136, OBJPROP_XDISTANCE, 3);
   ObjectSet(l_name_136, OBJPROP_YDISTANCE, 410+y_distance );
   string l_name_144 = "eur Line3";
   ObjectDelete(l_name_144);
   ObjectCreate(l_name_144, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_144, "-----------------------------------------------------------", 7, "Arial Bold", Gainsboro);
   ObjectSet(l_name_144, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_144, OBJPROP_XDISTANCE, 62);
   ObjectSet(l_name_144, OBJPROP_YDISTANCE, 430+y_distance );
   string l_name_152 = "eur Line4";
   ObjectDelete(l_name_152);
   ObjectCreate(l_name_152, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_152, "-----------------------------------------------------------", 7, "Arial Bold", Gainsboro);
   ObjectSet(l_name_152, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_152, OBJPROP_XDISTANCE, 62);
   ObjectSet(l_name_152, OBJPROP_YDISTANCE, 450+y_distance );
   string l_name_160 = "eur Title";
   ObjectDelete(l_name_160);
   ObjectCreate(l_name_160, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_160, "KG Trend_MTF_Multipairs: EUR Group", 7, "Arial Bold", Aqua);
   ObjectSet(l_name_160, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_160, OBJPROP_XDISTANCE, 62);
   ObjectSet(l_name_160, OBJPROP_YDISTANCE, 440+y_distance );
   return (0);
}

int deinit()
  {   
   for(int li_0 = ObjectsTotal() - 1; li_0 >= 0; li_0--) 
     {
       string l_name_4 = ObjectName(li_0);
       if(StringFind(l_name_4, "", 0) < 0) 
           continue;
       ObjectDelete(l_name_4);
     }
   return (0);
  }

int start() {
   string l_text_4;
   color l_color_12;
   if (Period() < PERIOD_M1) return (0);
   int l_ind_counted_0 = IndicatorCounted();
   double ld_16 = iCustom(NULL, PERIOD_M1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M1, "Formula_2", 2, 1);
   double ld_24 = iCustom(NULL, PERIOD_M1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M1, "Formula_2", 2, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_32 = "eur EURGBP M1";
   ObjectDelete(l_name_32);
   ObjectCreate(l_name_32, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_32, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_32, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_32, OBJPROP_XDISTANCE, 60);
   ObjectSet(l_name_32, OBJPROP_YDISTANCE, 290+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M5, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M5, "Formula_2", 2, 1);
   ld_24 = iCustom(NULL, PERIOD_M5, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M5, "Formula_2", 2, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_40 = "eur EURGBP M5";
   ObjectDelete(l_name_40);
   ObjectCreate(l_name_40, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_40, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_40, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_40, OBJPROP_XDISTANCE, 80);
   ObjectSet(l_name_40, OBJPROP_YDISTANCE, 290+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M15, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M15, "Formula_2", 2, 1);
   ld_24 = iCustom(NULL, PERIOD_M15, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M15, "Formula_2", 2, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_48 = "eur EURGBP M15";
   ObjectDelete(l_name_48);
   ObjectCreate(l_name_48, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_48, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_48, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_48, OBJPROP_XDISTANCE, 100);
   ObjectSet(l_name_48, OBJPROP_YDISTANCE, 290+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M30, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M30, "Formula_2", 2, 1);
   ld_24 = iCustom(NULL, PERIOD_M30, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M30, "Formula_2", 2, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_56 = "eur EURGBP M30";
   ObjectDelete(l_name_56);
   ObjectCreate(l_name_56, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_56, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_56, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_56, OBJPROP_XDISTANCE, 120);
   ObjectSet(l_name_56, OBJPROP_YDISTANCE, 290+y_distance );
   ld_16 = iCustom(NULL, PERIOD_H1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_H1, "Formula_2", 2, 1);
   ld_24 = iCustom(NULL, PERIOD_H1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_H1, "Formula_2", 2, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_64 = "eur EURGBP H1";
   ObjectDelete(l_name_64);
   ObjectCreate(l_name_64, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_64, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_64, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_64, OBJPROP_XDISTANCE, 140);
   ObjectSet(l_name_64, OBJPROP_YDISTANCE, 290+y_distance );
   ld_16 = iCustom(NULL, PERIOD_H4, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_H4, "Formula_2", 2, 1);
   ld_24 = iCustom(NULL, PERIOD_H4, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_H4, "Formula_2", 2, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_72 = "eur EURGBP H4";
   ObjectDelete(l_name_72);
   ObjectCreate(l_name_72, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_72, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_72, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_72, OBJPROP_XDISTANCE, 160);
   ObjectSet(l_name_72, OBJPROP_YDISTANCE, 290+y_distance );
   ld_16 = iCustom(NULL, PERIOD_D1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_D1, "Formula_2", 2, 1);
   ld_24 = iCustom(NULL, PERIOD_D1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_D1, "Formula_2", 2, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_80 = "eur EURGBP D1";
   ObjectDelete(l_name_80);
   ObjectCreate(l_name_80, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_80, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_80, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_80, OBJPROP_XDISTANCE, 190);
   ObjectSet(l_name_80, OBJPROP_YDISTANCE, 290+y_distance );
   ld_16 = iCustom(NULL, PERIOD_W1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_W1, "Formula_2", 2, 1);
   ld_24 = iCustom(NULL, PERIOD_W1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_W1, "Formula_2", 2, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_88 = "eur EURGBP W1";
   ObjectDelete(l_name_88);
   ObjectCreate(l_name_88, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_88, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_88, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_88, OBJPROP_XDISTANCE, 210);
   ObjectSet(l_name_88, OBJPROP_YDISTANCE, 290+y_distance );
   ld_16 = iCustom(NULL, PERIOD_MN1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_MN1, "Formula_2", 2, 1);
   ld_24 = iCustom(NULL, PERIOD_MN1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_MN1, "Formula_2", 2, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_96 = "eur EURGBP MN";
   ObjectDelete(l_name_96);
   ObjectCreate(l_name_96, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_96, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_96, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_96, OBJPROP_XDISTANCE, 230);
   ObjectSet(l_name_96, OBJPROP_YDISTANCE, 290+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M1, "Formula_2", 4, 1);
   ld_24 = iCustom(NULL, PERIOD_M1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M1, "Formula_2", 4, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_104 = "eur EURJPY M1";
   ObjectDelete(l_name_104);
   ObjectCreate(l_name_104, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_104, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_104, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_104, OBJPROP_XDISTANCE, 60);
   ObjectSet(l_name_104, OBJPROP_YDISTANCE, 310+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M5, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M5, "Formula_2", 4, 1);
   ld_24 = iCustom(NULL, PERIOD_M5, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M5, "Formula_2", 4, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_112 = "eur EURJPY M5";
   ObjectDelete(l_name_112);
   ObjectCreate(l_name_112, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_112, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_112, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_112, OBJPROP_XDISTANCE, 80);
   ObjectSet(l_name_112, OBJPROP_YDISTANCE, 310+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M15, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M15, "Formula_2", 4, 1);
   ld_24 = iCustom(NULL, PERIOD_M15, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M15, "Formula_2", 4, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_120 = "eur EURJPY M15";
   ObjectDelete(l_name_120);
   ObjectCreate(l_name_120, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_120, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_120, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_120, OBJPROP_XDISTANCE, 100);
   ObjectSet(l_name_120, OBJPROP_YDISTANCE, 310+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M30, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M30, "Formula_2", 4, 1);
   ld_24 = iCustom(NULL, PERIOD_M30, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M30, "Formula_2", 4, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_128 = "eur EURJPY M30";
   ObjectDelete(l_name_128);
   ObjectCreate(l_name_128, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_128, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_128, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_128, OBJPROP_XDISTANCE, 120);
   ObjectSet(l_name_128, OBJPROP_YDISTANCE, 310+y_distance );
   ld_16 = iCustom(NULL, PERIOD_H1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_H1, "Formula_2", 4, 1);
   ld_24 = iCustom(NULL, PERIOD_H1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_H1, "Formula_2", 4, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_136 = "eur EURJPY H1";
   ObjectDelete(l_name_136);
   ObjectCreate(l_name_136, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_136, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_136, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_136, OBJPROP_XDISTANCE, 140);
   ObjectSet(l_name_136, OBJPROP_YDISTANCE, 310+y_distance );
   ld_16 = iCustom(NULL, PERIOD_H4, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_H4, "Formula_2", 4, 1);
   ld_24 = iCustom(NULL, PERIOD_H4, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_H4, "Formula_2", 4, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_144 = "eur EURJPY H4";
   ObjectDelete(l_name_144);
   ObjectCreate(l_name_144, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_144, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_144, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_144, OBJPROP_XDISTANCE, 160);
   ObjectSet(l_name_144, OBJPROP_YDISTANCE, 310+y_distance );
   ld_16 = iCustom(NULL, PERIOD_D1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_D1, "Formula_2", 4, 1);
   ld_24 = iCustom(NULL, PERIOD_D1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_D1, "Formula_2", 4, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_152 = "eur EURJPY D1";
   ObjectDelete(l_name_152);
   ObjectCreate(l_name_152, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_152, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_152, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_152, OBJPROP_XDISTANCE, 190);
   ObjectSet(l_name_152, OBJPROP_YDISTANCE, 310+y_distance );
   ld_16 = iCustom(NULL, PERIOD_W1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_W1, "Formula_2", 4, 1);
   ld_24 = iCustom(NULL, PERIOD_W1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_W1, "Formula_2", 4, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_160 = "eur EURJPY W1";
   ObjectDelete(l_name_160);
   ObjectCreate(l_name_160, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_160, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_160, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_160, OBJPROP_XDISTANCE, 210);
   ObjectSet(l_name_160, OBJPROP_YDISTANCE, 310+y_distance );
   ld_16 = iCustom(NULL, PERIOD_MN1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_MN1, "Formula_2", 4, 1);
   ld_24 = iCustom(NULL, PERIOD_MN1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_MN1, "Formula_2", 4, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_168 = "eur EURJPY MN";
   ObjectDelete(l_name_168);
   ObjectCreate(l_name_168, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_168, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_168, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_168, OBJPROP_XDISTANCE, 230);
   ObjectSet(l_name_168, OBJPROP_YDISTANCE, 310+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M1, "Formula_2", 5, 1);
   ld_24 = iCustom(NULL, PERIOD_M1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M1, "Formula_2", 5, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_176 = "eur EURAUD M1";
   ObjectDelete(l_name_176);
   ObjectCreate(l_name_176, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_176, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_176, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_176, OBJPROP_XDISTANCE, 60);
   ObjectSet(l_name_176, OBJPROP_YDISTANCE, 330+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M5, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M5, "Formula_2", 5, 1);
   ld_24 = iCustom(NULL, PERIOD_M5, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M5, "Formula_2", 5, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_184 = "eur EURAUD M5";
   ObjectDelete(l_name_184);
   ObjectCreate(l_name_184, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_184, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_184, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_184, OBJPROP_XDISTANCE, 80);
   ObjectSet(l_name_184, OBJPROP_YDISTANCE, 330+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M15, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M15, "Formula_2", 5, 1);
   ld_24 = iCustom(NULL, PERIOD_M15, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M15, "Formula_2", 5, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_192 = "eur EURAUD M15";
   ObjectDelete(l_name_192);
   ObjectCreate(l_name_192, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_192, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_192, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_192, OBJPROP_XDISTANCE, 100);
   ObjectSet(l_name_192, OBJPROP_YDISTANCE, 330+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M30, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M30, "Formula_2", 5, 1);
   ld_24 = iCustom(NULL, PERIOD_M30, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M30, "Formula_2", 5, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_200 = "eur EURAUD M30";
   ObjectDelete(l_name_200);
   ObjectCreate(l_name_200, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_200, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_200, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_200, OBJPROP_XDISTANCE, 120);
   ObjectSet(l_name_200, OBJPROP_YDISTANCE, 330+y_distance );
   ld_16 = iCustom(NULL, PERIOD_H1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_H1, "Formula_2", 5, 1);
   ld_24 = iCustom(NULL, PERIOD_H1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_H1, "Formula_2", 5, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_208 = "eur EURAUD H1";
   ObjectDelete(l_name_208);
   ObjectCreate(l_name_208, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_208, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_208, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_208, OBJPROP_XDISTANCE, 140);
   ObjectSet(l_name_208, OBJPROP_YDISTANCE, 330+y_distance );
   ld_16 = iCustom(NULL, PERIOD_H4, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_H4, "Formula_2", 5, 1);
   ld_24 = iCustom(NULL, PERIOD_H4, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_H4, "Formula_2", 5, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_216 = "eur EURAUD H4";
   ObjectDelete(l_name_216);
   ObjectCreate(l_name_216, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_216, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_216, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_216, OBJPROP_XDISTANCE, 160);
   ObjectSet(l_name_216, OBJPROP_YDISTANCE, 330+y_distance );
   ld_16 = iCustom(NULL, PERIOD_D1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_D1, "Formula_2", 5, 1);
   ld_24 = iCustom(NULL, PERIOD_D1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_D1, "Formula_2", 5, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_224 = "eur EURAUD D1";
   ObjectDelete(l_name_224);
   ObjectCreate(l_name_224, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_224, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_224, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_224, OBJPROP_XDISTANCE, 190);
   ObjectSet(l_name_224, OBJPROP_YDISTANCE, 330+y_distance );
   ld_16 = iCustom(NULL, PERIOD_W1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_W1, "Formula_2", 5, 1);
   ld_24 = iCustom(NULL, PERIOD_W1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_W1, "Formula_2", 5, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_232 = "eur EURAUD W1";
   ObjectDelete(l_name_232);
   ObjectCreate(l_name_232, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_232, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_232, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_232, OBJPROP_XDISTANCE, 210);
   ObjectSet(l_name_232, OBJPROP_YDISTANCE, 330+y_distance );
   ld_16 = iCustom(NULL, PERIOD_MN1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_MN1, "Formula_2", 5, 1);
   ld_24 = iCustom(NULL, PERIOD_MN1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_MN1, "Formula_2", 5, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_240 = "eur EURAUD MN";
   ObjectDelete(l_name_240);
   ObjectCreate(l_name_240, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_240, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_240, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_240, OBJPROP_XDISTANCE, 230);
   ObjectSet(l_name_240, OBJPROP_YDISTANCE, 330+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M1, "Formula_2", 7, 1);
   ld_24 = iCustom(NULL, PERIOD_M1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M1, "Formula_2", 7, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_248 = "eur EURNZD M1";
   ObjectDelete(l_name_248);
   ObjectCreate(l_name_248, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_248, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_248, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_248, OBJPROP_XDISTANCE, 60);
   ObjectSet(l_name_248, OBJPROP_YDISTANCE, 350+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M5, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M5, "Formula_2", 7, 1);
   ld_24 = iCustom(NULL, PERIOD_M5, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M5, "Formula_2", 7, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_256 = "eur EURNZD M5";
   ObjectDelete(l_name_256);
   ObjectCreate(l_name_256, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_256, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_256, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_256, OBJPROP_XDISTANCE, 80);
   ObjectSet(l_name_256, OBJPROP_YDISTANCE, 350+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M15, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M15, "Formula_2", 7, 1);
   ld_24 = iCustom(NULL, PERIOD_M15, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M15, "Formula_2", 7, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_264 = "eur EURNZD M15";
   ObjectDelete(l_name_264);
   ObjectCreate(l_name_264, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_264, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_264, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_264, OBJPROP_XDISTANCE, 100);
   ObjectSet(l_name_264, OBJPROP_YDISTANCE, 350+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M30, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M30, "Formula_2", 7, 1);
   ld_24 = iCustom(NULL, PERIOD_M30, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M30, "Formula_2", 7, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_272 = "eur EURNZD M30";
   ObjectDelete(l_name_272);
   ObjectCreate(l_name_272, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_272, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_272, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_272, OBJPROP_XDISTANCE, 120);
   ObjectSet(l_name_272, OBJPROP_YDISTANCE, 350+y_distance );
   ld_16 = iCustom(NULL, PERIOD_H1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_H1, "Formula_2", 7, 1);
   ld_24 = iCustom(NULL, PERIOD_H1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_H1, "Formula_2", 7, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_280 = "eur EURNZD H1";
   ObjectDelete(l_name_280);
   ObjectCreate(l_name_280, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_280, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_280, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_280, OBJPROP_XDISTANCE, 140);
   ObjectSet(l_name_280, OBJPROP_YDISTANCE, 350+y_distance );
   ld_16 = iCustom(NULL, PERIOD_H4, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_H4, "Formula_2", 7, 1);
   ld_24 = iCustom(NULL, PERIOD_H4, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_H4, "Formula_2", 7, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_288 = "eur EURNZD H4";
   ObjectDelete(l_name_288);
   ObjectCreate(l_name_288, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_288, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_288, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_288, OBJPROP_XDISTANCE, 160);
   ObjectSet(l_name_288, OBJPROP_YDISTANCE, 350+y_distance );
   ld_16 = iCustom(NULL, PERIOD_D1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_D1, "Formula_2", 7, 1);
   ld_24 = iCustom(NULL, PERIOD_D1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_D1, "Formula_2", 7, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_296 = "eur EURNZD D1";
   ObjectDelete(l_name_296);
   ObjectCreate(l_name_296, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_296, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_296, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_296, OBJPROP_XDISTANCE, 190);
   ObjectSet(l_name_296, OBJPROP_YDISTANCE, 350+y_distance );
   ld_16 = iCustom(NULL, PERIOD_W1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_W1, "Formula_2", 7, 1);
   ld_24 = iCustom(NULL, PERIOD_W1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_W1, "Formula_2", 7, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_304 = "eur EURNZD W1";
   ObjectDelete(l_name_304);
   ObjectCreate(l_name_304, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_304, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_304, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_304, OBJPROP_XDISTANCE, 210);
   ObjectSet(l_name_304, OBJPROP_YDISTANCE, 350+y_distance );
   ld_16 = iCustom(NULL, PERIOD_MN1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_MN1, "Formula_2", 7, 1);
   ld_24 = iCustom(NULL, PERIOD_MN1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_MN1, "Formula_2", 7, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_312 = "eur EURNZD MN";
   ObjectDelete(l_name_312);
   ObjectCreate(l_name_312, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_312, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_312, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_312, OBJPROP_XDISTANCE, 230);
   ObjectSet(l_name_312, OBJPROP_YDISTANCE, 350+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M1, "Formula_2", 3, 1);
   ld_24 = iCustom(NULL, PERIOD_M1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M1, "Formula_2", 3, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_320 = "eur EURCHF M1";
   ObjectDelete(l_name_320);
   ObjectCreate(l_name_320, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_320, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_320, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_320, OBJPROP_XDISTANCE, 60);
   ObjectSet(l_name_320, OBJPROP_YDISTANCE, 370+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M5, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M5, "Formula_2", 3, 1);
   ld_24 = iCustom(NULL, PERIOD_M5, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M5, "Formula_2", 3, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_328 = "eur EURCHF M5";
   ObjectDelete(l_name_328);
   ObjectCreate(l_name_328, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_328, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_328, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_328, OBJPROP_XDISTANCE, 80);
   ObjectSet(l_name_328, OBJPROP_YDISTANCE, 370+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M15, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M15, "Formula_2", 3, 1);
   ld_24 = iCustom(NULL, PERIOD_M15, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M15, "Formula_2", 3, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_336 = "eur EURCHF M15";
   ObjectDelete(l_name_336);
   ObjectCreate(l_name_336, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_336, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_336, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_336, OBJPROP_XDISTANCE, 100);
   ObjectSet(l_name_336, OBJPROP_YDISTANCE, 370+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M30, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M30, "Formula_2", 3, 1);
   ld_24 = iCustom(NULL, PERIOD_M30, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M30, "Formula_2", 3, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_344 = "eur EURCHF M30";
   ObjectDelete(l_name_344);
   ObjectCreate(l_name_344, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_344, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_344, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_344, OBJPROP_XDISTANCE, 120);
   ObjectSet(l_name_344, OBJPROP_YDISTANCE, 370+y_distance );
   ld_16 = iCustom(NULL, PERIOD_H1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_H1, "Formula_2", 3, 1);
   ld_24 = iCustom(NULL, PERIOD_H1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_H1, "Formula_2", 3, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_352 = "eur EURCHF H1";
   ObjectDelete(l_name_352);
   ObjectCreate(l_name_352, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_352, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_352, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_352, OBJPROP_XDISTANCE, 140);
   ObjectSet(l_name_352, OBJPROP_YDISTANCE, 370+y_distance );
   ld_16 = iCustom(NULL, PERIOD_H4, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_H4, "Formula_2", 3, 1);
   ld_24 = iCustom(NULL, PERIOD_H4, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_H4, "Formula_2", 3, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_360 = "eur EURCHF H4";
   ObjectDelete(l_name_360);
   ObjectCreate(l_name_360, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_360, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_360, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_360, OBJPROP_XDISTANCE, 160);
   ObjectSet(l_name_360, OBJPROP_YDISTANCE, 370+y_distance );
   ld_16 = iCustom(NULL, PERIOD_D1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_D1, "Formula_2", 3, 1);
   ld_24 = iCustom(NULL, PERIOD_D1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_D1, "Formula_2", 3, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_368 = "eur EURCHF D1";
   ObjectDelete(l_name_368);
   ObjectCreate(l_name_368, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_368, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_368, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_368, OBJPROP_XDISTANCE, 190);
   ObjectSet(l_name_368, OBJPROP_YDISTANCE, 370+y_distance );
   ld_16 = iCustom(NULL, PERIOD_W1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_W1, "Formula_2", 3, 1);
   ld_24 = iCustom(NULL, PERIOD_W1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_W1, "Formula_2", 3, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_376 = "eur EURCHF W1";
   ObjectDelete(l_name_376);
   ObjectCreate(l_name_376, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_376, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_376, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_376, OBJPROP_XDISTANCE, 210);
   ObjectSet(l_name_376, OBJPROP_YDISTANCE, 370+y_distance );
   ld_16 = iCustom(NULL, PERIOD_MN1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_MN1, "Formula_2", 3, 1);
   ld_24 = iCustom(NULL, PERIOD_MN1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_MN1, "Formula_2", 3, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_384 = "eur EURCHF MN";
   ObjectDelete(l_name_384);
   ObjectCreate(l_name_384, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_384, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_384, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_384, OBJPROP_XDISTANCE, 230);
   ObjectSet(l_name_384, OBJPROP_YDISTANCE, 370+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M1, "Formula_2", 6, 1);
   ld_24 = iCustom(NULL, PERIOD_M1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M1, "Formula_2", 6, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_392 = "eur EURCAD M1";
   ObjectDelete(l_name_392);
   ObjectCreate(l_name_392, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_392, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_392, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_392, OBJPROP_XDISTANCE, 60);
   ObjectSet(l_name_392, OBJPROP_YDISTANCE, 390+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M5, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M5, "Formula_2", 6, 1);
   ld_24 = iCustom(NULL, PERIOD_M5, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M5, "Formula_2", 6, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_400 = "eur EURCAD M5";
   ObjectDelete(l_name_400);
   ObjectCreate(l_name_400, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_400, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_400, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_400, OBJPROP_XDISTANCE, 80);
   ObjectSet(l_name_400, OBJPROP_YDISTANCE, 390+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M15, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M15, "Formula_2", 6, 1);
   ld_24 = iCustom(NULL, PERIOD_M15, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M15, "Formula_2", 6, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_408 = "eur EURCAD M15";
   ObjectDelete(l_name_408);
   ObjectCreate(l_name_408, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_408, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_408, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_408, OBJPROP_XDISTANCE, 100);
   ObjectSet(l_name_408, OBJPROP_YDISTANCE, 390+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M30, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M30, "Formula_2", 6, 1);
   ld_24 = iCustom(NULL, PERIOD_M30, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M30, "Formula_2", 6, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_416 = "eur EURCAD M30";
   ObjectDelete(l_name_416);
   ObjectCreate(l_name_416, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_416, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_416, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_416, OBJPROP_XDISTANCE, 120);
   ObjectSet(l_name_416, OBJPROP_YDISTANCE, 390+y_distance );
   ld_16 = iCustom(NULL, PERIOD_H1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_H1, "Formula_2", 6, 1);
   ld_24 = iCustom(NULL, PERIOD_H1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_H1, "Formula_2", 6, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_424 = "eur EURCAD H1";
   ObjectDelete(l_name_424);
   ObjectCreate(l_name_424, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_424, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_424, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_424, OBJPROP_XDISTANCE, 140);
   ObjectSet(l_name_424, OBJPROP_YDISTANCE, 390+y_distance );
   ld_16 = iCustom(NULL, PERIOD_H4, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_H4, "Formula_2", 6, 1);
   ld_24 = iCustom(NULL, PERIOD_H4, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_H4, "Formula_2", 6, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_432 = "eur EURCAD H4";
   ObjectDelete(l_name_432);
   ObjectCreate(l_name_432, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_432, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_432, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_432, OBJPROP_XDISTANCE, 160);
   ObjectSet(l_name_432, OBJPROP_YDISTANCE, 390+y_distance );
   ld_16 = iCustom(NULL, PERIOD_D1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_D1, "Formula_2", 6, 1);
   ld_24 = iCustom(NULL, PERIOD_D1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_D1, "Formula_2", 6, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_440 = "eur EURCAD D1";
   ObjectDelete(l_name_440);
   ObjectCreate(l_name_440, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_440, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_440, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_440, OBJPROP_XDISTANCE, 190);
   ObjectSet(l_name_440, OBJPROP_YDISTANCE, 390+y_distance );
   ld_16 = iCustom(NULL, PERIOD_W1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_W1, "Formula_2", 6, 1);
   ld_24 = iCustom(NULL, PERIOD_W1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_W1, "Formula_2", 6, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_448 = "eur EURCAD W1";
   ObjectDelete(l_name_448);
   ObjectCreate(l_name_448, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_448, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_448, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_448, OBJPROP_XDISTANCE, 210);
   ObjectSet(l_name_448, OBJPROP_YDISTANCE, 390+y_distance );
   ld_16 = iCustom(NULL, PERIOD_MN1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_MN1, "Formula_2", 6, 1);
   ld_24 = iCustom(NULL, PERIOD_MN1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_MN1, "Formula_2", 6, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_456 = "eur EURCAD MN";
   ObjectDelete(l_name_456);
   ObjectCreate(l_name_456, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_456, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_456, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_456, OBJPROP_XDISTANCE, 230);
   ObjectSet(l_name_456, OBJPROP_YDISTANCE, 390+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M1, "Formula_2", 0, 1);
   ld_24 = iCustom(NULL, PERIOD_M1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M1, "Formula_2", 0, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_464 = "eur EURUSD M1";
   ObjectDelete(l_name_464);
   ObjectCreate(l_name_464, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_464, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_464, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_464, OBJPROP_XDISTANCE, 60);
   ObjectSet(l_name_464, OBJPROP_YDISTANCE, 410+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M5, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M5, "Formula_2", 0, 1);
   ld_24 = iCustom(NULL, PERIOD_M5, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M5, "Formula_2", 0, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_472 = "eur EURUSD M5";
   ObjectDelete(l_name_472);
   ObjectCreate(l_name_472, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_472, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_472, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_472, OBJPROP_XDISTANCE, 80);
   ObjectSet(l_name_472, OBJPROP_YDISTANCE, 410+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M15, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M15, "Formula_2", 0, 1);
   ld_24 = iCustom(NULL, PERIOD_M15, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M15, "Formula_2", 0, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_480 = "eur EURUSD M15";
   ObjectDelete(l_name_480);
   ObjectCreate(l_name_480, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_480, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_480, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_480, OBJPROP_XDISTANCE, 100);
   ObjectSet(l_name_480, OBJPROP_YDISTANCE, 410+y_distance );
   ld_16 = iCustom(NULL, PERIOD_M30, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_M30, "Formula_2", 0, 1);
   ld_24 = iCustom(NULL, PERIOD_M30, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_M30, "Formula_2", 0, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_488 = "eur EURUSD M30";
   ObjectDelete(l_name_488);
   ObjectCreate(l_name_488, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_488, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_488, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_488, OBJPROP_XDISTANCE, 120);
   ObjectSet(l_name_488, OBJPROP_YDISTANCE, 410+y_distance );
   ld_16 = iCustom(NULL, PERIOD_H1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_H1, "Formula_2", 0, 1);
   ld_24 = iCustom(NULL, PERIOD_H1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_H1, "Formula_2", 0, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_496 = "eur EURUSD H1";
   ObjectDelete(l_name_496);
   ObjectCreate(l_name_496, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_496, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_496, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_496, OBJPROP_XDISTANCE, 140);
   ObjectSet(l_name_496, OBJPROP_YDISTANCE, 410+y_distance );
   ld_16 = iCustom(NULL, PERIOD_H4, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_H4, "Formula_2", 0, 1);
   ld_24 = iCustom(NULL, PERIOD_H4, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_H4, "Formula_2", 0, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_504 = "eur EURUSD H4";
   ObjectDelete(l_name_504);
   ObjectCreate(l_name_504, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_504, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_504, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_504, OBJPROP_XDISTANCE, 160);
   ObjectSet(l_name_504, OBJPROP_YDISTANCE, 410+y_distance );
   ld_16 = iCustom(NULL, PERIOD_D1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_D1, "Formula_2", 0, 1);
   ld_24 = iCustom(NULL, PERIOD_D1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_D1, "Formula_2", 0, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_512 = "eur EURUSD D1";
   ObjectDelete(l_name_512);
   ObjectCreate(l_name_512, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_512, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_512, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_512, OBJPROP_XDISTANCE, 190);
   ObjectSet(l_name_512, OBJPROP_YDISTANCE, 410+y_distance );
   ld_16 = iCustom(NULL, PERIOD_W1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_W1, "Formula_2", 0, 1);
   ld_24 = iCustom(NULL, PERIOD_W1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_W1, "Formula_2", 0, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_520 = "eur EURUSD W1";
   ObjectDelete(l_name_520);
   ObjectCreate(l_name_520, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_520, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_520, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_520, OBJPROP_XDISTANCE, 210);
   ObjectSet(l_name_520, OBJPROP_YDISTANCE, 410+y_distance );
   ld_16 = iCustom(NULL, PERIOD_MN1, "Formula_2", 1, 1) - iCustom(NULL, PERIOD_MN1, "Formula_2", 0, 1);
   ld_24 = iCustom(NULL, PERIOD_MN1, "Formula_2", 1, 0) - iCustom(NULL, PERIOD_MN1, "Formula_2", 0, 0);
   if (ld_16 == ld_24) {
      l_text_4 = "ó";
      l_color_12 = DarkOrange;
   } else {
      if (ld_16 < ld_24 && ld_24 > 0.0) {
         l_text_4 = "ñ";
         l_color_12 = Lime;
      }
   }
   if (ld_16 > ld_24 && ld_24 > 0.0) {
      l_text_4 = "ñ";
      l_color_12 = DarkGreen;
   }
   if (ld_16 < ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Maroon;
   }
   if (ld_16 > ld_24 && ld_24 < 0.0) {
      l_text_4 = "ò";
      l_color_12 = Red;
   }
   string l_name_528 = "eur EURUSD MN";
   ObjectDelete(l_name_528);
   ObjectCreate(l_name_528, OBJ_LABEL, 0, 0, 0);
   ObjectSetText(l_name_528, l_text_4, 10, "Wingdings", l_color_12);
   ObjectSet(l_name_528, OBJPROP_CORNER, Corner);
   ObjectSet(l_name_528, OBJPROP_XDISTANCE, 230);
   ObjectSet(l_name_528, OBJPROP_YDISTANCE, 410+y_distance );
   return (0);
}