Simple Icq Bot 0.2

[zl0y]

Вот решил выложит может кому понадобицца :rolleyes:
Сам код бота:


//Simple Icq Bot v0.2
//Coded By ZloY (ICQ 8778556)
//Please Not Delete Copyright! :) Thx!
<?
require("icq2.php");

set_time_limit (0);
ignore_user_abort(true);

$mlCQ = new mlCQ();

$mlCQ->create_identity("Bot","UIN","PASSWORD");
$mlCQ->connect();
$mlCQ->login();

$mlCQ->set_status('ONLINE', 'DCDISABLED');
$mlCQ->request_offline_messages();
$mlCQ->delete_offline_messages();

$still_there = true; $code = '';
while ($still_there) {
if (!is_resource($mlCQ->sock) || feof($mlCQ->sock))
$still_there = false;
if (!$code) sleep(1);
$code = $mlCQ->dance_for('Bot');
switch ($code) {
case 7:
$msg = $mlCQ->id['in_messages']['last'];
//Текущее время
if($msg['text']== "!time"){
$mlCQ->send_message($msg['uin'],date("d-m-Y H:i:s"));
}
//Кодирование в base64
if(strncmp(strtolower($msg['text']),"!base64",7)==0){
$mlCQ->send_message($msg['uin'],base64_encode(substr($msg['text'],8,strlen($msg['text'])-8)));
}
//Декодирование из base64
if(strncmp(strtolower($msg['text']),"!dbase64",7)==0){
$mlCQ->send_message($msg['uin'],base64_decode(substr($msg['text'],8,strlen($msg['text'])-8)));
}
//MD5 Хеш
if(strncmp(strtolower($msg['text']),"!md5",4)==0){
$mlCQ->send_message($msg['uin'],md5(substr($msg['text'],5,strlen($msg['text'])-5)));
}
//SHA1 хеш
if(strncmp(strtolower($msg['text']),"!sha",4)==0){
$mlCQ->send_message($msg['uin'],sha1(substr($msg['text'],5,strlen($msg['text'])-5)));
}
//Вычисление CRC32
if(strncmp(strtolower($msg['text']),"!crc",4)==0){
$mlCQ->send_message($msg['uin'],crc32(substr($msg['text'],5,strlen($msg['text'])-5)));
}
//crypt -- Необратимое шифрование (хэширование)
if(strncmp(strtolower($msg['text']),"!crypt",6)==0){
$mlCQ->send_message($msg['uin'],crypt(substr($msg['text'],7,strlen($msg['text'])-7)));
}
//Генерирование рандом пасса
if($msg['text']== "!pass"){
$mlCQ->send_message($msg['uin'],rand(00000000, 99999999));
}
//About :)
if($msg['text']== "!about"){
$mlCQ->send_message($msg['uin'],">>ICQ BOT 0.2 By ZloY<<");
}
break;
case 8:
$msg = $mlCQ->id['in_messages']['last'];
break;
default:
break;
}
}

?>

Сама библиотека:
http://slil.ru/24222972

Вот вобщем дерзайте ! ;) Может кто напишет бота и получше меня или усовершенствует этого :p :rolleyes:

[Isis]

Мде.....легче на WebIcqPro пользоваться моим ботом......меньше кода, да и баян =)

[KSURi]

Все это херня. Имхо протокол никто из вас даже не пытался освоить

[Isis]

KSURi, имхо не гони:)Я пытался, но ООП я пока не знаю, да и не хочу знать в пхп...

[scrat]

KSURi, имхо не гони:)Я пытался, но ООП я пока не знаю, да и не хочу знать в пхп...
нда в пхп по моему она тоже не особо нужна.да и не особо она мне там нравиццо.в с++ намного лучше

[KSURi]

Я чето не догоняю... А ООП тут вообще причем? Я про протокол Icq говорил, то, что вы его скорее всего даже не пытались освоить =\

[SMiX]

Даже если вам не нравится ООП, очень реально написать и на функциональном программирвании.

[Developer]

Получится мясо Класс Icq так же явно нужно писать с применением ООП как и класс работы с БД.

[ZiG]

Бот абсолютно нерабочий.