Routines

25534: Determine which floor ERIC's on


Used by routines at 25944 and 32000. It returns with D=3, 10, 14 or 17, indicating which floor ERIC's on (or closest to).

25534 ED5B01D2 LD DE,(53761) Get ERIC's coordinates in DE
25538 3AFB7F LD A,(32763)
25541 0F RRCA Is ERIC jumping?
25542 3807 JR C,25551 Jump if so
25544 0F RRCA Does ERIC otherwise not have his feet on the floor?
25545 D0 RET NC Return if not (certain that D=3, 10 or 17)
25546 3AED7F LD A,(32749)
25549 E606 AND 6 Retain bits 1 and 2 (set if ERIC's on or stepping off a plant)
25551 C3B56D JP 28085 Continue if ERIC hasn't got his feet on the ground