| 55609 |
PUSH AF |
| 55610 |
CALL Calculate_ScreenBlockAddress |
| 55613 |
POP AF |
| 55614 |
RRCA |
| 55615 |
LD B,A |
| 55616 |
LD A,(DE) |
| 55617 |
LD C,A |
| 55618 |
AND 240 |
| 55620 |
RRCA |
| 55621 |
CALL 55639 |
| 55624 |
INC HL |
| 55625 |
LD A,C |
| 55626 |
AND 15 |
| 55628 |
RLCA |
| 55629 |
RLCA |
| 55630 |
RLCA |
| 55631 |
CALL 55639 |
| 55634 |
INC DE |
| 55635 |
INC HL |
| 55636 |
DJNZ 55616 |
| 55638 |
RET |
| 55639 |
PUSH BC |
| 55640 |
PUSH DE |
| 55641 |
PUSH HL |
| 55642 |
LD B,0 |
| 55644 |
LD C,A |
| 55645 |
PUSH HL |
| 55646 |
LD HL,61163 |
| 55649 |
ADD HL,BC |
| 55650 |
POP DE |
| 55651 |
LD B,8 |
| 55653 |
LD A,(HL) |
| 55654 |
LD (DE),A |
| 55655 |
INC HL |
| 55656 |
LD IX,54614 |
| 55660 |
BIT 1,(IX+0) |
| 55664 |
JR Z,55682 |
| 55666 |
LD A,B |
| 55667 |
CP 5 |
| 55669 |
JR NZ,55682 |
| 55671 |
PUSH HL |
| 55672 |
EX DE,HL |
| 55673 |
LD DE,1760 |
| 55676 |
SBC HL,DE |
| 55678 |
EX DE,HL |
| 55679 |
POP HL |
| 55680 |
JR 55683 |
| 55682 |
INC D |
| 55683 |
DJNZ 55653 |
| 55685 |
POP HL |
| 55686 |
POP DE |
| 55687 |
POP BC |
| 55688 |
RET |
