nicklist
#16
non c bobn jnai reussi lol un defaut de recopitage mdr
Répondre Avertir
#17
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.
Répondre Avertir
#18
y aurai t il une commande special pour citer la lise complete ???
Répondre Avertir
#19
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é
Répondre
#20
y a des erreur tu ne ferme pas le putserv mais je vais essayer quand meme
Répondre Avertir
#21
ca fonctionne nikel chrome un grand merci crazycat.surtout pour ta patience
Répondre Avertir


Atteindre :


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