<?
include "c99phpicq.php";
set_time_limit (0);
ignore_user_abort(true);
$icq = new ICQclient("uin","pass");
$icq->errorstream = false;
$icq->dbgstream = false;
$icq->connect();
$icq->setstatus("NA","WORK");
$icq->setstatusflags("DCCONT","");
$icq->login();
while ($icq->socket) 
{ 
  $icq->listen(); 
  if ($icq->ismessage()) 
  { 
    $uin = $icq->inLastVar["uin"]; 
    $text = $icq->inLastVar["text"]; 
    $mid = md5($icq->inLastVar["mid"]); 
    $text = trim($text); 

/*скрипт заканчивает свое выполнение --дисконнект бота*/
    if ($text == "!exit"  && $uin=="uin_admin") 
    { 
    exit; 
    } 



    switch($text)
    {
      case "/nomer" :
      $icq->message_send($uin,"message"); 
      break;
      default:
      $icq->message_send($uin,"Меня сейчас нет. :)"); #по умолчанию ответ бота 
    }

/* запись всех посланных сообщений боты*/
   
    $log="log.txt"; 
    $fp = fopen($log,"a+"); 
    fwrite($fp,"$uin:$text\n"); 
    fclose($fp); 

   } 
}