Routines
Prev: EF4A Up: Map Next: F043
EFD5: Routine at EFD5
Used by the routine at EF4A.
EFD5 LD HL,$0001 Write 0001 to *F045.
EFD8 LD ($F045),HL
EFDB LD HL,($F04B) Write *F04B to *F049.
EFDE LD ($F049),HL
EFE1 LD DE,($F04D) DE=*F04D.
EFE5 LD BC,($F04B) BC=*F04B.
EFE9 DEC BC Decrease BC by one.
EFEA PUSH BC Stash BC and DE on the stack.
EFEB PUSH DE
EFEC CALL $F04F Call F04F.
EFEF POP DE Restore DE and BC from the stack.
EFF0 POP BC
EFF1 LD HL,($F045) HL=*F045.
EFF4 INC HL Increment HL by one.
EFF5 LD ($F045),HL Write HL to *F045.
EFF8 LD HL,($F049) HL=*F049.
EFFB DEC HL Decrease HL by one.
EFFC LD ($F049),HL Write HL to *F049.
EFFF DEC BC Decrease BC by one.
F000 LD A,B Jump to F00C if BC is zero.
F001 OR C
F002 JP Z,$F00C
F005 DEC DE Decrease DE by one.
F006 LD A,D Jump to EFEA if DE is not zero.
F007 OR E
F008 JP NZ,$EFEA
F00B RET Return.
F00C DEC DE Decrease DE by one.
F00D LD A,D Return if DE is zero.
F00E OR E
F00F RET Z
F010 LD BC,($F04B) BC=*F04B.
F014 DEC BC Decrease BC by one.
F015 PUSH BC Stash BC and DE on the stack.
F016 PUSH DE
F017 CALL $F04F Call F04F.
F01A POP DE Restore DE and BC from the stack.
F01B POP BC
F01C LD HL,($F045) HL=*F045.
F01F DEC HL Decrease HL by one.
F020 LD ($F045),HL Write HL to *F045.
F023 LD HL,($F049) HL=*F049.
F026 INC HL Increment HL by one.
F027 LD ($F049),HL Write HL to *F049.
F02A DEC BC Decrease BC by one.
F02B LD A,B Jump to F037 if BC is zero.
F02C OR C
F02D JP Z,$F037
F030 DEC DE Decrease DE by one.
F031 LD A,D Jump to F015 if DE is not zero.
F032 OR E
F033 JP NZ,$F015
F036 RET Return.
F037 DEC DE Decrease DE by one.
F038 LD A,D Return if DE is zero.
F039 OR E
F03A RET Z
F03B LD BC,($F04B) BC=*F04B.
F03F DEC BC Decrease BC by one.
F040 JP $EFEA Jump to EFEA.
Prev: EF4A Up: Map Next: F043