/*
   Generated by EX4-TO-MQ4 decompiler V4.0.224.1 []
   Website: http://purebeam.biz
   E-mail : purebeam@gmail.com
*/
#property copyright "Copyright © 2010, Forexsignal30.com"
#property link      "http://www.forexsignal30.com"

#property indicator_separate_window
#property indicator_buffers 3
#property indicator_color1 Black
#property indicator_color2 Yellow
#property indicator_color3 Red

extern int period = 10;
double gda_80[];
double gda_84[];
double gda_88[];

int init() {
   SetIndexStyle(0, DRAW_NONE);
   SetIndexStyle(1, DRAW_HISTOGRAM);
   SetIndexStyle(2, DRAW_HISTOGRAM);
   IndicatorDigits(Digits + 1);
   SetIndexBuffer(0, gda_80);
   SetIndexBuffer(1, gda_84);
   SetIndexBuffer(2, gda_88);
   IndicatorShortName("FS30_Histogram");
   SetIndexLabel(1, NULL);
   SetIndexLabel(2, NULL);
   return (0);
}

int start() {
   double ld_8;
   double ld_16;
   double ld_80;
   int li_4 = IndicatorCounted();
   double ld_32 = 0;
   double ld_40 = 0;
   double ld_48 = 0;
   double ld_56 = 0;
   double ld_64 = 0;
   double ld_72 = 0;
   double ld_88 = 0;
   double ld_96 = 0;
   if (li_4 > 0) li_4--;
   int li_0 = Bars - li_4;
   for (int li_104 = 0; li_104 < li_0; li_104++) {
      ld_96 = High[iHighest(NULL, 0, MODE_HIGH, period, li_104)];
      ld_88 = Low[iLowest(NULL, 0, MODE_LOW, period, li_104)];
      ld_80 = (High[li_104] + Low[li_104]) / 2.0;
      ld_32 = 0.66 * ((ld_80 - ld_88) / (ld_96 - ld_88) - 0.5) + 0.67 * ld_40;
      ld_32 = MathMin(MathMax(ld_32, -0.999), 0.999);
      gda_80[li_104] = MathLog((ld_32 + 1.0) / (1 - ld_32)) / 2.0 + ld_64 / 2.0;
      ld_40 = ld_32;
      ld_64 = gda_80[li_104];
   }
   bool li_108 = TRUE;
   for (li_104 = li_0 - 2; li_104 >= 0; li_104--) {
      ld_16 = gda_80[li_104];
      ld_8 = gda_80[li_104 + 1];
      if ((ld_16 < 0.0 && ld_8 > 0.0) || ld_16 < 0.0) li_108 = FALSE;
      if ((ld_16 > 0.0 && ld_8 < 0.0) || ld_16 > 0.0) li_108 = TRUE;
      if (!li_108) {
         gda_88[li_104] = ld_16;
         gda_84[li_104] = 0.0;
      } else {
         gda_84[li_104] = ld_16;
         gda_88[li_104] = 0.0;
      }
   }
   return (0);
}