10/04/2008, 23:00
(Modification du message : 10/04/2008, 23:02 par loulou7593.)
Bonjour voila j'ai un soucis car je veux configurer un Welcome pour que quand chaque users rentre sur le salon ca lui envoi un Welcome que moi ou quelqu'un qui a acces au bot puisse configurer ce Welcome avec la commande !welcome.
J'ai bien quelque chose qui fonctionne, mais pour que cela fonctionne il me faut mettre deux code TCL different car l'un sans l'autre ca ne fonctionne pas.
Et le principal probleme c'est que je voudrais que ce Welcome soit gardé en Memoire car là à chaque .rehash et bien le Welcome disparait.
Voici les deux TCL
Le deuxieme
Voila donc je Récap , je veux qu'en tapant !welcome moi ou les gens qui ont acces sur le bot puisse configuré un Welcome et qu'il soit gardé en mémoire.
Merci d'avance
J'ai bien quelque chose qui fonctionne, mais pour que cela fonctionne il me faut mettre deux code TCL different car l'un sans l'autre ca ne fonctionne pas.
Et le principal probleme c'est que je voudrais que ce Welcome soit gardé en Memoire car là à chaque .rehash et bien le Welcome disparait.
Voici les deux TCL
tcl
set onjoin_msg {
{
"Welcome to Channel \$chan \$nick"
}
}
set onjoin_chans "#BG® #eg-lovech"
bind join - * join_onjoin
putlog "Onjoin.tcl 0.1 by Banned loaded"
proc join_onjoin {nick uhost hand chan} {
global onjoin_msg onjoin_chans botnick
if {([lsearch -exact [string tolower $onjoin_chans] [string tolower $chan]] != -1) && (![matchattr $hand b]) && ($nick != $botnick)} {
puthelp "NOTICE $nick :[subst $onjoin_msg]"
}
}
Le deuxieme
tcl
bind pub - !welcome pub:welcome
proc pub:welcome {nick uhost hand channel text} {
global onjoin_msg
if {[validuser $hand] && ($text != "")} {
set onjoin_msg "$text"
putserv "NOTICE $nick :Nouveau message d'acceuil -> $text"
} else {
putserv "NOTICE $nick :Erreur..."
}
}
Voila donc je Récap , je veux qu'en tapant !welcome moi ou les gens qui ont acces sur le bot puisse configuré un Welcome et qu'il soit gardé en mémoire.
Merci d'avance