Prev: EA60 Up: Map Next: EB1D
EAEC: Scrolls the top two layers of the floor, animating it like a travelator.
Used by the routine at Update_Room00.
Input
Output
Animate_MovingFloor EAEC LD A,(Pocket1)
EAEF CP $12
EAF1 RET Z
EAF2 LD A,(Pocket2)
EAF5 CP $12
EAF7 RET Z
EAF8 LD A,(DeathFlag)
EAFB OR A
EAFC RET NZ
EAFD LD IX,$91DD
EB01 LD C,$02
Animate_MovingFloor_0 EB03 LD B,$20
EB05 LD L,(IX+$00)
EB08 LD H,(IX+$01)
EB0B DEC IX
EB0D DEC IX
EB0F DEC HL
EB10 DEC HL
EB11 LD A,(HL)
EB12 RRC A
Animate_MovingFloor_1 EB14 RRC (HL)
EB16 INC HL
EB17 DJNZ Animate_MovingFloor_1
EB19 DEC C
EB1A JR NZ,Animate_MovingFloor_0
EB1C RET
Prev: EA60 Up: Map Next: EB1D