#property indicator_chart_window



double typ[];

double MaDiff[];

double DiffPlant[];

double ADiff[];

double G_ibuf_92[];

double G_ibuf_96[];

double Gda_unused_100[];

double Gda_unused_104[];



// E37F0136AA3FFAF149B351F6A4C948E9

void init() {

   IndicatorBuffers(8);

   SetIndexBuffer(0, typ);

   SetIndexStyle(0, DRAW_LINE);

   SetIndexDrawBegin(0, 20);

   SetIndexBuffer(1, MaDiff);

   SetIndexStyle(1, DRAW_LINE);

   SetIndexDrawBegin(1, 20);

   SetIndexBuffer(2, DiffPlant);

   SetIndexStyle(2, DRAW_LINE);

   SetIndexDrawBegin(2, 20);

   SetIndexBuffer(3, ADiff);

   SetIndexStyle(3, DRAW_LINE);

   SetIndexDrawBegin(3, 20);

   SetIndexBuffer(4, G_ibuf_92);

   SetIndexStyle(4, DRAW_LINE, STYLE_SOLID, 1);

   SetIndexDrawBegin(4, 20);

   SetIndexBuffer(5, G_ibuf_96);

   SetIndexStyle(5, DRAW_LINE, STYLE_SOLID, 2);

   SetIndexDrawBegin(5, 20);

}



void deinit() {

}



void start() {

   int Li_0;

   int Li_4 = IndicatorCounted();

   if (Li_4 >= 0) {

      if (Li_4 > 0) Li_4--;

      Li_0 = Bars - Li_4;

      for (int Li_8 = 0; Li_8 < Li_0; Li_8++) typ[Li_8] = 10.0 * ((2.0 * Close[Li_8] + High[Li_8] + Low[Li_8]) / 4.0);

      for (Li_8 = 0; Li_8 < Li_0; Li_8++) MaDiff[Li_8] = iMAOnArray(typ, 0, 13, 0, MODE_EMA, Li_8) - iMAOnArray(typ, 0, 34, 0, MODE_EMA, Li_8);

      for (Li_8 = 0; Li_8 < Li_0; Li_8++) DiffPlant[Li_8] = iMAOnArray(MaDiff, 0, 5, 0, MODE_EMA, Li_8);

      for (Li_8 = 0; Li_8 < Li_0; Li_8++) ADiff[Li_8] = 5.5 * (2.0 * (MaDiff[Li_8] - DiffPlant[Li_8]));

      for (Li_8 = 0; Li_8 < Li_0; Li_8++) 

      {

         if (ADiff[Li_8] <= 0.0) G_ibuf_92[Li_8] = ADiff[Li_8];

         else G_ibuf_92[Li_8] = 0;

         if (ADiff[Li_8] > 0.0) G_ibuf_96[Li_8] = ADiff[Li_8];

         else G_ibuf_96[Li_8] = 0;

      }

   }

}