jai essayer de modifier ainsi
mais me sort que 1 pseudo au lie de la liste complete des nick.
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.