send_info

#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;

int init()
{
  if(!GlobalVariableCheck("balance"))
  {
    GlobalVariableSet("balance", AccountBalance()); 
  }
}
//+-----------------------------------------------------------------------------------------------------------+
//| Òåëî ïðîãðàììû start() - îáðàáîòêè êàæäîãî òèêà                                                           |
//+-----------------------------------------------------------------------------------------------------------+
int start()
{ // íà÷àëî start()
//+-----------------------------------------------------------------------------------------------------------+
  datetime posl_time = TimeCurrent();
  bool two_in_sek = false;
  bool nine_to_minute = false;
  
  if (GlobalVariableGet("balance") - AccountBalance() != 0)
  {
    if (GlobalVariableGet("balance") - AccountBalance() > 0)
    {
      izm = "Ïîëó÷åí óáûòîê ";
    }
    else
    {
      izm = "Ïîëó÷åíà ïðèáûëü ";
    }
    if((GlobalVariableGet("balance") - AccountBalance()) == 0)
    {
      SendNotification("Óñòàíîâëåí ñîâåòíèê êîíòðîëÿ áàëàíñà! " + "Áàëàíñ ñ÷åòà: " + DoubleToStr(AccountBalance(), 2) + " " + AccountCurrency()); 
    }
    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 && (GlobalVariableGet("balance") - AccountBalance()) != 0)
    {
      SendNotification(izm + DoubleToStr(AccountBalance() - GlobalVariableGet("balance"), 2) + ". Áàëàíñ ñ÷åòà: " 
                       + DoubleToStr(AccountBalance(), 2) + " " + AccountCurrency()); 
      schet_send++;
      posl_time_send = TimeCurrent();
      GlobalVariableSet("balance", AccountBalance()); 
    }
  }
  
//+-----------------------------------------------------------------------------------------------------------+
} // êîíåö start()