[Recherche] Script Autovoice

[CrazyCat]

Pas tout à fait, je te le corrige pour la première procédure:

tclcopier

catch {bind pub - !autovoice channel:avs}
 
proc channel:avs {nick uhost hand chan arg} {
   if { ![isop $nick $chan] } { return 0; }
   switch -exact -- $arg {
      "on" {
         channel set $chan +avs
         putserv "PRIVMSG $chan :L'auto Voice a été activé, &nick."
      }
      "off" {
         channel set $chan -avs
         putserv "PRIVMSG $chan :L'auto Voice a été désactivé, &nick."
      }
   }
}

La condition est forcément dans les procédures.