#property link      "http://www.themovingaverage.com"
#property indicator_chart_window

#property indicator_buffers 4
#property indicator_color1 Red
#property indicator_color2 Red
#property indicator_color3 Red
#property indicator_color4 Red

double ExtMapBuffer1[];
double ExtMapBuffer2[];
double ExtMapBuffer3[];
double ExtMapBuffer4[];

extern int firstback=50;
extern int secondback=14;
extern int countbars=200;
extern int power=2;

int init()
  {
   SetIndexStyle(0,DRAW_LINE);
   SetIndexBuffer(0,ExtMapBuffer1);
   SetIndexStyle(1,DRAW_LINE);
   SetIndexBuffer(1,ExtMapBuffer2);
   SetIndexStyle(2,DRAW_LINE);
   SetIndexBuffer(2,ExtMapBuffer3);
   SetIndexStyle(3,DRAW_LINE);
   SetIndexBuffer(3,ExtMapBuffer4);
   return(0);
  }
int deinit()
  {
   return(0);
  }
int start()
  {
   int counted_bars=IndicatorCounted();
   int pos;
   int cnt;
   int mult;
   double first,second;
   ArrayInitialize(ExtMapBuffer1,0);
   ArrayInitialize(ExtMapBuffer2,0);
   pos=countbars;
   while (pos>-1)
   {
      mult=firstback+1;
      first=0;
      second=0;
      for (cnt=pos;cnt<pos+firstback;cnt++)   
      {
         mult--;
         first=first+(Close[cnt]*MathPow(mult,power));
         Print (cnt);
      }
      mult=firstback+1;
      for (cnt=pos;cnt<pos+firstback;cnt++)   
      {
         mult--;
         second=second+MathPow(mult,power);
      }
      ExtMapBuffer1[pos]=first/second;
      pos--;
   }

   pos=countbars;
   while (pos>-1)
   {
      mult=secondback+1;
      first=0;
      second=0;
      for (cnt=pos;cnt<pos+secondback;cnt++)   
      {
         mult--;
         first=first+(Close[cnt]*MathPow(mult,power));
         Print (cnt);
      }
      mult=secondback+1;
      for (cnt=pos;cnt<pos+secondback;cnt++)   
      {
         mult--;
         second=second+MathPow(mult,power);
      }
      ExtMapBuffer2[pos]=first/second;
      pos--;
   }
   return(0);
  }