; Usage: /roll #
; This command can only be typed into a window starting with a '#' (e.g. a channel)
alias roll {
if ($left($active,1) == #) {
if ($1 !isnum) { echo -ac info * Invalid number of dice. | return }
var %c = $1
while (%c) {
var %roll = $rand(1,10)
if (%roll = 1) { var %roll = #04,01 $+ %roll }
elseif (%roll isnum 2-7) { var %roll = #00,01 $+ %roll }
elseif (%roll isnum 8-9) { var %roll = #03,01 $+ %roll }
else { var %roll = #09,01 $+ %roll }
var %dice = %dice $+ $iif(%dice,# $+ $chr(44)) %roll
dec %c
}
describe $active rolled $1 dice: $replace(%dice,$chr(46),# $+ $chr(44) $+ $chr(32))
}
}