ICQ бот и PHP
Привет, вот попробуй использовать класс, находящийся в аттаче.
Автор не я, нашел в гугле
. Тема интересная, попробую тоже что нибуть реализовать.
Ну и для вывода новостей добавить
Автор не я, нашел в гугле

Код: Выделить всё
<?
$admin="344249"; //ася админа :)
$send2me=$admin; // туда пересылаются сообщения
$icq_number="236397226"; // ася бота
$icq_pass="lol"; //пароль бота
$icq_std_status="ONLINE"; //станд.статус
include "c99phpicq.php";
set_time_limit (0); // бесконечное время выполнения
ignore_user_abort(true);
$icq = new ICQclient($icq_number,$icq_pass);
$icq->errorstream = false;
$icq->dbgstream = false;
$icq->connect();
$icq->setstatus($icq_std_status);
$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);
$cmd = explode(" ",$text);
$cmd[0] = strtolower($cmd[0]);
$cmd[1] = strtolower($cmd[1]);
if ($text == "!exit" && $uin==$admin) {exit;}
elseif ($text == "!exit" || $text == "!send") { $icq->message_send($uin,"Access denied!"); }
elseif ($cmd[0] == "!send" && $uin == $admin) {
$text2send = $cmd[2];
for($i=2; $i<=count($cmd); $i++) $text2send.=$cmd[$i];
$icq->message_send( $cmd[1], $cmd[2] );
}
else {
$icq->message_send($uin,"Внимание! На данном ICQ установлен бот :) Все сообщения перенаправляются в $send2me (во всяком случае, должны туды переправляться :) )");
$icq->message_send($send2me,"--пришло с номера $uin: $text");
}
}
}
?>
Код: Выделить всё
if ($text == "!news") {[тут вставляем вывод новостей];exit;}
- Вложения
-
- c99phpicq.zip
- (21.05 КБ) 41 скачивание