Code d'avertissement d'arrive

[KeeViiNou]

Bonjour,

j'ai codé ce petit bout de code pour avertir les membres de mon staff de l'arriver d'une personne sur un salon

tclcopier

set chans "#XXX"
set chanradio "#XXX"
 
bind raw - "JOIN" cs:joins
proc cs:joins {f k t} {
set nick [lindex [split $f !] 0]
set salon [string trim [lindex $t 0] :]
	if {[string match "#Radio" $salon] == 1 || $salon == "#Radio"} {
		putspeed "NOTICE $nick 12Bonjour à Toi4 $nick 10Bienvenue Sur7 $salon 12Tu Veux Un Coup De Pouce, Pour Plusieurs Commandes Je Suis 4Un Bot D'aide, 12Dans Un Premier Temp Tape ---> 4!voir"
		putspeed "PRIVMSG $::chans :12 $nick 10est sur #Aide 4BIIIIIIIIIIIIIIIIIIIIIIP Merci d'aller aider si possible !!!!"
		putspeed "PRIVMSG $::chans :14BIIIIIIIIIIIIIIIIIIIIIIP visite sur #minut-radio !!!!"
	} else {
		if {[string match "#minut-radio" $salon] == 1 || $salon == "#minut-radio"} {
			putspeed "PRIVSMG $chans :Bienvenue a toi $nick sur le salon d'accueil"
		}
	}
}

Mais hélas je tombe sur cette erreur

Tcl error [cs:joins]: can't read "chans": no such variable

Alors j'ai essaye de faire des modifications comme enleve le $::chans comme enleve le s de join mais rien y fait...


Merci à vous.