21/12/2011, 11:24
CrazyCat a écrit :Oui, il y a deux petits bugs :
tcl
set nbk 0 bind pub - "!Cerise" piege:kick proc piege:kick { nick uhost handle chan args } { incr ::nbk set reason "Victime N°$::nbk" putkick $chan $nick $reason return 1 }
Testé et fonctionnel.
SUJET RESOLU