Expliquation tcl ;)

[CrazyCat]

Imaginons que sur le même principe tu veuilles modifier le topic avec la commande: "settopic ton nouveau topic" et que seul celui qui a été défini comme admin puisse le faire, il te faut ajouter:

tclcopier

bind msg - "settopic" tournoi:topic
 
proc tournoi:topic {nick uhost handle text} {
   if {$nick != $::tournoi(admin) } {
      putserv "PRIVMSG $nick :Tu n'es pas l'admin actuel"
      return 0
   }
   set args [split $text]
   putserv "TOPIC #canal :[lrange $args 1 end]"
}