on *:TEXT:!qu *:#:{
;if ((%floodquote) || ($($+(%,floodquote.,$nick),2))) { return }
;set -u30 %floodquote On
;set -u60 %floodquote. $+ $nick On
if ($2 isalnum) && ($2 <= $lines(%quotefile)) {
msg $chan Quote $chr(91) $+ $chr(35) $+ $2 $+ $chr(92) $+ $lines(%quotefile) $+ $chr(93) $+ $chr(34) $+ $read(%quotefile, $2) $+ $chr(34)
var %listforrand 2 3 3 2
;this works like this. gettok (1 2 3 4,number to pick,number of the delimiter character 32=space, 44=comma
var %qr1 $rand(1,$gettok(%listforrand,$2,32))
splay %soundquotes $+ q $+ $2 $+ - $+ %qr1 $+ .mp3
}
}