chiark / gitweb /
can reprogram santafe
[trains.git] / hostside / fun-random
1 #!/bin/sh
2 set -e
3 s=$1
4 while true; do
5         b1=$(hexdump </dev/urandom -n1 -e '"%d"')
6         squ=$(($b1 * $b1))
7         speed=$(($squ / 516))
8         b2=$(hexdump </dev/urandom -n1 -e '"%d"')
9         dirn=$(($b2 / 128))
10         echo b1=$b1 speed=$speed b2=$b2 dirn=$dirn
11         ./hostside-old -s$s speed126 2 $speed $dirn
12         sleep 30
13 done