rand \*- random number generator
jsr pc,srand /to initialize
jsr pc,rand /to get a random number
uses a multiplicative congruential
random number generator to return successive pseudo-random
numbers (in r0) in the range from 1 to 2\u\s715\s10\d\*-1.
The generator is reinitialized by calling
with 1 as argument (in r0).
It can be set to a random starting point by calling
with whatever you like as argument,
for example the low-order word
The author of this routine has been writing
random-number generators for many years and has never been
known to write one that worked.
The low-order bits are not very random.