Routines

25233: Return a random number in A


Used by several routines

25233 E5 PUSH HL
25234 2AFD7F LD HL,(32765) Pick up the current random number "seed"
25237 23 INC HL
25238 24 INC H
25239 22FD7F LD (32765),HL Update the seed
25242 3A785C LD A,(23672) Pick up the LSB of the system variable FRAMES in A
25245 AE XOR (HL) Now A=a pseudo-random number
25246 E1 POP HL
25247 C9 RET