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 |