I found this quote script.
Can you make it to say random quotes from all users and categories in random interval of time.
Code: Select all
# Number of minutes between each timed say random quote
# Set this to "0" to disable all timed random quotes
set qtimedrandomly "10"
# Channels where we will do timed say random quote
# Note: Channel(s) Must be in 'quotechans' & Not in 'quotequietchans'
set qtimedrandchans "#mychan"
Code: Select all
if {$qtimedrandomly>"0" && ![info exists qtimedrandrunnin]} {
if {$qtimedrandomly>"5"} { timer 5 [list proc:timedquotes]
} else { timer $qtimedrandomly [list proc:timedquotes] }
set qtimedrandrunnin 1
}
proc proc:timedquotes {} {
if {$::qtimedrandomly=="0"} { unset ::qtimedrandrunnin ; return }
foreach ch [split $::qtimedrandchans] {
proc:quote $::botnick usr@host handle $ch random
}
timer $::qtimedrandomly [list proc:timedquotes]
}