#property copyright "Vyacheslav L. Barbakov | Send Info | 21.09.2013"
#property link      "barbakov@bk.ru"

//+-----------------------------------------------------------------------------------------------------------+
//| Внешние переменные, вводимые перед запуском советника                                                     |
//+-----------------------------------------------------------------------------------------------------------+

double   account        =  0;
string   izm            = "";
datetime posl_time_send =  0;
int      timefrime      = 10;
int      schet_send     =  0;
 GlobalVariableSet("balance", AccountBalance()); 

//+-----------------------------------------------------------------------------------------------------------+
//| Тело программы start() - обработки каждого тика                                                           |
//+-----------------------------------------------------------------------------------------------------------+
int start()
{ // начало start()
//+-----------------------------------------------------------------------------------------------------------+
  datetime posl_time = TimeCurrent();
  bool two_in_sek = false;
  bool nine_to_minute = false;
  
  if (account - AccountBalance() != 0)
  {
    if (account - AccountBalance() > 0)
    {
      izm = "Получен убыток ";
    }
    else
    {
      izm = "Получена прибыль ";
    }
    if(GlobalVariableGet("balance") - AccountBalance() != 0)
    {
      izm = "Установлен советник контроля баланса! ";
      account = AccountBalance();
    }
    if ((posl_time - posl_time_send) == 0 && schet_send == 2)
    {
      two_in_sek = true;
    }

    if ((posl_time - posl_time_send) <= 60 && schet_send == 10)
    {
      nine_to_minute = true;
    }

    if (!two_in_sek && !nine_to_minute)
    {
      SendMail("Баланс счета " + AccountNumber(), izm + DoubleToStr(AccountBalance() - account, 2) + ". Баланс счета: " 
                       + DoubleToStr(AccountBalance(), 2) + " " + AccountCurrency()); 
      account = AccountBalance();
      schet_send++;
      posl_time_send = TimeCurrent();
      GlobalVariableSet("balance", AccountBalance()); 
    }
  }
  
//+-----------------------------------------------------------------------------------------------------------+
} // конец start()