Hello,
I'm looking for a script that sends random messages to each channel part, I need at least 10 different messages to send to users (not together, of course) when they leave the room.
The ones I found allow only one default message
thx
Code: Select all
set partMessages {
"message 1"
"message 2"
"message 3"
"message 4"
"message 5"
"message 6"
"message 7"
"message 8"
"message 9"
"message 10"
}
bind part - * part:message
proc part:message {nick uhost hand chan msg} {
if {[isbotnick $nick]} return
global partMessages
set no [expr [rand [llength $partMessages]] - 1]
set message [string map [list %nick $nick %chan $chan] [lindex $partMessages $no]]
puthelp "PRIVMSG $nick :$message"
}
Code: Select all
if {[isbotnick $nick]} return
Code: Select all
if {![channel get $chan partMsg]} return
Code: Select all
bind part - * part:message
Code: Select all
setudef flag partMsg