Ik heb een IRC-bot gemaakt (ben bezig te ~) genaamd Jetser (de tweede zal Ketser heten
). Die connect wel, maar doet daarna niets meer. Hij connect, joint #bottest en daarna doet hij niets meer. Ik heb echt geen idee waarom niet...
Jullie wel?
PHP:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
| <?php // Algemene (verbindings)instellingen $server = 'irc.tweakers.net'; $port = '6667'; $channel= '#bottest'; $randno = rand(0, 9999); $botnick= 'Jetzer'.$randno; $admin = 'Prammenhanger'; error_reporting(63); // Script oneindig laten doorgaan set_time_limit(0); // Verbinding maken met de server voor data $input = fsockopen($server, $port); $loop = 0; $connected = 0; while ($line = fgets($input, 512)){ $el = explode(' ', $line); echo $line."<br>"; if( count($el) > 3){ // Houd van alle gegevens alleen nickname over $el_userstr = $el[0]; $el_user = split('!', $el_userstr); $el_user = str_replace(':', ' ', $el_user[0]); // Achterhaal type bericht $el_type = $el[1]; if( $el_type == 'PRIVMSG' ){ $el_channel = $el[2]; $el_msg = ''; for($i=3; $i<count($el); $i++){ $el_msg.=$el[$i]; } echo "Bericht: $el_msg"; } } else if( count($el) == 2) { $el_type = $el[0]; $el_msg = str_replace(':', '', $el[1]); } // Als de server PINGt, terug pongen if( $el_type == 'PING' ){ fputs($input,'PONG '.$el_msg."\n\n"); //echo "Ping? Pong!<br>"; } // Kijken naar de loop, zonodig aanmelden if( $loop == 0 ){ fputs($input,"nick $botnick\n\n"); fputs($input,"user $botnick $server $server PrammenBot\n\n"); echo "Aangemeld als '$botnick' op server '$server'<br>"; } // Laat channel joinen if( $el_type == 376 ){ $connected = 1; fputs($input,"join $channel\n\n"); echo "Channel #channel gejoined<br>"; fputs($input,"PRIVMSG #bottest WHEE!!!"); } // Als er een fout optreedt stoppen else if( ereg("^ERROR", $line) ){ fputs($input,"quit\n\n"); echo "Fout! Proces gestopt.<br>"; break; } // Als nickname al bezet is, stoppen else if( $el_type == 433 ){ fputs($input,"quit\n\n"); echo "Nickname is al bezet. Proces gestopt.<br>"; break; } $loop++; } ?> |
Jullie wel?
Privacy-adepten vinden op AVGtekst.nl de Nederlandse AVG-tekst voorzien van uitspraken en besluiten.