;=========================================== ; RandomNumber [Assembly Coder's Zenith] ; out: A = psuedo random number ; modified: AF, BC (14 bytes/62 t-states) ;=========================================== RandomNumber: ld a,r ld b,a ld a,($1234) _@RandomNumberSeed =$-2 ld c,a ld a,(bc) ld (_@RandomNumberSeed),a xor b sub b add a,c ret