Mercurial > repo
annotate bin/roll @ 12274:3c04e9ef7a3a draft
<kspalaiologos> `` cp -rf /hackenv/tmp/asmbf-1.2.7/bin/* /hackenv/lib/kps/
| author | HackEso <hackeso@esolangs.org> |
|---|---|
| date | Tue, 31 Dec 2019 17:47:30 +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 |