| View previous topic :: View next topic |
| Author |
Message |
ZzozZ Voice
Joined: 13 Nov 2010 Posts: 10
|
Posted: Sun Oct 21, 2012 6:55 pm Post subject: can you edit tgis Quote script |
|
|
I found this quote script.
Can you make it to say random quotes from all users and categories in random interval of time. |
|
| Back to top |
|
 |
SpiKe^^ Owner

Joined: 12 May 2006 Posts: 792 Location: Tennessee, USA
|
Posted: Wed Nov 28, 2012 3:21 am Post subject: |
|
|
Add to quotes2112.cfg and edit the new settings.
| Code: |
# 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"
|
Add to quotes2112.tcl
| Code: |
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]
}
|
Not tested, let me know how it works out. _________________ SpiKe^^
Get BogusTrivia 2.06.4.7 at www.mytclscripts.com
or visit the New Tcl Acrhive at www.tclarchive.org
. |
|
| Back to top |
|
 |
|