Вот нашёл ICQ бота на PHP, использующего класс WebIcqLite.class.php. PHP: <?php /*Created by Scorpion */ error_reporting (E_ALL); set_time_limit(0); ini_set ('max_execution_time', "0"); require_once('WebIcqLite.class.php'); define('UIN', '789012345');// Ваш номер icq define('PASSWORD', '1ql66aa@');//Ваш пароль $icq = new WebIcqLite(); if(!$icq->connect(UIN, PASSWORD)) { echo $icq->error; exit(); } while($icq->is_connected()){ $msg = $icq->read_message(); switch (strtolower($msg['message'])) { case 'привет': //сообщение для бота $icq->send_message($msg['from'], 'Привет Познакомимся?'); //ответ на сообщение для бота break; case'да': $icq->send_message($msg['from'], 'Я ICQ BOT Scorpion'); break; case'floodme': //сообщение для бота for($i==0;$i<50;$i++) //50 раз $icq->send_message($msg['from'],'Ненавижу флудеров'); //это сообщение exit; break; case'quit': //сообщение для бота $icq->disconnect(); //действие бота (выход) exit; break; default: //если сообщение не содержит команду $icq->send_message($msg['from'], 'Ты хочешь от меня слишком много, я только учусь?'); //ответ бота } flush(); sleep(1); } ?> Автор - Scorpion Взято с http://grabberz.com/showpost.php?p=16492&postcount=1 Как юзать. Для начала нам надо залить бота на хост. Для этого : Для бота нужны поддержка сокетов, поэтому регаемся на 1gb.in. Заливаем на ваш сайт скрипт самого бота, предварительно изменив его, а в той же директории кладём этот скрипт под именем WebIcqLite.class.php. И теперь просто запускаем скрипт бота. Вуаля! Бот в онлайне.
LLIepuqo А что тогда тут выожено в 1-ом посте? О_о вбиваешь в скрипт номер, пасс, стартуешь скрипт и твой бот в сети.
Я мож и тупой, но не настолько))) Я про другое. Хочу, чтоб он списочком выводил, типа: Список команд: 1- пойти нафиг 2- вырубит бота 3- ... что-то такое... "\n" не работает.
Это исправил) СПасибо... Токо следующее( Fatal error: Call to undefined function socket_create() in d:\hst\danstreet-ru_5e5a89b7\http\bot\WebIcqLite.class.php on line 393 Есть тот кто этот бот запустил? Вот кажется эта строка: function open($url = array('login.icq.com', 5190))
А как сделать приветствующее сообщение? Типо человек добавил бота в контакры, а бот ему выдал приветствие..
Боты на php - ацкое зверство. Мозги себе ипать + глюки искать. И еще с сокетами возиться. Делфи рулит!
На диске ][акера за 3-ий месяц есть сорц Icq-bot'а на Делфи, если кому надо и нет диска могу скинуть, пишите в ПМ или Icq: 465-790-267
Обновление Обновлён бот на PHP. Теперь он может отправлять сообщения на мыло. Просто отправляем ему письмо в таком формате [email protected]::[email protected]::Тема письма::Содержание письма. PHP: <?php /*Created by Scorpion */ error_reporting (E_ALL); set_time_limit(0); ini_set ('max_execution_time', "0"); require_once('WebIcqLite.class.php'); define('UIN', '?????????');// Ваш номер icq define('PASSWORD', 'pass');//Ваш пароль $icq = new WebIcqLite(); if(!$icq->connect(UIN, PASSWORD)) { echo $icq->error; exit(); } while($icq->is_connected()){ $msg = $icq->read_message(); if (eregi('admin', $msg['message'])) { $pass=split(':',$msg['message']); if(md5($pass[1])=='21232f297a57a5a743894a0e4a801fc3') { define('ADMIN', $msg['from']); $icq->send_message($msg['from'], 'Welcome admin'); } else { $icq->send_message($msg['from'], 'У вас осталось x попыток' ); } } if (preg_match('/^\S+@+\S+::\S+@+\S+::[^:]*::/', $msg['message'])) { $email=split('::',$msg['message']); @mail($email[1], $email[2], $email[3], 'From:'.$email[0]); $icq->send_message($msg['from'], 'Ваше письмо для '.$email[1].' отправлено.'); } else switch (strtolower($msg['message'])) { case 'привет': $icq->send_message($msg['from'], 'Привет Познакомимся?'); break; case'да': $icq->send_message($msg['from'], 'Я ICQ BOT Scorpion'); break; case'floodme': for($i==0;$i<50;$i++) $icq->send_message($msg['from'],'Ненавижу флудеров'); //при использовании номер будет забанене на некоторое время exit; break; case'quit': $icq->disconnect(); exit; break; default: $icq->send_message($msg['from'], 'Ты хочешь от меня слишком много, я только учусь?'); } flush(); sleep(1); } ?> Если кому надо, могу попросить автора сделать некоторые функции.