Тема: irc bot на php
Показать сообщение отдельно

  #9  
Старый 10.09.2006, 10:03
TERYS
Участник форума
Регистрация: 11.01.2006
Сообщений: 128
Провел на форуме:
612424

Репутация: 55
Red face

Код:
<?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(); } ?>
У меня ничё не вышло если кому не сложно запустите у себя на сервере