+- 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 : nicklist (/showthread.php?tid=117)
Pages :
1
2
RE: nicklist - caline012 - 11/12/2007
non c bobn jnai reussi lol un defaut de recopitage mdr
RE: nicklist - caline012 - 11/12/2007
jai essayer de modifier ainsi
tcl
bind pub - !debout pub_debout
proc pub_debout { nick uhost handle channel arg } {
set userlist [chanlist $channel]
if {[llength $userlist]>0} {
set debout [rand 100]
putserv "PRIVMSG $channel : debout [lindex $userlist [rand [llength $userlist]]] on se bouge sur le server de la team pacifique"
} else {
putserv "PRIVMSG $channel :$nick,tu es debout toi"
}
return 0
}
mais me sort que 1 pseudo au lie de la liste complete des nick.
RE: nicklist - caline012 - 13/12/2007
y aurai t il une commande special pour citer la lise complete ???
RE: nicklist - CrazyCat - 13/12/2007
tcl
bind pub - !debout pub_debout
proc pub_debout { nick uhost handle channel arg } {
set userlist [join [chanlist $channel]]
putserv "PRIVMSG $channel :Les présents sont $userlist]"
return 0
}
Par contre, s'il y a trop d'utilisateurs, le message sera coupé
RE: nicklist - caline012 - 13/12/2007
y a des erreur tu ne ferme pas le putserv mais je vais essayer quand meme
RE: nicklist - caline012 - 13/12/2007
ca fonctionne nikel chrome un grand merci crazycat.surtout pour ta patience