NAME
    FastRand - quickly generate a somewhat random integer
SYNOPSIS
    number = FastRand(seed);
    ULONG FastRand(ULONG);
FUNCTION
    Seed value is taken from stack, shifted left one position,
    exclusive-or'ed with hex value $1D872B41 and returned.
INPUTS
    seed - a 32-bit integer
RESULT
    number - new random seed, a 32-bit value
SEE ALSO
    rangerand()