Помогите усыпить эксперта

Victor Chebotariov 2006.05.17 19:56

Нужно усыпить эксперта на определенное время, а он не спит. :(

//---- input parameters
extern int SleepMilliseconds=100000;
 
bool SleepExpert()
  {
   int orders=HistoryTotal();
   int losses=0;
   
   for(int i=orders-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==false)
        {
         Print("Ошибка в истории!");
         break;
        }
      if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=MAGIC || OrderType()>OP_SELL)continue;
      if(OrderProfit()>0) break;
      if(OrderProfit()<0) losses++;
      if(losses>1)
        {
         return(false);
        }
     }
  }
 
 
if(!SleepExpert())
  {
   Print("Эксперт остановлен на ",(SleepMilliseconds/1000)," секунд.");
   Sleep(SleepMilliseconds);
   Print("Работа эксперта возобновлена.");
  }

Victor Chebotariov 2006.05.17 20:28 #1

Или вот, не работает. Помогите плиз.

   int orders=HistoryTotal();
   int losses=0;
   for(int i=orders-1;i>=0;i--)
    {
     if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==false)
       {
        Print("Ошибка в истории!");
        break;
       }
     if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=MAGIC || OrderType()>OP_SELL)continue;
     if(OrderProfit()>0) break;
     if(OrderProfit()<0) losses++;
     if(losses>1)
       {
        Print("Эксперт остановлен на ",(SleepMilliseconds/1000)," секунд.");
        PlaySound("alert.wav");
        Sleep(SleepMilliseconds);
        Print("Работа эксперта возобновлена.");
       }
    }