ENREGISTREMENT NICKSERV VIA IRC BOT

<?

$host = "irc.playersonline.org";
// Une tite visite s'impose sur le chan #PlayersOnLine venez nombreux :)
$port = 6667;

if ($nick != "" && $pass1 != "" && $pass2 != "" && $email != "") {
	if ($pass1 == $pass2) {
		if ($sock = @fsockopen($host, $port)) {
			fputs($sock, "USER php_reg localhost localhost :register\r\n");
			fputs($sock, "NICK $nick\r\n");
		
			while ($line = fgets($sock,1024)) {
				$a = explode(" ", $line);
				if ($a[0] == "PING") {
					fputs($sock, "PONG $a[1]"); 
				}
				if ($a[1] == "MODE") {
					fputs($sock, "PRIVMSG nickserv :register $pass1 $email\r\n");
					fputs($sock, "QUIT\r\n");
				}
				if ($a[1] == 433) {
					echo "Ce pseudo est déjà présent sur le chat";
					fputs($sock, "QUIT\r\n");
					exit;
				}
				if ($a[0] == ":Nickserv@Services.IRCFrance.Org") {
					$b = explode(" :", $line);
					$c = explode(".", $b[1]);
					echo "$c[0]<br>";
					exit(1);
				}
			}
		}
		else {	
			echo "Erreur lors de la connexion à $host:$port<br>";
		}
	}
	else {
		echo "Les mots de passe doivent être identiques<br>";
	}
}
else {
	echo "Veuillez remplir le formulaire dans son intégralité<br>";
}

?>

30 septembre 2004 17:57:49 :

Mise à jour exit();

12 avril 2005 17:21:37 :

Suppression d'un accolade en trop

24 avril 2005 20:44:55 :

Mise à jour de l'url de mon serveur :p

25 novembre 2005 21:58:14 :

Manquait les $ à pass2 et email Sorry ...