Mise en forme de code: pensez à utiliser les balises [ tcl ] et [ /tcl ] (sans les espaces bien sûr) autour de vos codes tcl afin d'avoir un meilleur rendu et une coloration syntaxique. x


nicklist
#16
non c bobn jnai reussi lol un defaut de recopitage mdr
Away
#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.
Away
#18
y aurai t il une commande special pour citer la lise complete ???
Away
#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é
irc.zeolia.net - Offrez-moi un café
Merci de ne pas demander d'aide en MP
Away
#20
y a des erreur tu ne ferme pas le putserv mais je vais essayer quand meme
Away
#21
ca fonctionne nikel chrome un grand merci crazycat.surtout pour ta patience
Away


Forum Jump:


Users browsing this thread: 1 Guest(s)