25/01/2012, 02:34
Hello.
J'ai actuellement un soucis dans mon tcl..
Et, quand je fais !blague dans le salon, rien ne s'affiche et j'ai même pas d'erreur en party line.
J'aimerais savoir d'ou vient l'erreur car je le trouve pas :s
Merci, cordialement.
J'ai actuellement un soucis dans mon tcl..
tcl
set fichier1 "scripts/Phrases/blagues.txt"
set canal "#Mon-salon"
# Chargement du fichier dans $phrases
set fi1 [open $fichier1 "r"]
set phrases1 [split [read -nonewline $fi1] "\n"]
close $fi1
bind pub - !blague bl
proc bl { nick host hand channel arg } {
set vnick [lindex $arg 0]
set laphrase [lindex $::phrases1 [rand [llength $::phrases1]]]
putquick "PRIVMSG $::canal :$laphrase"
}
Et, quand je fais !blague dans le salon, rien ne s'affiche et j'ai même pas d'erreur en party line.
J'aimerais savoir d'ou vient l'erreur car je le trouve pas :s
Merci, cordialement.