REI

//+------------------------------------------------------------------+
//|                                                          REI.mq4 |
//|                                         Copyright © 2009, LeMan. |
//|                                                 b-market@mail.ru |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2009, LeMan"
#property link      "b-market@mail.ru"
//----
#property indicator_separate_window
#property indicator_buffers 1
#property indicator_color1 Blue
#property indicator_level1 60
#property indicator_level2 -60
//---- Âõîäíûå ïàðàìåòðû
extern int REIPeriod = 5;
//---- Áóôåðû
double REIBuffer[];
//+------------------------------------------------------------------+
//| Ôóíêöèÿ èíèöèàëèçàöèè                                            |
//+------------------------------------------------------------------+
int init() {
   string short_name;
   IndicatorBuffers(1);   
   IndicatorShortName("REI ("+REIPeriod+")");
//---- Ëèíèè èíäèêàòîðà
   SetIndexBuffer(0, REIBuffer);      
   SetIndexStyle(0, DRAW_LINE);
   SetIndexDrawBegin(0,REIPeriod+9);
//----
   return(0);
}
double SV(int i = 0) {

   double var1 = High[i] - High[i+2];
   double var2 = Low[i] - Low[i+2];
   
   if (High[i+2] < Close[i+7] && High[i+2] < Close[i+8] && High[i] < High[i+5] && High[i] < High[i+6]) {
      int num_zero = 0;
   } else {
      num_zero = 1;
   }
   
   if (Low[i+2] > Close[i+7] && Low[i+2] > Close[i+8] && Low[i] > Low[i+5] && Low[i] > Low[i+6]) {
      int num_zero2 = 0;
   } else {
      num_zero2 = 1;
   }
   
   return((num_zero*num_zero2*var1)+(num_zero*num_zero2*var2));
}
double ADV(int i = 0) {
   double var3 = MathAbs(High[i] - High[i+2]);
   double var4 = MathAbs(Low[i] - Low[i+2]);
   return(var3+var4);
}
//+------------------------------------------------------------------+
//| Ìåòîä Êàèðè                                                      |
//+------------------------------------------------------------------+
int start() {

   int i, k, counted_bars = IndicatorCounted();
//----
   if (Bars <= 8+REIPeriod) return(0);
   if (counted_bars > 0) counted_bars--;
   int limit = Bars-counted_bars;   

      
   for(i = 0; i <= limit; i++) {      
      double sv = 0.0;
      double adv = 0.0;   
      for(k = 0; k < REIPeriod; k++) {   
         adv += ADV(i+k);         
      }      
      for(k = 0; k < REIPeriod; k++) {   
         sv += SV(i+k);
      }
      REIBuffer[i] = (sv/adv)*100;      
   }

   return(0);
}
//+------------------------------------------------------------------+