Navigation:Home > Content >

NRTR_WATR1.mq4

Time: 2015-10-02 | Download file:NRTR_WATR1.mq4

//+------------------------------------------------------------------+
//|                                                    NRTR WATR.mq4 |
//|                                                                  |
//|                                        Ramdass - Conversion only |
//+------------------------------------------------------------------+

#property indicator_chart_window
#property indicator_buffers 2
#property indicator_color1 Blue
#property indicator_color2 Red
//---- input parameters
extern int AveragePeriod=10;
extern int Variant=2;
extern int CountBars=300;

//---- buffers
double value1[];
double value2[];
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {

//---- indicator line
   IndicatorBuffers(2);
   SetIndexStyle(0,DRAW_ARROW);
   SetIndexArrow(0,167);
   SetIndexStyle(1,DRAW_ARROW);
   SetIndexArrow(1,167);
   SetIndexBuffer(0,value1);
   SetIndexBuffer(1,value2);
//----
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| NRTR WATR                                                        |
//+------------------------------------------------------------------+
int start()
  {
   if (CountBars>=Bars) CountBars=Bars - AveragePeriod - 2;
//   CountBars = CountBars - AveragePeriod - 3;
   SetIndexDrawBegin(0,Bars-CountBars+1);
   SetIndexDrawBegin(1,Bars-CountBars+1);
   int i,i2,bar,counted_bars=IndicatorCounted();
   double value,WATR;
   double trend=1,dK,AvgRange,price,AveragePeriod_D;
   AveragePeriod_D=AveragePeriod;
//----
   if(Bars<=AveragePeriod) return(0);
//---- initial zero
   if(counted_bars<1)
   {
      for(i=1;i<=AveragePeriod;i++) value1[Bars-i]=0.0;
      for(i=1;i<=AveragePeriod;i++) value2[Bars-i]=0.0;
   }
AvgRange=0;

if ((Variant == 2) || (Variant == 3))
   {
   for (i=AveragePeriod; i>=1; i--)
       {
       dK = 1+(AveragePeriod_D-i)/AveragePeriod_D;
       AvgRange=AvgRange + dK*MathAbs(High[i]-Low[i]);
       }
   if (Symbol()=="USDJPY" || Symbol()=="GBPJPY" || Symbol()=="EURJPY")
   {WATR = AvgRange/AveragePeriod_D/100;}
   else    
   {WATR = AvgRange/AveragePeriod_D;}
   }
   
   
if (Variant == 1)  
   {
   for (i=1; i<=AveragePeriod; i++)
       {
       dK = 1+(AveragePeriod_D-i)/AveragePeriod_D;
       AvgRange=AvgRange + dK*MathAbs(High[CountBars + i]-Low[CountBars + i]);
       }
   WATR = AvgRange/AveragePeriod_D;
   }

if (Close[CountBars-1] > Open[CountBars-1])
   {
   value1[CountBars - 1] = Close[CountBars - 1] * (1 - WATR);
   trend = 1; value2[CountBars - 1] = 0.0;
   }

if (Close[CountBars-1] < Open[CountBars-1])
   {
   value2[CountBars - 1] = Close[CountBars - 1] * (1 + WATR);
   trend = -1; value1[CountBars - 1] = 0.0;
   }

//----
   bar=CountBars;
   while(bar>=0)
     {
value1[bar]=0.0; value2[bar]=0.0;

    if (Variant == 3)
    {
        AvgRange=0;
        for (i=1; i<=AveragePeriod; i++)
            {
            dK = 1+(AveragePeriod_D-i)/AveragePeriod_D;
            AvgRange=AvgRange+ dK*MathAbs(High[bar + i]-Low[bar + i]);
            }
        WATR = AvgRange/AveragePeriod_D;
    }
    if (trend == 1)
      {
       if (Close[bar] > price) price = Close[bar];
       value = price - WATR;
       if (Close[bar] < value) 
         {
          price = Close[bar];
          value = price + WATR;
          trend = -1;
          }
       }
    if (trend == -1) 
      {
       if (Close[bar] < price) price = Close[bar];
       value = price + WATR;
       if (Close[bar] > value)
          {
          price = Close[bar];
          value = price - WATR;
          trend = 1;
          }
       }
    
if (trend == 1)  {value1[bar]=value; value2[bar]=0.0;}
if (trend == -1)  {value2[bar]=value; value1[bar]=0.0;}

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

Recommend