//+------------------------------------------------------------------+
//|                                            FXPT_DailyHiLoBox.mq4 |
//|                                         Developed by fxprotrader |
//|                                     http://www.fxpro-trader.com" |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2015, fxprotrader"
#property description "Plotlines"
#property link      "http://www.fxpro-trader.com"
#property strict
#property indicator_chart_window


//-------- HISTORY----------------
// v0.1 Initial release(10052015)

#include <stdlib.mqh>   

#property show_inputs
 

//+------ CHANGE HERE SUPPORT LINE PARAMETERS -----------------------+
input  string Comment1="Line Inputs";

input double    LevelPrc=120.70;
input int       Start=0;
input int       End=50;
 
 
input string LineName ="Res1";
input color LineColor=Red;
input int LineStyle=STYLE_DASH;
input int LineWidth=2;

input  string Comment2="Text Inputs";
input string Comment3 ="Leave TextDescription blank for no label";
input string TextDescription ="Support";
input int TextLoc=15;
input int FontSize = 10;
input string FontFace = "Verdana";
input color FontColor = LimeGreen;


//global
double Poin;

//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init() {

if (Point == 0.00001) Poin = 0.0001; 
else if (Point == 0.001) Poin = 0.01; 
else Poin = Point; 


   return(0);
}
//+------------------------------------------------------------------+
//                                                                   +
//+------------------------------------------------------------------+
int start(){ 

 string sObjName="FXPTPlotLn1_"+LineName;
 ObjectDelete(sObjName);
  ObjectCreate(sObjName, OBJ_TREND, 0,Time[Start],LevelPrc ,Time[End], LevelPrc);
  ObjectSet(sObjName, OBJPROP_COLOR, LineColor);
  ObjectSet(sObjName, OBJPROP_STYLE, LineStyle);
  ObjectSet(sObjName, OBJPROP_WIDTH, LineWidth);
  ObjectSet(sObjName, OBJPROP_RAY, false); 

 sObjName="FXPTPlotAR1_"+LineName;
 ObjectDelete(sObjName);
  ObjectCreate(sObjName, OBJ_ARROW, 0,Time[Start],LevelPrc);
  ObjectSet(sObjName, OBJPROP_ARROWCODE, 6); 
  ObjectSet(sObjName, OBJPROP_COLOR, LineColor);

if(TextDescription){
 sObjName="FXPTPlotTXT1_"+LineName;
 ObjectDelete(sObjName);
ObjectCreate(sObjName, OBJ_TEXT,0, Time[End],LevelPrc+(TextLoc*Poin));
 ObjectSetText(sObjName,TextDescription, FontSize, FontFace, FontColor);
}
return(0);
}