E4D3: Routine at E4D3
| E4D3 |
LD HL,$E4BA |
| E4D6 |
LD IX,$E4C6 |
| E4DA |
LD DE,$0000 |
| E4DD |
LD B,$0B |
| E4DF |
LD C,(HL) |
| E4E0 |
PUSH HL |
| E4E1 |
LD E,(IX+$00) |
| E4E4 |
INC IX |
| E4E6 |
LD HL,$E4BA |
| E4E9 |
ADD HL,DE |
| E4EA |
LD A,(HL) |
| E4EB |
LD ($E4D1),HL |
| E4EE |
POP HL |
| E4EF |
LD (HL),A |
| E4F0 |
LD HL,($E4D1) |
| E4F3 |
DJNZ $E4E0 |
| E4F5 |
LD (HL),C |
| E4F6 |
RET |
| E4F7 |
PUSH HL |
| E4F8 |
LD HL,($E0D0) |
| E4FB |
LD A,(HL) |
| E4FC |
RLCA |
| E4FD |
RLCA |
| E4FE |
RLCA |
| E4FF |
PUSH AF |
| E500 |
LD A,R |
| E502 |
AND $1F |
| E504 |
LD H,A |
| E505 |
INC L |
| E506 |
LD ($E0D0),HL |
| E509 |
POP AF |
| E50A |
LD ($E0D0),HL |
| E50D |
LD HL,$D541 |
| E510 |
SRL A |
| E512 |
SRL A |
| E514 |
CP (HL) |
| E515 |
JP P,$E512 |
| E518 |
INC A |
| E519 |
LD B,$00 |
| E51B |
LD C,A |
| E51C |
POP HL |
| E51D |
RET |
| E51E |
LD HL,$E09E |
| E521 |
LD A,($D542) |
| E524 |
CP $00 |
| E526 |
JP NZ,$E52F |
| E529 |
LD A,$00 |
| E52B |
LD ($E0D2),A |
| E52E |
RET |
| E52F |
LD A,(HL) |
| E530 |
PUSH HL |
| E531 |
POP DE |
| E532 |
INC HL |
| E533 |
LD ($E0D2),A |
| E536 |
LD A,($D542) |
| E539 |
DEC A |
| E53A |
CP $00 |
| E53C |
JP NZ,$E543 |
| E53F |
LD C,$01 |
| E541 |
JR $E544 |
| E543 |
LD C,A |
| E544 |
LD B,$00 |
| E546 |
LDIR |
| E548 |
LD ($D542),A |
| E54B |
RET |
| E54C |
LD A,($E0D2) |
| E54F |
CP $15 |
| E551 |
JP M,$E555 |
| E554 |
RET |
| E555 |
LD HL,$E09E |
| E558 |
LD B,$00 |
| E55A |
LD A,($D542) |
| E55D |
LD C,A |
| E55E |
INC A |
| E55F |
LD ($D542),A |
| E562 |
ADD HL,BC |
| E563 |
LD A,($E0D2) |
| E566 |
LD (HL),A |
| E567 |
RET |
