diff options
author | Tom Ryder <tom@sanctum.geek.nz> | 2016-07-01 21:20:32 +1200 |
---|---|---|
committer | Tom Ryder <tom@sanctum.geek.nz> | 2016-07-01 21:20:32 +1200 |
commit | 7992ad768824a861a8622b6bc71689a42fb562e7 (patch) | |
tree | 7fcef021fb7ca667bc64fc3badc7dc32918c90ec /games | |
parent | Make fgscr POSIX sh/find compliant (diff) | |
download | dotfiles-7992ad768824a861a8622b6bc71689a42fb562e7.tar.gz dotfiles-7992ad768824a861a8622b6bc71689a42fb562e7.zip |
Add rndn(6)
Diffstat (limited to 'games')
-rwxr-xr-x | games/rndn | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/games/rndn b/games/rndn new file mode 100755 index 00000000..fd7f3813 --- /dev/null +++ b/games/rndn @@ -0,0 +1,12 @@ +#!/usr/bin/env bash +# Esoteric random number generator +# <http://dilbert.com/strip/2001-10-25> +for ((seed = RANDOM ** 2, i = 0; i < ${#seed}; i++)) ; do + ((sum += ${seed:i:1})) +done +for ((red = seed-sum; ${#red} > 1; red=redn)) ; do + for ((j = 0, redn=0; j < ${#red}; j++)) ; do + ((redn += ${red:j:1})) + done +done +printf '%u\n' "$red" |