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);
}
//+------------------------------------------------------------------+



Sample





Analysis



Market Information Used:

Series array that contains the highest prices of each bar
Series array that contains the lowest prices of each bar
Series array that contains close prices for each bar


Indicator Curves created:


Implements a curve of type DRAW_LINE

Indicators Used:



Custom Indicators Used:

Order Management characteristics:

Other Features: