8BBB: Routine at 8BBB
| 8BBB |
LD HL,($5E04) |
| 8BBE |
PUSH HL |
| 8BBF |
LD HL,$DD97 |
| 8BC2 |
LD ($5E04),HL |
| 8BC5 |
LD BC,$1E03 |
| 8BC8 |
LD DE,$DE5F |
| 8BCB |
LD HL,$4041 |
| 8BCE |
PUSH BC |
| 8BCF |
PUSH HL |
| 8BD0 |
LD A,(DE) |
| 8BD1 |
INC DE |
| 8BD2 |
ADD A,$20 |
| 8BD4 |
CALL PrintScreen |
| 8BD7 |
DJNZ $8BD0 |
| 8BD9 |
POP HL |
| 8BDA |
LD BC,$0020 |
| 8BDD |
ADD HL,BC |
| 8BDE |
POP BC |
| 8BDF |
DEC C |
| 8BE0 |
JR NZ,$8BCE |
| 8BE2 |
LD DE,$DEB9 |
| 8BE5 |
LD HL,$5841 |
| 8BE8 |
LD BC,$1E03 |
| 8BEB |
PUSH BC |
| 8BEC |
PUSH HL |
| 8BED |
LD A,(DE) |
| 8BEE |
INC DE |
| 8BEF |
LD (HL),A |
| 8BF0 |
INC L |
| 8BF1 |
DJNZ $8BED |
| 8BF3 |
POP HL |
| 8BF4 |
LD BC,$0020 |
| 8BF7 |
ADD HL,BC |
| 8BF8 |
POP BC |
| 8BF9 |
DEC C |
| 8BFA |
JR NZ,$8BEB |
| 8BFC |
POP HL |
| 8BFD |
LD ($5E04),HL |
| 8C00 |
RET |