Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|
09.09.2006, 20:07
|
|
Участник форума
Регистрация: 11.01.2006
Сообщений: 128
Провел на форуме:
612424
Репутация:
55
|
|
irc bot на php
Народ, у кого есть ирц бот написаный на пхп что бы просто конектился к серваку и сидел на канале?
|
|
|
09.09.2006, 20:31
|
|
Постоянный
Регистрация: 31.12.2005
Сообщений: 605
Провел на форуме:
4349433
Репутация:
661
|
|
что бы просто конектился к серваку и сидел на канале
PHP код:
<?php
set_time_limit(0);
$irc["server"] = "irc.tsua.net";
$irc["port"] = "7771";
$irc["channel"] = "#astral.antichat";
$bot["nick"] = "BoT";
$bot["id"] = "myID";
if ($fsock = fsockopen($irc["server"], $irc["port"]))
{
fwrite($fsock, "NICK ".$bot["nick"]."\r\nUSER ".$bot["id"]." 0 0 :".$bot["nick"]."\r\n");
$no_connect = 1;
while (1 == 1)
{
if ($str = fread($fsock, 1024))
{
if (substr($str, 0, 6) == "PING :")
{
fwrite($fsock, "PONG ".$irc["channel"]."\r\n");
}
elseif (stristr($str, ":".$irc["server"]." 376 ".$bot["nick"]." :End of MOTD command.") && $no_connect == 1)
{
unset($no_connect);
fwrite($fsock, "PING ".time()."\r\n");
while (!substr($str, 0, 4) == "PONG")
{
$str = fread($fsock, 1024);
}
fwrite($fsock, "JOIN ".$irc["channel"]."\r\n");
}
}
}
}
else
{
exit();
}
?>
|
|
|
|
09.09.2006, 20:40
|
|
Постоянный
Регистрация: 03.11.2005
Сообщений: 591
Провел на форуме:
5605982
Репутация:
523
|
|
http://php.com.ua/ru/articles/bicycles/php_irc_bot.htm
|
|
|
|
09.09.2006, 21:16
|
|
Постоянный
Регистрация: 17.07.2005
Сообщений: 475
Провел на форуме:
1665310
Репутация:
488
|
|
Спасибо всем за примеры =)
|
|
|
|
09.09.2006, 21:24
|
|
Участник форума
Регистрация: 11.01.2006
Сообщений: 128
Провел на форуме:
612424
Репутация:
55
|
|
A110ut , а как его запустить? я все данные ввел, положил на сервер, загрузил страничку, но на сервер он не заходит  |
|
|
|
09.09.2006, 21:41
|
|
ветеран
Регистрация: 22.06.2004
Сообщений: 2,128
Провел на форуме:
5355463
Репутация:
2258
|
|
Terys, многие бесплатные хосты не поддерживат фсокопен..может из за этого?
а ваще [мат] извращаться, пишите бота на сокетах в мИРК или ставьте эггдропа )
__________________
Моня тот еще зверюга,
Свиду тихий внутри - ****,
Без обид,реальный мэн,
Просто рифмы нет совсем.
С ним шутить *****то очень,
В ирце вместе с ним хохочем (c) m0Hze
Последний раз редактировалось [sL1p]; 09.09.2006 в 21:43..
Причина: мат, засранчег
|
|
|
|
09.09.2006, 21:55
|
|
Участник форума
Регистрация: 11.01.2006
Сообщений: 128
Провел на форуме:
612424
Репутация:
55
|
|
"фсокопен" - что это?
еггдроп у меня есть, только некуда его повесить  |
|
|
|
10.09.2006, 01:43
|
|
Постоянный
Регистрация: 31.12.2005
Сообщений: 605
Провел на форуме:
4349433
Репутация:
661
|
|
лол...
фсокопен == fsockopen
зы: запускать желательно из ком. строки
пример для винды: с:\путь_к_папке_с_пхп\php.exe с:\путь_к_папке_со_скриптом\b ot.php
|
|
|
|
10.09.2006, 10:03
|
|
Участник форума
Регистрация: 11.01.2006
Сообщений: 128
Провел на форуме:
612424
Репутация:
55
|
|
Код:
<?php set_time_limit(0); $irc["server"] = "195.39.253.1"; $irc["port"] = "6667"; $irc["channel"] = "#Болтовня"; $bot["nick"] = "BoT"; $bot["id"] = "ID"; if ($fsock = fsockopen($irc["server"], $irc["port"])) { fwrite($fsock, "NICK ".$bot["nick"]."\r\nUSER ".$bot["id"]." 0 0 :".$bot["nick"]."\r\n"); $no_connect = 1; while (1 == 1) { if ($str = fread($fsock, 1024)) { if (substr($str, 0, 6) == "PING :") { fwrite($fsock, "PONG ".$irc["channel"]."\r\n"); } elseif (stristr($str, ":".$irc["server"]." 376 ".$bot["nick"]." :End of MOTD command.") && $no_connect == 1) { unset($no_connect); fwrite($fsock, "PING ".time()."\r\n"); while (!substr($str, 0, 4) == "PONG") { $str = fread($fsock, 1024); } fwrite($fsock, "JOIN ".$irc["channel"]."\r\n"); } } } } else { exit(); } ?>
У меня ничё не вышло если кому не сложно запустите у себя на сервере  |
|
|
|
10.09.2006, 19:09
|
|
Постоянный
Регистрация: 31.12.2005
Сообщений: 605
Провел на форуме:
4349433
Репутация:
661
|
|
попоробуй запустить со своей машины. возможно я чтото лишнее удалил когда функции вырезал))
up: хотя нет. вроде все на месте
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
