#property copyright "ABHAFXS TIMING SIGNALS V03"
#property link      "http://OAN4X.COM// "

#property indicator_separate_window
#property indicator_buffers 2
#property indicator_color1 Lime
#property indicator_color2 Red

extern int SSP = 5;
extern double Kmax = 50.6;
extern int CountBars = 1000;
double g_ibuf_92[];
double g_ibuf_96[];
double g_ibuf_100[];
double g_ibuf_104[];

int init() {
   if (Year() == 2009 && Month() >= 8 && Day() >= 15) {
      Alert("SYSTEM IS EXPIRED ");
      Alert("Please Contact dc_orabi@hotmail.com ");
      return (0);
   }
   IndicatorBuffers(4);
   SetIndexStyle(0, DRAW_HISTOGRAM, STYLE_SOLID, 0);
   SetIndexBuffer(0, g_ibuf_100);
   SetIndexStyle(1, DRAW_LINE, STYLE_SOLID, 0);
   SetIndexBuffer(1, g_ibuf_104);
   SetIndexBuffer(2, g_ibuf_92);
   SetIndexBuffer(3, g_ibuf_96);
   IndicatorShortName("ABHAFXS-OAN [V03]");
   return (0);
}

int deinit() {
   return (0);
}

int start() {
   double ld_0;
   double ld_8;
   double ld_16;
   if (CountBars >= Bars) CountBars = Bars;
   SetIndexDrawBegin(0, Bars - CountBars + SSP);
   SetIndexDrawBegin(1, Bars - CountBars + SSP);
   int l_ind_counted_24 = IndicatorCounted();
   if (Bars <= SSP + 1) return (0);
   if (l_ind_counted_24 < SSP + 1) {
      for (int li_28 = 1; li_28 <= SSP; li_28++) g_ibuf_92[CountBars - li_28] = 0.0;
      for (li_28 = 1; li_28 <= SSP; li_28++) g_ibuf_96[CountBars - li_28] = 0.0;
   }
   for (li_28 = CountBars - SSP; li_28 >= 0; li_28--) {
      ld_0 = High[iHighest(NULL, 0, MODE_HIGH, SSP, li_28 - SSP + 1)];
      ld_8 = Low[iLowest(NULL, 0, MODE_LOW, SSP, li_28 - SSP + 1)];
      ld_16 = ld_0 - (ld_0 - ld_8) * Kmax / 100.0;
      g_ibuf_92[li_28 - SSP + 6] = ld_16;
      g_ibuf_96[li_28 - SSP - 1] = ld_16;
   }
   for (int li_32 = CountBars - SSP; li_32 >= 0; li_32--) {
      if (g_ibuf_92[li_32] > g_ibuf_96[li_32]) {
         g_ibuf_100[li_32] = 1;
         g_ibuf_104[li_32] = 0;
      } else {
         g_ibuf_100[li_32] = 0;
         g_ibuf_104[li_32] = 1;
      }
   }
   return (0);
}