//+------------------------------------------------------------------+
//|                                           Daily Range PeterE.mq4 |
//+------------------------------------------------------------------+

#property indicator_chart_window

extern int      NumOfDays             = 10;
extern string   FontName              = "Courier New";
extern int      FontSize              = 10;
extern color    FontColor             = White;
extern int      Window                = 0;
extern int      Corner                = 2;
extern int      HorizPos              = 5;
extern int      VertPos               = 20;

double pnt;
int    dig;
string objname = "*DRPE";

//+------------------------------------------------------------------+
int init()  {
//+------------------------------------------------------------------+
  pnt = MarketInfo(Symbol(),MODE_POINT);
  dig = MarketInfo(Symbol(),MODE_DIGITS);
  if (dig == 3 || dig == 5) {
    pnt *= 10;
  }  
  ObjectCreate(objname,OBJ_LABEL,Window,0,0);
  return(0);
}

//+------------------------------------------------------------------+
int deinit()  {
//+------------------------------------------------------------------+
  ObjectDelete(objname);
  return(0);
}

//+------------------------------------------------------------------+
int start()  {
//+------------------------------------------------------------------+
   int R1=0,R5=0,R10=0;
 
   string   Text="";
   int j=0;

   R1 =  (iHigh(NULL,PERIOD_D1,0)-iLow(NULL,PERIOD_D1,0))/pnt;
   for(j=1;j<=5;j++)
      R5    =    R5  +  (iHigh(NULL,PERIOD_D1,j)-iLow(NULL,PERIOD_D1,j))/pnt;
   for(j=1;j<=10;j++)
      R10   =    R10 +  (iHigh(NULL,PERIOD_D1,j)-iLow(NULL,PERIOD_D1,j))/pnt;
   
   R5 = R5/5;
   R10 = R10/10;

   Text =   "ADR Today: " + R1 + "  5D: " + R5 + "  10D: " +  R10   + "\n";    

   if(j>0 && pnt>0)  {
    string objtext = (Text);
    ObjectSet(objname,OBJPROP_CORNER,Corner);
    ObjectSet(objname,OBJPROP_XDISTANCE,HorizPos);
    ObjectSet(objname,OBJPROP_YDISTANCE,VertPos);
    ObjectSetText(objname,objtext,FontSize,FontName,FontColor);
   }  
   return(0);
}