09/12/2012, 11:00
J'imagine que ta procédure est appelée par un bind pub.
Il faudrait voir ce que donnent les putlog du script pour les utilisateurs qui ne devraient pas être kickés, mais à mon avis il y a peut-être un souci avec la ligne:
Petit nota: Pourquoi définir Mod(Reason) dans la procédure ? Il faut en faire une variable globale plutôt, ça ne sert à rien de redéfinir son contenu chaque fois que quelqu'un doit être kické.
Il faudrait voir ce que donnent les putlog du script pour les utilisateurs qui ne devraient pas être kickés, mais à mon avis il y a peut-être un souci avec la ligne:
tcl
if {![info exists ::Flood($nick)]} { set ::Flood($nick) 0; utimer 10 [unset ::Flood($nick)] }
Petit nota: Pourquoi définir Mod(Reason) dans la procédure ? Il faut en faire une variable globale plutôt, ça ne sert à rien de redéfinir son contenu chaque fois que quelqu'un doit être kické.