pátek 7. května 2010

system

Nejaky mozny system

Dl_Trend
Dl
Dlouhodobý trend


int g_period_76 = 13;
int g_period_80 = 34;
double g_ibuf_84[];
double g_ibuf_88[];
double g_ibuf_92[];
double g_ibuf_96[];

int init() {
   SetIndexStyle(0, DRAW_HISTOGRAM, STYLE_SOLID);
   SetIndexBuffer(0, g_ibuf_84);
   SetIndexStyle(1, DRAW_HISTOGRAM, STYLE_SOLID);
   SetIndexBuffer(1, g_ibuf_88);
   SetIndexStyle(2, DRAW_HISTOGRAM, STYLE_SOLID);
   SetIndexBuffer(2, g_ibuf_92);
   SetIndexStyle(3, DRAW_HISTOGRAM, STYLE_SOLID);
   SetIndexBuffer(3, g_ibuf_96);
   IndicatorDigits(Digits + 1);
   string ls_0 = "Dlouhodobý trend";
   IndicatorShortName(ls_0);
   SetIndexLabel(0, ls_0);
   SetIndexLabel(1, ls_0);
   SetIndexLabel(2, ls_0);
   SetIndexLabel(3, ls_0);
   return (0);
}


   }
   int l_ind_counted_20 = IndicatorCounted();
   if (l_ind_counted_20 < 0) return (-1);
   for (int li_24 = Bars - Max(l_ind_counted_20 - 1, 1); li_24 >= 0; li_24--) {
      ld_0 = iMA(NULL, 0, g_period_76, 0, MODE_EMA, PRICE_MEDIAN, li_24) - iMA(NULL, 0, g_period_80, 0, MODE_EMA, PRICE_MEDIAN, li_24);
      if (ld_0 > 0.0) {
         if ((g_ibuf_84[li_24 + 1] != 0.0 && ld_0 >= g_ibuf_84[li_24 + 1]) || (g_ibuf_88[li_24 + 1] != 0.0 && ld_0 > g_ibuf_88[li_24 + 1])) {
            g_ibuf_84[li_24] = ld_0;
            g_ibuf_88[li_24] = 0;
         } else {
            g_ibuf_84[li_24] = 0;
            g_ibuf_88[li_24] = ld_0;
         }
      } else {
         if ((g_ibuf_92[li_24 + 1] != 0.0 && ld_0 >= g_ibuf_92[li_24 + 1]) || (g_ibuf_96[li_24 + 1] != 0.0 && ld_0 > g_ibuf_96[li_24 + 1])) {
            g_ibuf_92[li_24] = ld_0;
            g_ibuf_96[li_24] = 0;
         } else {
            g_ibuf_92[li_24] = 0;
            g_ibuf_96[li_24] = ld_0;
         }
      }
   }
   return (0);
}

int Max(int ai_0, int ai_4) {
   if (ai_0 > ai_4) return (ai_0);
   return (ai_4);
}





Dl_Trend_A (black)


double g_ibuf_76[];
double g_ibuf_80[];
int g_period_84 = 13;
int g_period_88 = 34;
extern bool Alerts = TRUE;
int gi_96 = 0;
int gi_100 = 0;

int init() {
   SetIndexStyle(0, DRAW_ARROW, EMPTY);
   SetIndexArrow(0, SYMBOL_THUMBSUP);
   SetIndexBuffer(0, g_ibuf_76);
   SetIndexStyle(1, DRAW_ARROW, EMPTY);
   SetIndexArrow(1, SYMBOL_THUMBSDOWN);
   SetIndexBuffer(1, g_ibuf_80);
   return (0);
}

int deinit() {
   return (0);
}

