Communauté Eggdrop
Problème de phrases dans un fichier - Version imprimable

+- Communauté Eggdrop (https://forum.eggdrop.fr)
+-- Forum : Eggdrop et TCL (https://forum.eggdrop.fr/forumdisplay.php?fid=8)
+--- Forum : Scripts TCL (https://forum.eggdrop.fr/forumdisplay.php?fid=4)
+--- Sujet : Problème de phrases dans un fichier (/showthread.php?tid=1131)



Problème de phrases dans un fichier - ReT - 25/01/2012

Hello.

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.


RE: Problème de phrases dans un fichier - ReT - 25/01/2012

Re, c'est pour dire que ça marche mais ça dit toutes les phrases en même temps dans le salon :s


RE: Problème de phrases dans un fichier - cestlemien - 25/01/2012

salut ,

As tu vu que l'on set un canal ?

Citation :set canal #Mon-salon

c'est là ou tu mets le/les salons ou le script/commande est actif.
Si pour une raion particuliere, tu voulais que le script soit actif sur tous les salons ou ce trouve l'eggdrop ne mets rien dans les " "

Citation :set salon ""

Ah ça fonctionne .. mais donne toutes les phrases, ça change tout .. dsl (post a supprimer eventuellement,puisque je ne peux pas le faire moi même)
Cordialement


RE: Problème de phrases dans un fichier - ReT - 25/01/2012

Salut ceslemien.

C'était un code qu'on m'avait passé ici.
J'ai réglé le problème, je me suis tout simplement trompé de salon.. :/ Et pour le petit bug que j'ai mis ci dessous c'est réglé.

Excusez moi d'avoir poster un message pour rien :|

Cordialement.