//+------------------------------------------------------------------+
//|                                                steinitz_test.mq4 |
//|                      Copyright © 2007, MetaQuotes Software Corp. |
//|                                        http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2007, MetaQuotes Software Corp."
#property link      "http://www.metaquotes.net"

extern int     MagicNumber =  30000;

extern string  hd = " --Delay time after last trade--";
extern bool     useDelayAfterTrade = true;
extern int     MinutesToDelay = 30;

extern string  to="---Text Object Settings---";
extern int 		CommentTxtSize = 10;
extern color 	CommentColor   = White;

int            Comment1Y;
string         Comment1Label;

datetime StopTime;                 // Time to wait after a trade is stopped out

//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
  {
//----

     DeleteExistingLabels();
     SetupLabels();
     ClearLabels();
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
  {
//----

   ClearLabels();
   DeleteExistingLabels();
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
{
   int NumOrders = 0;
   
// Reset labels in case of disconnect from server

   if (Comment1Y < 10)
   {
     SetupLabels();
     ClearLabels();
     DeleteExistingLabels();
     SetupLabels();// Make sure label settings are OK
   }

   NumOrders = CalculateCurrentOrders(MagicNumber);
   if(NumOrders == 0)
   {
// Check if last trade stopped out

      if (useDelayAfterTrade == 1)
      {
        StopTime = LastTradeStoppedOut();
        if  (TimeCurrent() < StopTime)
        {
          OutputComment1ToChart("No Trades Until : " + TimeToStr(StopTime,TIME_DATE|TIME_MINUTES));
         return(0);
        }
        OutputComment1ToChart("Trading Resumed ");
      }
      
// Your code for placing trades

   }
   else
   {
      RefreshRates();
      
// Your code to handle open trades

   }
   
   return(0);
}


//+------------------------------------------------------------------+
//| LastTradeStoppedOut                                              |
//| Check History to see if last trade stopped out                   |
//| Return Time for next trade                                       |
//+------------------------------------------------------------------+
  
datetime LastTradeStoppedOut()
{
   int cnt, total;
   bool Stopped;
   datetime NextTime;
   
   NextTime = 0;
   total = OrdersHistoryTotal();
   for (cnt = total - 1; cnt >= 0; cnt--)
   {
      OrderSelect (cnt, SELECT_BY_POS, MODE_HISTORY);
      
      if(OrderSymbol()!=Symbol()) continue;
      if (OrderMagicNumber() != MagicNumber) continue;
      
      if (TimeCurrent() - OrderCloseTime() > MinutesToDelay*60) continue;
      
        Stopped = true;
   }
   
   if (Stopped)
   {
      NextTime = OrderCloseTime() + MinutesToDelay*60;
   }
   
   return (NextTime);
}

int CalculateCurrentOrders(int MagicNumber)
  {
   int buys = 0, sells = 0, num = 0;
   for(int i=0;i<OrdersTotal();i++)
     {
      OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
      if(OrderSymbol()!= Symbol()) continue;
      if (OrderMagicNumber()!= MagicNumber) continue;
      if(OrderType() == OP_BUY)  buys++;
      if(OrderType() == OP_SELL) sells++;
     }
     
   num = buys + sells;
   return(num);
  }

void ClearLabels()
{
   string mComment = " ";
   
   OutputLabelToChart(Comment1Label, Comment1Y, CommentTxtSize, CommentColor, mComment, " ");
}

void DeleteExistingLabels()
{
   int objLabels = ObjectsTotal(OBJ_LABEL);
   string objName;
   
   if (objLabels > 0)
   {
      for (int i = objLabels; i >= 0;i--)
      {
         objName = ObjectName(i);
         if (StringFind(objName,Symbol() + "Comment1", 0) >= 0) { ObjectDelete(objName); continue; } 
      }
   }
}

void SetupLabels()
{
     Comment1Y = 12;
	  Comment1Label = Symbol() + "Comment1";
}

void OutputLabelToChart(string LabelName, int LabelY, int LabelTxtSize, color LabelColor, string LabelStr, string MarkString)
{
//  string mtime=Month()+"/"+Day()+" "+Hour()+":"+Minute()+":"+Seconds()+"  ";

  	if(ObjectFind(LabelName) != 0)
   {
   ObjectCreate(LabelName, OBJ_LABEL, 0, 0, 0);
	ObjectSet(LabelName, OBJPROP_CORNER, 0);
	ObjectSet(LabelName, OBJPROP_XDISTANCE, 20);
	ObjectSet(LabelName, OBJPROP_YDISTANCE, LabelY);
	}
	ObjectSetText(LabelName, LabelStr, LabelTxtSize, "Arial Bold", LabelColor);
}

void OutputComment1ToChart(string mComment)
{
   OutputLabelToChart(Comment1Label, Comment1Y, CommentTxtSize, CommentColor, mComment, "*");
}

//+------------------------------------------------------------------+