RAND Subroutine

Usage:

r = RAND([seed])

Description:

Returns a pseudo-random number from 0 to 32767. You can optionally provide a seed to generate a new sequence. The pseudo-random numbers generated are NOT cryptographically strong.