int start() {
   int li_0;
   double l_ima_4;
   double l_ima_12;
   double l_ima_20;
   double l_ima_28;
   double l_ima_36;
   double l_ima_44;
   double ld_52;
   double ld_60;

   

   }
   int li_80 = IndicatorCounted();
   if (li_80 < 0) return (-1);
   if (li_80 > 0) li_80--;
   int li_84 = Bars - li_80;
   for (int li_88 = 0; li_88 <= li_84; li_88++) {
      li_0 = li_88;
      ld_52 = 0;
      ld_60 = 0;
      for (li_0 = li_88; li_0 <= li_88 + 9; li_0++) ld_60 += MathAbs(High[li_0] - Low[li_0]);
      ld_52 = ld_60 / 10.0;
      l_ima_4 = iMA(NULL, 0, g_period_84, 0, MODE_EMA, PRICE_CLOSE, li_88);
      l_ima_20 = iMA(NULL, 0, g_period_84, 0, MODE_EMA, PRICE_CLOSE, li_88 + 1);
      l_ima_36 = iMA(NULL, 0, g_period_84, 0, MODE_EMA, PRICE_CLOSE, li_88 - 1);
      l_ima_12 = iMA(NULL, 0, g_period_88, 0, MODE_EMA, PRICE_CLOSE, li_88);
      l_ima_28 = iMA(NULL, 0, g_period_88, 0, MODE_EMA, PRICE_CLOSE, li_88 + 1);
      l_ima_44 = iMA(NULL, 0, g_period_88, 0, MODE_EMA, PRICE_CLOSE, li_88 - 1);
      if (l_ima_4 > l_ima_12 && l_ima_20 < l_ima_28 && l_ima_36 > l_ima_44) {
         g_ibuf_76[li_88] = Low[li_88] - ld_52 / 2.0;
         if (li_88 <= 2 && Alerts && !gi_96) {
            SendMail("xxxx", "Dlouhodoby trend nad nulou!!!(Long)" + Symbol());
            Alert(Symbol(), " ", Period(), " Dlouhodobý trend nad nulou!!!(Long) ");
            gi_96 = TRUE;
            gi_100 = FALSE;
         }
      } else {
         if (l_ima_4 < l_ima_12 && l_ima_20 > l_ima_28 && l_ima_36 < l_ima_44) {
            g_ibuf_80[li_88] = High[li_88] + ld_52 / 2.0;
            if (li_88 <= 2 && Alerts && !gi_100) {
               SendMail("xxxx", "Dlouhodoby trend pod nulou!!!(Short)" + Symbol());
               Alert(Symbol(), " ", Period(), " Dlouhodobý trend pod nulou!!!(Short) ");
               gi_100 = TRUE;
               gi_96 = FALSE;
            }
         }
      }
   }
   return (0);
}







Kr_Trend_D
Trend D


int gi_76 = 21;
extern int CountBars = 3000;
double g_ibuf_84[];
double g_ibuf_88[];
double g_ibuf_92[];
int gi_96;
int g_count_100;
int gi_104;
bool gi_108;
int g_ind_counted_112;
datetime g_time_116;
datetime g_time_120;
datetime g_time_124;
double gd_128;
double gd_136;
double gd_144;
double gd_152;


double gd_368;
double gd_376;
double gd_384;
double gd_392;
double gd_400;
double gd_408;
double gd_416;

