Выдерживаем паузу между торговыми операциями

//+--------------------------------------------------------------------------------------------------+
//| Фунцкия WaitBeforeTransaction выдерживает паузу Secs секунд      |
//| между торговыми операциями эксперта (по умолчанию 5 секунд)   |
//|                                                                                                  |
//| Возвращает:                                                                                |
//|   1 - если пауза выдержена без ошибок                                         |
//|   0 - если эксперт был остановлен                                                |
//|  -1 - если произошла какая-то ошибка                                           | 
//+-------------------------------------------------------------------------------------------------+
int WaitBeforeTransaction(int Secs = 5)
  {
    // если режим тестирования, то ждать необязательно
    if (IsTesting()) return(1);
    
    // если глобальная переменная LastTradeTime не существует,
    // то создать ее
    if (!GlobalVariableCheck("LastTradeTime"))
      {
        // Если произошла какя-то ошибка при вызове функции
        // GlobalVariableCheck(), выйдем с ошибкой
        if (GetLastError()!=0) 
          {
            Print("WaitBeforeTransaction(): ошибка ",GetLastError(),
                  " при проверке глобальной переменной LastTradeTime");
            return(-1);
          }
        
        // глобальная переменная не существует, создадим ее
        if (GlobalVariableSet("LastTradeTime", 1)==0)
          {
            // произошла ошибка при создании глобальной переменной
            Print("WaitBeforeTransaction(): ошибка ",GetLastError(),
                  " при создании глобальной переменной LastTradeTime");
            return(-1);            
          }
          
        // глобальная переменная успешно создана
        Print("WaitBeforeTransaction(): глобальная переменная ",
              "LastTradeTime создана");
      }
      
    // получим время последней операции
    datetime LastTradeTime;
    LastTradeTime = GlobalVariableGet("LastTradeTime");
    
    // если произошла ошибка (равна нулю), то выходим с ошибкой
    if (LastTradeTime==0)
      {
        Print("WaitBeforeTransaction(): ошибка ",GetLastError(),
              " при чтении глобальной переменной LastTradeTime");
        return(-1);
      }
      
    // ждем Secs секунд
    while(true)
      {
        // если эксперт остановлен, выйдем со значением 0
        if (IsStopped()) 
          {
            Print("WaitBeforeTransaction(): эксперт остановлен. Выходим...");
            return(0);
          }
          
        // если прошло меньше Secs секунд, то ждем
        if ((LocalTime()-LastTradeTime)<Secs)
          {
            // пауза 0.1 секунда
            Sleep(100);
            continue;
          }
        
        // т.к. прошло больше Secs секунд, то попробуем изменить значение 
        // глобальной переменной LastTradeTime на текущее время
        
        // используем функцию GlobalVariableSetOnCondition(), чтобы выявить 
        // ошибку, если уже за время ожидания другой эксперт успел совершить 
        // сделку и изменил значение глобальной переменной
        if (GlobalVariableSetOnCondition("LastTradeTime", LocalTime(), LastTradeTime))
          {
            // за время ожидания глобальная переменная не изменилась, поэтому
            // удалось установить ее новое значение
            // пауза выдержена, обновим котировки и выйдем без ошибки
            RefreshRates();
            return(1);
          }  
        else 
          {
            // не удалось изменить значение глобальной переменной, т.к. другой эксперт
            // успел совершить сделку раньше и установил новое значение переменной 
            // поэтому получим текущее значение глобальное переменной и продолжим ожидание
            LastTradeTime = GlobalVariableGet("LastTradeTime");
    
            // если произошла ошибка (равна нулю), то выходим с ошибкой
            if (LastTradeTime==0)
              {
                Print("WaitBeforeTransaction(): ошибка ",GetLastError(),
                      " при чтении глобальной переменной LastTradeTime");
                return(-1);
              }            
          }        
      }    
  }

В следующих выпусках я разберу подробно, как работает эта функция. Параллельно мы сможем изучить неизвестные нам функции.

Все статьи по теме "Пишем советников для MetaTrader 4".

• Механическая торговая система - миф или реальность?
• С чего начать при написании советника:
  

  	-	Создаем нового советника
  	-	Настраиваем параметры.

• Язык MetaQuotes Language 4:
  

  	-	Структура советника.
  	-	Создаем собственные функции. Функции init(), start() и deinit().
  	-	Исходный код нашего первого советника.
  	-	Использование констант в эксперте.
  	-	Хранение данных в переменных: локальные, статические, внешние и глобальные переменные. Параметры функций.
  	-	Операторы: Составной оператор. Оператор присваивания (арифметические операции, операции отношения, логические операции НЕ, ИЛИ и И, побитовые операции). Условный оператор. Цикл while. Цикл for. Break. Сontinue. Переключатель Switch.
  	-	Получение информации об ордере: OrderSelect(). OrdersTotal(). HistoryTotal(). OrderClosePrice(). OrderStopLoss(). OrderType(). OrderCloseTime(). OrderTakeProfit(). OrderSymbol(). OrderComment(). OrderSwap(). OrderCommission(). OrderOpenPrice(). OrderTicket(). OrderProfit(). OrderOpenTime(). OrderExpiration(). OrderMagicNumber().
  	-	Управление ордерами и открытие/закрытие позиций: OrderSend(). OrderModify(). OrderDelete(). OrderClose(). OrderClosyBy().
  	-	Ошибки: GetLastError(). Коды ошибок.
  	-	Секреты правильной торговли: IsExpertEnabled(). IsTradeContextBusy(). IsTradeAllowed(). Как бороться с ошибкой ERR_TRADE_CONTEXT_BUSY (146). IsStopped(). RefreshRates(). Выдерживаем паузу между сделками.