[Recherche] messages fun dans un fichier .txt
#1
Bonsoir,

J'ai un peu fouillé le forum et j'ai pris un petit code que CrazyCat avait posté.

TCL
bind time - "00 * * * *" rquote:timed
proc rquote:timed { mn hh dd mm yy } {
   ...
}



J'ai testé puis ça a marché.

Ensuite, j'aimerais bien mettre des phrases dans un fichier txt pour que mon eggdrop dise une phrase différentes. Mais je sais pas du tout faire ce code.. :/
Pouvez vous m'aidez s'il vous plait ?

(Excusez moi si il y a déjà un tuto dans ce domaine..)

Je vous remercies d'avance.

Cordialement.
Répondre Avertir
#2
Tu peux te baser sur http://wiki.eggdrop.fr/Jokes par exemple.

Regarde si le code t'aide, et si non, dis nous où tu bloques.
Répondre
#3
D'accord, merci je vais voir.
Mitha
Répondre Avertir
#4
Bah, en fait, j'aimerais par exemple à 23h00 que mon bot dise une phrase et le lendemain à la même heure, il dise une autre phrase différente et que les phrases se loge dans un fichier txt et que donc l'eggdrop choisit ses phrases dans la liste dans le fichier txt. Désolé si j'explique mal ^^

Cordialement.
Mitha
Répondre Avertir
#5
Et qu'as tu essayé ? Ou tu as juste regardé et pas vu exactement le code dont tu as besoin ?

TCL
set fichier "databases/mesphrases.txt"
set canal "#toncanal"

# Chargement du fichier dans $phrases
set fi [open $fichier "r"]
set phrases [split [read -nonewline $fi] "\n"]
close $fi
 
bind time - "00 23 * * *" randlecture
proc randlecture {mm hh dd mo yy} {
   set laphrase [lindex $::phrases [rand llength $::phrases]]
   putserv "PRIVMSG $::canal :$laphrase"
}


Répondre
#6
J'ai regarder mais j'avais pas trop compris :/

J'ai mis le code mais mon eggdrop a détecté une erreur:

Code :
[03:12] Tcl error [randlecture]: wrong # args: should be "rand limit"
Mitha
Répondre Avertir
#7
TCL
set laphrase [lindex $::phrases [rand [llength $::phrases]]]


C'est en reconnaissant ses erreurs que l'on progresse Wink
Répondre Avertir
#8
Bien. ça marche nickel ! Je vous remercies pour votre aide Smile
Mitha
Répondre Avertir


Atteindre :


Utilisateur(s) parcourant ce sujet : 1 visiteur(s)
Tchat 100% gratuit -Discutez en toute liberté