int init() {
   SetIndexStyle(0, DRAW_HISTOGRAM, STYLE_SOLID);
   SetIndexStyle(1, DRAW_HISTOGRAM, STYLE_SOLID);
   SetIndexStyle(2, DRAW_HISTOGRAM, STYLE_SOLID);
   SetIndexBuffer(0, g_ibuf_84);
   SetIndexBuffer(1, g_ibuf_88);
   SetIndexBuffer(2, g_ibuf_92);
   IndicatorShortName("Krátkodobý trend/H");
   SetIndexDrawBegin(0, Bars - CountBars);
   SetIndexDrawBegin(1, Bars - CountBars);
   SetIndexDrawBegin(2, Bars - CountBars);
   IndicatorDigits(MarketInfo(Symbol(), MODE_DIGITS));
   if (gi_76 - 1 >= 5) gi_104 = gi_76 - 1;
   else gi_104 = 5;
   gd_408 = 3 / (gi_76 + 2.0);
   gd_416 = 1.0 - gd_408;
   return (0);
}


   }
   g_ind_counted_112 = IndicatorCounted();
   if (g_ind_counted_112 < 0) return (-1);
   if (g_ind_counted_112 > gi_76) gi_96 = Bars - g_ind_counted_112 - 1;
   else gi_96 = Bars - gi_76 - 1;
   g_time_124 = Time[gi_96 + 1];
   if (g_time_124 != g_time_116 && gi_96 < Bars - gi_76 - 1) {
      if (g_time_124 == g_time_120) {
         gd_312 = gd_208;
         gd_320 = gd_216;
         gd_328 = gd_224;
         gd_336 = gd_232;


         gd_384 = gd_280;
         gd_392 = gd_288;
         gd_400 = gd_296;
      } else return (-1);
   }
   if (gi_76 - 1 >= 5) gi_104 = gi_76 - 1;
   else gi_104 = 5;
   gd_408 = 3 / (gi_76 + 2.0);
   gd_416 = 1.0 - gd_408;
   while (gi_96 >= 0) {
      if (g_count_100 == 0) {
         g_count_100 = 1;
         gi_108 = FALSE;
      } else {
         if (g_count_100 >= gi_104) g_count_100 = gi_104 + 1;
         else g_count_100++;
         gd_136 = Close[gi_96] - (Close[gi_96 + 1]);
         gd_192 = MathAbs(gd_136);
         gd_312 = gd_416 * gd_312 + gd_408 * gd_136;
         gd_320 = gd_408 * gd_312 + gd_416 * gd_320;
         gd_176 = 1.5 * gd_312 - gd_320 / 2.0;
         gd_328 = gd_416 * gd_328 + gd_408 * gd_176;
         gd_336 = gd_408 * gd_328 + gd_416 * gd_336;
         gd_144 = 1.5 * gd_328 - gd_336 / 2.0;
         gd_344 = gd_416 * gd_344 + gd_408 * gd_144;
         gd_352 = gd_408 * gd_344 + gd_416 * gd_352;
         gd_152 = 1.5 * gd_344 - gd_352 / 2.0;
         gd_360 = gd_416 * gd_360 + gd_408 * gd_192;
         gd_368 = gd_408 * gd_360 + gd_416 * gd_368;
         gd_160 = 1.5 * gd_360 - gd_368 / 2.0;
         gd_376 = gd_416 * gd_376 + gd_408 * gd_160;
         gd_384 = gd_408 * gd_376 + gd_416 * gd_384;
         gd_184 = 1.5 * gd_376 - gd_384 / 2.0;
         gd_392 = gd_416 * gd_392 + gd_408 * gd_184;
         gd_400 = gd_408 * gd_392 + gd_416 * gd_400;
         gd_168 = 1.5 * gd_392 - gd_400 / 2.0;
         if (g_count_100 <= gi_104 && gd_136 != 0.0) gi_108 = TRUE;
         if (g_count_100 == gi_104 && gi_108 == FALSE) g_count_100 = 0;
      }
      if (g_count_100 > gi_104 && gd_168 > 0.0000000001) {
         gd_128 = 50.0 * (gd_152 / gd_168 + 1.0);
         if (gd_128 > 100.0) gd_128 = 100.0;
         if (gd_128 < 0.0) gd_128 = 0.0;
      } else gd_128 = 50.0;
      gd_304 = gd_128 / 50.0 - 1.0;
      if (gi_96 == 1) {
         g_time_120 = Time[1];
         g_time_116 = Time[0];
         gd_208 = gd_312;
         gd_216 = gd_320;
         gd_224 = gd_328;
         gd_232 = gd_336;

         gd_272 = gd_376;
         gd_280 = gd_384;
         gd_288 = gd_392;
         gd_296 = gd_400;
      }
      gd_200 = gd_304 - (g_ibuf_84[gi_96 + 1]) - (g_ibuf_88[gi_96 + 1]) - (g_ibuf_92[gi_96 + 1]);
      g_ibuf_84[gi_96] = 0.0;
      g_ibuf_88[gi_96] = 0.0;
      g_ibuf_92[gi_96] = 0.0;
      if (gd_200 > 0.0) g_ibuf_84[gi_96] = gd_304;
      else {
         if (gd_200 < 0.0) g_ibuf_88[gi_96] = gd_304;
         else g_ibuf_92[gi_96] = gd_304;
      }
      gi_96--;





Kr_Trend_H


int gi_76 = 13;
extern int CountBars = 3000;
double g_ibuf_84[];
double g_ibuf_88[];
double g_ibuf_92[];
int gi_96;
int g_count_100;
int gi_104;
bool gi_108;
int g_ind_counted_112;
datetime g_time_116;
datetime g_time_120;
datetime g_time_124;
double gd_128;
double gd_136;
double gd_144;
double gd_152;
double gd_160;
double gd_168;
double gd_176;


double gd_328;
double gd_336;
double gd_344;
double gd_352;
double gd_360;
double gd_368;
double gd_376;
double gd_384;
double gd_392;
double gd_400;
double gd_408;
double gd_416;

int init() {
   SetIndexStyle(0, DRAW_HISTOGRAM, STYLE_SOLID);
   SetIndexStyle(1, DRAW_HISTOGRAM, STYLE_SOLID);
   SetIndexStyle(2, DRAW_HISTOGRAM, STYLE_SOLID);
   SetIndexBuffer(0, g_ibuf_84);
   SetIndexBuffer(1, g_ibuf_88);
   SetIndexBuffer(2, g_ibuf_92);
   IndicatorShortName("Krátkodobý trend/H");
   SetIndexDrawBegin(0, Bars - CountBars);
   SetIndexDrawBegin(1, Bars - CountBars);
   SetIndexDrawBegin(2, Bars - CountBars);
   IndicatorDigits(MarketInfo(Symbol(), MODE_DIGITS));
   if (gi_76 - 1 >= 5) gi_104 = gi_76 - 1;
   else gi_104 = 5;
   gd_408 = 3 / (gi_76 + 2.0);
   gd_416 = 1.0 - gd_408;
   return (0);
}



   }
   g_ind_counted_112 = IndicatorCounted();
   if (g_ind_counted_112 < 0) return (-1);
   if (g_ind_counted_112 > gi_76) gi_96 = Bars - g_ind_counted_112 - 1;
   else gi_96 = Bars - gi_76 - 1;
   g_time_124 = Time[gi_96 + 1];
   if (g_time_124 != g_time_116 && gi_96 < Bars - gi_76 - 1) {
      if (g_time_124 == g_time_120) {
         gd_312 = gd_208;
         gd_320 = gd_216;
         gd_328 = gd_224;
         gd_336 = gd_232;
         gd_344 = gd_240;
         gd_352 = gd_248;
         gd_360 = gd_256;
         gd_368 = gd_264;
         gd_376 = gd_272;
         gd_384 = gd_280;
         gd_392 = gd_288;
         gd_400 = gd_296;
      } else return (-1);
   }
   if (gi_76 - 1 >= 5) gi_104 = gi_76 - 1;
   else gi_104 = 5;
   gd_408 = 3 / (gi_76 + 2.0);
   gd_416 = 1.0 - gd_408;
   while (gi_96 >= 0) {
      if (g_count_100 == 0) {
         g_count_100 = 1;
         gi_108 = FALSE;
      } else {
         if (g_count_100 >= gi_104) g_count_100 = gi_104 + 1;
         else g_count_100++;
         gd_136 = Close[gi_96] - (Close[gi_96 + 1]);
         gd_192 = MathAbs(gd_136);
         gd_312 = gd_416 * gd_312 + gd_408 * gd_136;
         gd_320 = gd_408 * gd_312 + gd_416 * gd_320;
         gd_176 = 1.5 * gd_312 - gd_320 / 2.0;
         gd_328 = gd_416 * gd_328 + gd_408 * gd_176;
         gd_336 = gd_408 * gd_328 + gd_416 * gd_336;
         gd_144 = 1.5 * gd_328 - gd_336 / 2.0;
         gd_344 = gd_416 * gd_344 + gd_408 * gd_144;
         gd_352 = gd_408 * gd_344 + gd_416 * gd_352;
         gd_152 = 1.5 * gd_344 - gd_352 / 2.0;
         gd_360 = gd_416 * gd_360 + gd_408 * gd_192;
         gd_368 = gd_408 * gd_360 + gd_416 * gd_368;
         gd_160 = 1.5 * gd_360 - gd_368 / 2.0;
         gd_376 = gd_416 * gd_376 + gd_408 * gd_160;
         gd_384 = gd_408 * gd_376 + gd_416 * gd_384;
         gd_184 = 1.5 * gd_376 - gd_384 / 2.0;
         gd_392 = gd_416 * gd_392 + gd_408 * gd_184;
         gd_400 = gd_408 * gd_392 + gd_416 * gd_400;
         gd_168 = 1.5 * gd_392 - gd_400 / 2.0;
         if (g_count_100 <= gi_104 && gd_136 != 0.0) gi_108 = TRUE;
         if (g_count_100 == gi_104 && gi_108 == FALSE) g_count_100 = 0;
      }
      if (g_count_100 > gi_104 && gd_168 > 0.0000000001) {
         gd_128 = 50.0 * (gd_152 / gd_168 + 1.0);
         if (gd_128 > 100.0) gd_128 = 100.0;
         if (gd_128 < 0.0) gd_128 = 0.0;
      } else gd_128 = 50.0;
      gd_304 = gd_128 / 50.0 - 1.0;
      if (gi_96 == 1) {
         g_time_120 = Time[1];
         g_time_116 = Time[0];
         gd_208 = gd_312;
         gd_216 = gd_320;
         gd_224 = gd_328;
         gd_232 = gd_336;
         gd_240 = gd_344;
         gd_248 = gd_352;
         gd_256 = gd_360;
         gd_264 = gd_368;
         gd_272 = gd_376;
         gd_280 = gd_384;
         gd_288 = gd_392;
         gd_296 = gd_400;
      }
      gd_200 = gd_304 - (g_ibuf_84[gi_96 + 1]) - (g_ibuf_88[gi_96 + 1]) - (g_ibuf_92[gi_96 + 1]);
      g_ibuf_84[gi_96] = 0.0;
      g_ibuf_88[gi_96] = 0.0;
      g_ibuf_92[gi_96] = 0.0;
      if (gd_200 > 0.0) g_ibuf_84[gi_96] = gd_304;
      else {
         if (gd_200 < 0.0) g_ibuf_88[gi_96] = gd_304;
         else g_ibuf_92[gi_96] = gd_304;
      }
      gi_96--;
   }
   return (0);
}




