diff options
Diffstat (limited to 'games/rndn')
-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" |