roll {
if ($1) && (d isin $1) {
var %xd = $gettok($1,1,100), %dx = $gettok($1,2,100)
echo -a * Rolling %xd $+ d $+ %dx
while (%xd != 0) {
%result = %result $rand(1, %dx)
dec %xd
}
echo -a * Dice results: %result (A total of $calc($replace(%result,$chr(32),+)) $+ )
}
}