_Trend


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

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

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

int start() {
   color l_color_0;
   color l_color_4;
   color l_color_8;
   color l_color_12;
   color l_color_16;
   color l_color_20;
   string l_text_24;
   string l_text_32;
   string l_text_40;
   string l_text_48;
   string ls_unused_56;
   string l_text_64;


   }
   double l_iadx_84 = iADX(NULL, PERIOD_M5, 14, PRICE_CLOSE, MODE_MAIN, 0);
   double l_iadx_92 = iADX(NULL, PERIOD_M5, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
   double l_iadx_100 = iADX(NULL, PERIOD_M5, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
   double l_iadx_108 = iADX(NULL, PERIOD_M15, 14, PRICE_CLOSE, MODE_MAIN, 0);
   double l_iadx_116 = iADX(NULL, PERIOD_M15, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
   double l_iadx_124 = iADX(NULL, PERIOD_M15, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
   double l_iadx_132 = iADX(NULL, PERIOD_M30, 14, PRICE_CLOSE, MODE_MAIN, 0);
   double l_iadx_140 = iADX(NULL, PERIOD_M30, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
   double l_iadx_148 = iADX(NULL, PERIOD_M30, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
   double l_iadx_156 = iADX(NULL, PERIOD_H1, 14, PRICE_CLOSE, MODE_MAIN, 0);
   double l_iadx_164 = iADX(NULL, PERIOD_H1, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
   double l_iadx_172 = iADX(NULL, PERIOD_H1, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
   double l_iadx_180 = iADX(NULL, PERIOD_H4, 14, PRICE_CLOSE, MODE_MAIN, 0);
   double l_iadx_188 = iADX(NULL, PERIOD_H4, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
   double l_iadx_196 = iADX(NULL, PERIOD_H4, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
   double l_iadx_204 = iADX(NULL, PERIOD_D1, 14, PRICE_CLOSE, MODE_MAIN, 0);
   double l_iadx_212 = iADX(NULL, PERIOD_D1, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
   double l_iadx_220 = iADX(NULL, PERIOD_D1, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
   if (l_iadx_84 < 23.0 && l_iadx_84 != 0.0) l_color_0 = LightSkyBlue;
   if (l_iadx_84 >= 23.0 && l_iadx_92 > l_iadx_100) l_color_0 = Lime;
   if (l_iadx_84 >= 23.0 && l_iadx_92 < l_iadx_100) l_color_0 = Red;
   if (l_iadx_108 < 23.0 && l_iadx_108 != 0.0) l_color_4 = LightSkyBlue;
   if (l_iadx_108 >= 23.0 && l_iadx_116 > l_iadx_124) l_color_4 = Lime;
   if (l_iadx_108 >= 23.0 && l_iadx_116 < l_iadx_124) l_color_4 = Red;
   if (l_iadx_132 < 23.0 && l_iadx_132 != 0.0) l_color_8 = LightSkyBlue;
   if (l_iadx_132 >= 23.0 && l_iadx_140 > l_iadx_148) l_color_8 = Lime;
   if (l_iadx_132 >= 23.0 && l_iadx_140 < l_iadx_148) l_color_8 = Red;
   if (l_iadx_156 < 23.0 && l_iadx_156 != 0.0) l_color_12 = LightSkyBlue;
   if (l_iadx_156 >= 23.0 && l_iadx_164 > l_iadx_172) l_color_12 = Lime;
   if (l_iadx_156 >= 23.0 && l_iadx_164 < l_iadx_172) l_color_12 = Red;
   if (l_iadx_180 < 23.0 && l_iadx_180 != 0.0) l_color_16 = LightSkyBlue;
   if (l_iadx_180 >= 23.0 && l_iadx_188 > l_iadx_196) l_color_16 = Lime;
   if (l_iadx_180 >= 23.0 && l_iadx_188 < l_iadx_196) l_color_16 = Red;
   if (l_iadx_204 < 23.0 && l_iadx_204 != 0.0) l_color_20 = LightSkyBlue;
   if (l_iadx_204 >= 23.0 && l_iadx_212 > l_iadx_220) l_color_20 = Lime;
   if (l_iadx_204 >= 23.0 && l_iadx_212 < l_iadx_220) l_color_20 = Red;
   string l_iadx_228 = l_iadx_84;
   string l_iadx_236 = l_iadx_108;
   string l_iadx_244 = l_iadx_132;
   string l_iadx_252 = l_iadx_156;
   string l_iadx_260 = l_iadx_180;
   string l_iadx_268 = l_iadx_204;
   if (l_iadx_84 < 23.0 && l_iadx_84 != 0.0) l_text_24 = "h";
   if (l_iadx_84 >= 23.0 && l_iadx_84 < 28.0 && l_iadx_92 > l_iadx_100) l_text_24 = "ě";
   if (l_iadx_84 >= 23.0 && l_iadx_84 < 28.0 && l_iadx_92 < l_iadx_100) l_text_24 = "î";
   if (l_iadx_84 >= 28.0 && l_iadx_92 > l_iadx_100) l_text_24 = "é";
   if (l_iadx_84 >= 28.0 && l_iadx_92 < l_iadx_100) l_text_24 = "ę";
   if (l_iadx_108 < 23.0 && l_iadx_108 != 0.0) l_text_32 = "h";
   if (l_iadx_108 >= 23.0 && l_iadx_108 < 28.0 && l_iadx_116 > l_iadx_124) l_text_32 = "ě";
   if (l_iadx_108 >= 23.0 && l_iadx_108 < 28.0 && l_iadx_116 < l_iadx_124) l_text_32 = "î";
   if (l_iadx_108 >= 28.0 && l_iadx_116 > l_iadx_124) l_text_32 = "é";
   if (l_iadx_108 >= 28.0 && l_iadx_116 < l_iadx_124) l_text_32 = "ę";
   if (l_iadx_132 < 23.0 && l_iadx_132 != 0.0) l_text_40 = "h";
   if (l_iadx_132 >= 23.0 && l_iadx_132 < 28.0 && l_iadx_140 > l_iadx_148) l_text_40 = "ě";
   if (l_iadx_132 >= 23.0 && l_iadx_132 < 28.0 && l_iadx_140 < l_iadx_148) l_text_40 = "î";
   if (l_iadx_132 >= 28.0 && l_iadx_140 > l_iadx_148) l_text_40 = "é";
   if (l_iadx_132 >= 28.0 && l_iadx_140 < l_iadx_148) l_text_40 = "ę";
   if (l_iadx_156 < 23.0 && l_iadx_156 != 0.0) l_text_48 = "h";
   if (l_iadx_156 >= 23.0 && l_iadx_156 < 28.0 && l_iadx_164 > l_iadx_172) l_text_48 = "ě";
   if (l_iadx_156 >= 23.0 && l_iadx_156 < 28.0 && l_iadx_164 < l_iadx_172) l_text_48 = "î";
   if (l_iadx_156 >= 28.0 && l_iadx_172 > l_iadx_172) l_text_48 = "é";
   if (l_iadx_156 >= 28.0 && l_iadx_164 < l_iadx_172) l_text_48 = "ę";
   if (l_iadx_180 < 23.0 && l_iadx_180 != 0.0) ls_unused_56 = "h";
   if (l_iadx_180 >= 23.0 && l_iadx_180 < 28.0 && l_iadx_188 > l_iadx_196) ls_unused_56 = "ě";
   if (l_iadx_180 >= 23.0 && l_iadx_180 < 28.0 && l_iadx_188 < l_iadx_196) ls_unused_56 = "î";
   if (l_iadx_180 >= 28.0 && l_iadx_188 > l_iadx_196) ls_unused_56 = "é";
   if (l_iadx_180 >= 28.0 && l_iadx_188 < l_iadx_196) ls_unused_56 = "ę";
   if (l_iadx_204 < 23.0 && l_iadx_204 != 0.0) l_text_64 = "h";
   if (l_iadx_204 >= 23.0 && l_iadx_204 < 28.0 && l_iadx_212 > l_iadx_220) l_text_64 = "ě";
   if (l_iadx_204 >= 23.0 && l_iadx_204 < 28.0 && l_iadx_212 < l_iadx_220) l_text_64 = "î";
   if (l_iadx_204 >= 28.0 && l_iadx_212 > l_iadx_220) l_text_64 = "é";
   if (l_iadx_204 >= 28.0 && l_iadx_212 < l_iadx_220) l_text_64 = "ę";
   ObjectCreate("Trend-1", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
   ObjectSetText("Trend-1", "5 min:", 9, "Lucida Sans Regular", LightSteelBlue);
   ObjectSet("Trend-1", OBJPROP_CORNER, 0);
   ObjectSet("Trend-1", OBJPROP_XDISTANCE, 185);
   ObjectSet("Trend-1", OBJPROP_YDISTANCE, 2);
   ObjectCreate("Trend-2", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
   ObjectSetText("Trend-2", " ADX " + StringSubstr(l_iadx_228, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_0);
   ObjectSet("Trend-2", OBJPROP_CORNER, 0);
   ObjectSet("Trend-2", OBJPROP_XDISTANCE, 225);
   ObjectSet("Trend-2", OBJPROP_YDISTANCE, 2);
   ObjectCreate("Trend-2a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
   ObjectSetText("Trend-2a", l_text_24, 9, "Wingdings", l_color_0);
   ObjectSet("Trend-2a", OBJPROP_CORNER, 0);
   ObjectSet("Trend-2a", OBJPROP_XDISTANCE, 288);
   ObjectSet("Trend-2a", OBJPROP_YDISTANCE, 2);
   ObjectCreate("Trend-3", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
   ObjectSetText("Trend-3", "15 min:", 9, "Lucida Sans Regular", LightSteelBlue);
   ObjectSet("Trend-3", OBJPROP_CORNER, 0);
   ObjectSet("Trend-3", OBJPROP_XDISTANCE, 318);
   ObjectSet("Trend-3", OBJPROP_YDISTANCE, 2);
   ObjectCreate("Trend-4", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
   ObjectSetText("Trend-4", " ADX " + StringSubstr(l_iadx_236, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_4);
   ObjectSet("Trend-4", OBJPROP_CORNER, 0);
   ObjectSet("Trend-4", OBJPROP_XDISTANCE, 363);
   ObjectSet("Trend-4", OBJPROP_YDISTANCE, 2);
   ObjectCreate("Trend-4a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
   ObjectSetText("Trend-4a", l_text_32, 9, "Wingdings", l_color_4);
   ObjectSet("Trend-4a", OBJPROP_CORNER, 0);
   ObjectSet("Trend-4a", OBJPROP_XDISTANCE, 426);
   ObjectSet("Trend-4a", OBJPROP_YDISTANCE, 2);
   ObjectCreate("Trend-5", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
   ObjectSetText("Trend-5", "30 min:", 9, "Lucida Sans Regular", LightSteelBlue);
   ObjectSet("Trend-5", OBJPROP_CORNER, 0);
   ObjectSet("Trend-5", OBJPROP_XDISTANCE, 453);
   ObjectSet("Trend-5", OBJPROP_YDISTANCE, 2);
   ObjectCreate("Trend-6", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
   ObjectSetText("Trend-6", " ADX " + StringSubstr(l_iadx_244, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_8);
   ObjectSet("Trend-6", OBJPROP_CORNER, 0);
   ObjectSet("Trend-6", OBJPROP_XDISTANCE, 496);
   ObjectSet("Trend-6", OBJPROP_YDISTANCE, 2);
   ObjectCreate("Trend-6a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
   ObjectSetText("Trend-6a", l_text_40, 9, "Wingdings", l_color_8);
   ObjectSet("Trend-6a", OBJPROP_CORNER, 0);
   ObjectSet("Trend-6a", OBJPROP_XDISTANCE, 557);
   ObjectSet("Trend-6a", OBJPROP_YDISTANCE, 2);
   ObjectCreate("Trend-7", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
   ObjectSetText("Trend-7", "1 H:", 9, "Lucida Sans Regular", LightSteelBlue);
   ObjectSet("Trend-7", OBJPROP_CORNER, 0);
   ObjectSet("Trend-7", OBJPROP_XDISTANCE, 580);
   ObjectSet("Trend-7", OBJPROP_YDISTANCE, 2);
   ObjectCreate("Trend-8", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
   ObjectSetText("Trend-8", " ADX " + StringSubstr(l_iadx_252, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_12);
   ObjectSet("Trend-8", OBJPROP_CORNER, 0);
   ObjectSet("Trend-8", OBJPROP_XDISTANCE, 610);
   ObjectSet("Trend-8", OBJPROP_YDISTANCE, 2);
   ObjectCreate("Trend-8a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
   ObjectSetText("Trend-8a", l_text_48, 9, "Wingdings", l_color_12);
   ObjectSet("Trend-8a", OBJPROP_CORNER, 0);
   ObjectSet("Trend-8a", OBJPROP_XDISTANCE, 672);
   ObjectSet("Trend-8a", OBJPROP_YDISTANCE, 2);
   ObjectCreate("Trend-9", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
   ObjectSetText("Trend-9", "4 H:", 9, "Lucida Sans Regular", LightSteelBlue);
   ObjectSet("Trend-9", OBJPROP_CORNER, 0);
   ObjectSet("Trend-9", OBJPROP_XDISTANCE, 702);
   ObjectSet("Trend-9", OBJPROP_YDISTANCE, 2);
   ObjectCreate("Trend-10", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
   ObjectSetText("Trend-10", " ADX " + StringSubstr(l_iadx_260, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_16);
   ObjectSet("Trend-10", OBJPROP_CORNER, 0);
   ObjectSet("Trend-10", OBJPROP_XDISTANCE, 732);
   ObjectSet("Trend-10", OBJPROP_YDISTANCE, 2);
   ObjectCreate("Trend-10a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
   ObjectSetText("Trend-10a", l_text_64, 9, "Wingdings", l_color_20);
   ObjectSet("Trend-10a", OBJPROP_CORNER, 0);
   ObjectSet("Trend-10a", OBJPROP_XDISTANCE, 793);
   ObjectSet("Trend-10a", OBJPROP_YDISTANCE, 2);
   if (D_ADX == TRUE) {
      ObjectCreate("Trend-11", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
      ObjectSetText("Trend-11", "Denní:", 9, "Lucida Sans Regular", LightSteelBlue);
      ObjectSet("Trend-11", OBJPROP_CORNER, 0);
      ObjectSet("Trend-11", OBJPROP_XDISTANCE, 823);
      ObjectSet("Trend-11", OBJPROP_YDISTANCE, 2);
      ObjectCreate("Trend-12", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
      ObjectSetText("Trend-12", " ADX " + StringSubstr(l_iadx_268, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_20);
      ObjectSet("Trend-12", OBJPROP_CORNER, 0);
      ObjectSet("Trend-12", OBJPROP_XDISTANCE, 863);
      ObjectSet("Trend-12", OBJPROP_YDISTANCE, 2);
      ObjectCreate("Trend-12a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
      ObjectSetText("Trend-12a", l_text_64, 9, "Wingdings", l_color_20);
      ObjectSet("Trend-12a", OBJPROP_CORNER, 0);
      ObjectSet("Trend-12a", OBJPROP_XDISTANCE, 923);
      ObjectSet("Trend-12a", OBJPROP_YDISTANCE, 2);
   }
   return (0);
}

5 komentářů:

  1. 4 EMA Trend MT4 Indicator
    http://www.forexmetatraderindicators.com/4-ema-trend-mt4-indicator/

    Forex Indicators Guide
    http://www.forexmetatraderindicators.com/forex-indicators-guide/


    InformedTrades
    18. How to Trade Moving Averages Like a Pro Part 1
    http://www.youtube.com/user/InformedTrades#p/c/33D0C18CDEBF64B7/17/gw-1AhbYP8Q

    19. How toTrade Moving Averages Like a Pro Part 2
    http://www.youtube.com/watch?v=25WiPIndXtA&

    OdpovědětVymazat
  2. Sell and Close long/ buy and close short in same time

    http://www.molanis.com/forum/viewtopic.php?f=3&t=157

    molanis.com/forum


    Moving Average Strategy (Expert Advisor for MetaTrader)
    http://www.molanis.com/support/online-tutorials/forex-moving-average-strategy

    OdpovědětVymazat
  3. Zignals

    Search Strategies
    Our strategy MarketPlace offers strategies covering stocks, forex and commodities. Choose from Managed (Publisher controlled) or Long and Short automated strategies (StrategyStudio created). Preview for Free with delayed signals - upgrade to a full subscription when you want real-time signals...

    http://www.zignals.com/main/trading_strategies/market_trading_strategies.aspx

    http://www.youtube.com/user/Zignals

    http://www.youtube.com/watch?v=vypzrQ_Ft2Y&feature=related

    OdpovědětVymazat
  4. iExpertAdvisor

    www.youtube.com/user/iExpertAdvisor

    www.iExpertAdvisor.com/

    OdpovědětVymazat
  5. http://www.iexpertadvisor.com/freemqlcode.asp

    the manual MQL is here

    OdpovědětVymazat