Skool Daze Routines
64042: Check whether ANGELFACE is touching ERIC
Used by command list 220.
H 168 (ANGELFACE's character number)
64042 LD A,(32715) Has ERIC been told (and understood) that ANGELFACE has mumps?
64045 BIT 4,A
64047 RET Z Return if not
64048 CALL 32234 Make ANGELFACE walk fast
64051 LD A,(44130) A=ERIC's x-coordinate
64054 LD L,98
64056 CP (HL) Compare this with ANGELFACE's x-coordinate
64057 RET NZ Return if they do not match
64058 LD A,(44129) A=ERIC's y-coordinate
64061 DEC L
64062 CP (HL) Compare this with ANGELFACE's y-coordinate
64063 RET NZ Return if they do not match
64064 LD A,(32715) Set bit 5 at 32715, indicating that ERIC has mumps
64067 SET 5,A
64069 LD (32715),A
64072 RET