//+------------------------------------------------------------------+
//|                                   显示垂直线.mq4 |
//|                 Copyright 2017, metaQuotes Software Corp. |
//|                               https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright ....h
#property link      hayseedville.com
#property indicator_chart_window
extern string linename     = vertical
extern int    bar          =        3;
extern color verticalcolor   =    Magenta;
extern int    verticalstyle   =        0;
extern int    verticalsize    =        2;
//+------------------------------------------------------------------+
//| expert initialization function                       |
//+------------------------------------------------------------------+
int init()
 {
//----
//----
   return(0);
 }
//+------------------------------------------------------------------+
//| expert deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
 {
//----
ObjectDelete(linename);
//----
   return(0);
 }
//+------------------------------------------------------------------+
//| expert start function                             |
//+------------------------------------------------------------------+
int start()
 {
//----
ObjectDelete(linename);
ObjectCreate(linename,OBJ_VLINE,0,Time[bar],Bid);
ObjectSet(linename,OBJPROP_STYLE,verticalstyle);
ObjectSet(linename,OBJPROP_WIDTH,verticalstyle);
ObjectSet(linename,OBJPROP_COLOR,verticalcolor);
//----
   return(0);
 }
//+------------------------------------------------------------------+