[Résolu] Aide sur un bout de code

[Alucard`68]

Salut,

Nouvel réponse volontaire.

J'ai tenter aussi de faire de cette manière

tclcopier

bind pub - !kr kickraison
proc kickraison { nick host hand channel arg text } {
  global vhostmodo1 kickraison
  foreach vhost $vhostmodo1 {
    if [string match -nocase $vhost $host] {
      putserv "cs kick $channel $arg $text"
      putserv "PRIVMSG $::log :\0034$arg \00312à été kick de \0034$channel \00312par \0034$nick \00312Raison :\0037 $text"
      }
   }
}

Mais ne fonctionne pas mais la j'ai un message d'erreur en pl

Code :

[14:30:39] <Aragorn> [14:30:39] Tcl error [kickraison]: wrong # args: should be "kickraison nick host hand channel arg text"

J'avoue que je ne vois pas du tout comment faire

Merci d'avance.

Bye.