annotate bin/roll @ 1197:242eadf698d1
<oerjan> addquote <kmc> i bet a blog post complaining about ");});});" syntax in JavaScript and comparing it unfavorably to Lisp would get approximately one billion comments on hacker news <Bike> but at what cost? your very \x02soul\x0f, kmc!
author |
HackBot |
date |
Sun, 23 Dec 2012 17:25:01 +0000 |
parents |
e037173e0012 |
children |
|
rev |
line source |
0
|
1 #!/bin/bash
|
|
2 rolls="$*"
|
|
3 if [ "$rolls" = "" ] ; then rolls="1d6" ; fi
|
|
4
|
|
5 for i in $rolls
|
|
6 do
|
|
7 if expr "$i" : ".*[dD].*" >& /dev/null
|
|
8 then
|
|
9 rollc=`echo "$i" | sed 's/[dD].*//'`
|
|
10 diesz=`echo "$i" | sed 's/.*[dD]//'`
|
|
11 else
|
|
12 rollc=1
|
|
13 diesz="$i"
|
|
14 fi
|
|
15
|
|
16 roll=0
|
|
17 for (( j = 0; $j < $rollc; j++ ))
|
|
18 do
|
|
19 roll=$(( roll + (RANDOM % diesz) + 1 ))
|
|
20 done
|
|
21
|
|
22 echo -n $roll' '
|
|
23 done
|
|
24 echo
|