Mise en forme de code: pensez à utiliser les balises [ tcl ] et [ /tcl ] (sans les espaces bien sûr) autour de vos codes tcl afin d'avoir un meilleur rendu et une coloration syntaxique. x


Erreur de TCL --'
#1
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 ?!


tcl
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
BlueIRC.fr - Serveur de t'Chat IRC Wink
http://www.BlueIRC.fr


Messages In This Thread
Erreur de TCL --' - by IluZi0n - 22/01/2010, 18:51
RE: Erreur de TCL --' - by BlackNight - 22/01/2010, 19:37
RE: Erreur de TCL --' - by IluZi0n - 22/01/2010, 19:58
RE: Erreur de TCL --' - by Marc - 23/01/2010, 07:58
RE: Erreur de TCL --' - by IluZi0n - 23/01/2010, 17:30

Forum Jump:


Users browsing this thread: 1 Guest(s)