//+------------------------------------------------------------------+
//|                                            Draw BAR_HILOZONE.mq4 |
//|                                                                  |
//|                                                                  |
//+------------------------------------------------------------------+
#property copyright ""
#property link      ""

//+------------------------------------------------------------------+
//| script program start function                                    |
//+------------------------------------------------------------------+
int start()
  {
//----
//****CHANGE COLORS HERE****
color topcolor=Magenta;
color botcolor=LimeGreen;
color MN_Color=PowderBlue; 
color W1_Color=Olive;
color D1_Color=FireBrick; 
color H4_Color=PowderBlue;
color H1_Color=DarkKhaki;
color M30_Color=OliveDrab; 
color M15_Color=Gray; 
color M5_Color=Brown;
color M1_Color=SandyBrown; 
color textcolor=Snow;
//****DON'T TOUCH BELOW HERE****
datetime time=WindowTimeOnDropped();
double price=WindowPriceOnDropped();

int time_shift=iBarShift(Symbol(),0,time,true);

double Open_Price=Open[time_shift];
double Close_Price=Close[time_shift];
double High_Price=High[time_shift];
double Low_Price=Low[time_shift];

int Dir;

if(Open_Price<Close_Price) {Dir = 1; }
if(Open_Price>Close_Price) {Dir = -1; }
if(Open_Price==Close_Price) {Dir = 0; }

datetime thefuture=Time[0]+31536000;
datetime nextbar=iTime(Symbol(),0,time_shift-1);

if(Digits==3 || Digits==5)
double vPoint = Point*10; 
   else 
      vPoint = Point;
      
string pipscounted;      
if(Dir == -1)
 {      
 pipscounted = DoubleToStr((Close_Price-Low_Price)/vPoint,0);
 }
 
if(Dir == 1)
 {      
 pipscounted = DoubleToStr((High_Price-Close_Price)/vPoint,0);
 } 
 
string innerline=pipscounted+" Pips "+time;
string period; color innercolor;
if(Period() == 43200) {period = "MN"; innercolor = MN_Color;} 
if(Period() == 10080) {period = "W1"; innercolor = W1_Color;} 
if(Period() == 1440) {period = "D1"; innercolor = D1_Color;}
if(Period() == 240) {period = "H4"; innercolor = H4_Color;}
if(Period() == 60) {period = "H1"; innercolor = H1_Color;}   
if(Period() == 30) {period = "M30"; innercolor = M30_Color;} 
if(Period() == 15) {period = "M15"; innercolor = M15_Color;} 
if(Period() == 5) {period = "M5"; innercolor = M5_Color;} 
if(Period() == 1) {period = "M1"; innercolor = M1_Color;} 

string SRLabel = "None";
if(Dir == -1)
 {
ObjectCreate(innerline,OBJ_RECTANGLE,0,time,Close_Price,thefuture,Low_Price);
SRLabel = "Sup";
 }
 
if(Dir == 1)
 {
ObjectCreate(innerline,OBJ_RECTANGLE,0,time,High_Price,thefuture,Close_Price);
SRLabel = "Res";
 }
  
// ObjectSet(topline,OBJPROP_COLOR,topcolor);
// ObjectSet(botline,OBJPROP_COLOR,botcolor);
ObjectSet(innerline,OBJPROP_COLOR,innercolor);
ObjectSet(innerline,OBJPROP_BACK,true);
ObjectSetText(innerline,period+" "+SRLabel+" "+pipscounted+" Pips",9,"Berlin Sans FB",textcolor);


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