Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |

12.04.2007, 05:49
|
|
Banned
Регистрация: 13.09.2006
Сообщений: 523
Провел на форуме: 2869410
Репутация:
925
|
|
Simple Icq Bot 0.2
Вот решил выложит может кому понадобицца
Сам код бота:
PHP код:
//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
Вот вобщем дерзайте !  Может кто напишет бота и получше меня или усовершенствует этого 
|
|
|

12.04.2007, 07:34
|
|
Флудер
Регистрация: 20.11.2006
Сообщений: 3,316
Провел на форуме: 16641028
Репутация:
2371
|
|
Мде.....легче на WebIcqPro пользоваться моим ботом......меньше кода, да и баян =)
|
|
|

12.04.2007, 09:06
|
|
Постоянный
Регистрация: 06.06.2006
Сообщений: 515
Провел на форуме: 1985206
Репутация:
963
|
|
Все это херня. Имхо протокол никто из вас даже не пытался освоить
|
|
|

12.04.2007, 16:13
|
|
Флудер
Регистрация: 20.11.2006
Сообщений: 3,316
Провел на форуме: 16641028
Репутация:
2371
|
|
KSURi, имхо не гони  Я пытался, но ООП я пока не знаю, да и не хочу знать в пхп...
|
|
|

12.04.2007, 23:14
|
|
Постоянный
Регистрация: 08.04.2007
Сообщений: 853
Провел на форуме: 5812656
Репутация:
1540
|
|
Сообщение от Isis
KSURi, имхо не гони  Я пытался, но ООП я пока не знаю, да и не хочу знать в пхп...
нда в пхп по моему она тоже не особо нужна.да и не особо она мне там нравиццо.в с++ намного лучше
|
|
|

12.04.2007, 23:21
|
|
Постоянный
Регистрация: 06.06.2006
Сообщений: 515
Провел на форуме: 1985206
Репутация:
963
|
|
Я чето не догоняю... А ООП тут вообще причем? Я про протокол Icq говорил, то, что вы его скорее всего даже не пытались освоить =\
|
|
|

13.04.2007, 11:43
|
|
Участник форума
Регистрация: 25.07.2005
Сообщений: 246
Провел на форуме: 457850
Репутация:
174
|
|
Даже если вам не нравится ООП, очень реально написать и на функциональном программирвании.
|
|
|

28.04.2007, 13:20
|
|
Участник форума
Регистрация: 03.05.2006
Сообщений: 167
Провел на форуме: 125505
Репутация:
116
|
|
Получится мясо Класс Icq так же явно нужно писать с применением ООП как и класс работы с БД.
|
|
|

29.04.2007, 01:53
|
|
Новичок
Регистрация: 25.03.2007
Сообщений: 4
Провел на форуме: 109241
Репутация:
5
|
|
Бот абсолютно нерабочий.
|
|
|
|
 |
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|