IRC-Bot

Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

  • IRC-Bot

    hallo alle zusammen,

    ich hab schon mal nach einen PHP-Bot für IRC gegoogelt, aber der will nicht bei mir laufen, vielleicht kann mir einer von euch helfen:

    Fehlermeldung

    Warning: fsockopen() has been disabled for security reasons in /usr/export/www/vhosts/funnetwork/hosting/yaroc/Bot/bot.php on line 20
    Can't connect to irc.quakenet.org


    Script:

    Quellcode

    1. <?PHP
    2. function cmd($cmd) {
    3. global $fp;
    4. fputs($fp,$cmd);
    5. echo "-> $cmd\r\n";
    6. }
    7. $config['server'] = 'irc.quakenet.org';
    8. $config['port'] = 6668;
    9. $config['nick'] = 'troubleD[2]';
    10. $config['anick'] = 'troubleD[2]';
    11. $config['name'] = 'troubleD[2]';
    12. $config['email'] = '';
    13. $config['ident'] = 'troubleD[2]';
    14. $config['identd'] = false;
    15. $config['useemailasident'] = true;
    16. $config['channels'][] = "#GdK";
    17. $users['admin'][0] = "";
    18. $raws = array(motd => array('001','002','003','004','005','251','252','253','254','255','372','375','376'));
    20. $fp = fsockopen($config['server'],$config['port']) OR
    21. die("Can't connect to {$config['server']}.");
    23. $firstConnect = true;
    24. cmd("USER {$config['nick']} {$config['nick']} {$config['nick']} :{$config['nick']}\r\n");
    25. cmd("NICK {$config['nick']}\r\n");
    26. while (!feof($fp)) {
    27. $buffer = fgets($fp, 4096);
    28. $line = explode(' ', $buffer);
    29. for ($c = 0;$c <= count($line)-1;$c++) {
    30. $line[$c] = trim($line[$c],"\r\n");
    31. }
    32. if ($line[0] == 'PING') {
    33. cmd("PONG $line[1]\r\n");
    34. }
    35. if (!in_array($line[1],$raws['motd'])) {
    36. echo "<- ".implode(' ',$line)."\r\n";
    37. }
    38. if ($line[1] == '376') {
    39. foreach($config['channels'] as $chan) {
    40. cmd("JOIN $chan\r\n");
    41. }
    42. }
    43. elseif ($line[1] == 'PRIVMSG') {
    44. if (in_array(substr($line[0],1),$users['admin'])) {
    45. if ($line[3] == ":!lol") {
    46. cmd("PRIVMSG {$line[2]} :loOoOoOoOol!\n");
    47. }
    48. elseif ($line[3] == ":!quit") {
    49. cmd("QUIT :AS YOU WISH!!1111!1!1\n");
    50. }
    51. elseif ($line[3] == ":!join") {
    52. cmd("JOIN :{$line[4]}\n");
    53. }
    54. elseif ($line[3] == ":!part") {
    55. cmd("PART :{$line[2]}\n");
    56. }
    57. elseif ($line[3] == ":!hop") {
    58. cmd("PART :{$line[2]}\n");
    59. usleep(500);
    60. cmd("JOIN :{$line[2]}\n");
    61. }
    62. }
    63. }
    64. }
    Alles anzeigen



    ich bedanke mich schon mal im Vorraus.