alias -l brandtime {
var %lowtime = 1 | ; quickest duration between messages (in seconds)
var %hightime = 9 | ; longest duration between messages (in seconds)
return $rand(%lowtime,%hightime)
}
alias brandmsg {
var %rline = $read($iif(%bot.file,$v1,brand.txt))
if (/me* iswm %rline) /describe $1 $gettok(%rline,2-,32)
else /msg $1 %rline
.timer [ $+ [ $1 ] ] 1 $brandtime brandmsg $1-
}
on *:TEXT:!mood &:#: {
[color:blue]; Modify this list with the different moods and text files.
; Use the format <mood_name>:<text_file>, speprated by a space for each mood[/color]
var %mood_list = default:brand.txt happy:happy.txt sad:sad.txt
if ($wildtoktok(%mood_list,$+($2,:*),1,32)) {
/set %bot.file $gettok($v1,2,58)
/msg $chan Bot mood set to $2 $+ .
}
else /msg $chan Unknown mood $+(',$2,')
}