Erreur de TCL --'

[IluZi0n]

[font=Tahoma]Bonsoir la compagnie!

Voilà j'ai "essayer" de crée un tcl, qui permet de faire en sorte que quand je fait rejoindre mon egg sur un chan avec le (.+chan #salon) en Partyline, il le dise sur un salon défini! mais il prend aussi en compte les users pas que lui, pourtant j'ai mis "if {$nick==$botnick} {" Hum ?!

tclcopier

putlog "Evenements PinTaDoz - Chargée"
set chanlogfirst "#Pintadoz"
 
proc putspeed {arg} {
	putquick "$arg"
	clearqueue all
	return $arg
}
 
 
bind join - * joinbotchan
proc joinbotchan {nick uhost hand arg} {
global botnick join
if {$nick==$botnick} {
putspeed "PRIVMSG $::chanlogfirst :× 3Join Service 1× Je vien de rejoindre le salon $chan - Par $nick"
}
}
 
bind part - * xpartbotchan
proc xpartbotchan {nick uhost hand arg} {
global botnick part
if {$nick==$botnick} {
putspeed "PRIVMSG $::chanlogfirst :× 4Part Service 1× Je vien de partir du salon $chan - Par $nick"
}
}

Mais problème ! J'ai des messages d'erreurs:

Au Join: Tcl error [joinbotchan]: can't read "chan": no such variable
Au Part: Tcl error [xpartbotchan]: wrong # args: should be "xpartbotchan nick uhost hand arg"

Pouvez-vous m'aidez ? Sy vous plaît :s

Amicalement,
IluZi0n[/font]