//+------------------------------------------------------------------+
//|                                               ChikouSpanLine.mq4 |
//|                                                      RedLineFred |
//|                                                                  |
//+------------------------------------------------------------------+
#property copyright "RedLineFred"
#property link      ""

#property indicator_chart_window

extern int 		Kijun_sen = 26;
extern color 	LineColor = Lime;
extern int 		LineType  = 0;
extern int 		LineWidth = 1;


//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
//---- indicators
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//----
   	ObjectDelete("ChikouSpanLine");

//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
{
//----


	ObjectDelete("ChikouSpanLine");
	line("ChikouSpanLine", Time[0], Close[0], Time[Kijun_sen], Close[0], LineColor, LineType, LineWidth, "", false) ;


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



string line(string name, datetime t1, double p1, datetime t2, double p2, color clr = Red, int LT=1, int LW=1, string label = "", bool ray = False) 
{
  	if (ObjectFind(name) == -1) 
  	{
     	ObjectCreate(name, OBJ_TREND, 0, t1, p1, t2, p2);
  	}
  	ObjectSet(name, OBJPROP_STYLE, LT);
  	ObjectSet(name, OBJPROP_WIDTH, LW);
  	ObjectSet(name, OBJPROP_COLOR, clr);
  	ObjectSet(name, OBJPROP_RAY, ray);
  	ObjectSet(name, OBJPROP_TIME1, t1);
  	ObjectSet(name, OBJPROP_TIME2, t2);
  	ObjectSet(name, OBJPROP_PRICE1, p1);
  	ObjectSet(name, OBJPROP_PRICE2, p2);
  	ObjectSetText(name, label);

   	return(name);
}