| 56436 |
LD IX,56675 |
| 56440 |
LD B,0 |
| 56442 |
LD A,(57554) |
| 56445 |
LD C,3 |
| 56447 |
CP 21 |
| 56449 |
JP M,56459 |
| 56452 |
SUB 20 |
| 56454 |
DEC C |
| 56455 |
JR NZ,56447 |
| 56457 |
LD A,1 |
| 56459 |
DEC A |
| 56460 |
RLCA |
| 56461 |
RLCA |
| 56462 |
LD C,A |
| 56463 |
ADD IX,BC |
| 56465 |
LD C,(IX+0) |
| 56468 |
LD B,(IX+1) |
| 56471 |
LD E,(IX+2) |
| 56474 |
LD D,(IX+3) |
| 56477 |
LD IX,(57555) |
| 56481 |
ADD IX,BC |
| 56483 |
LD HL,(57555) |
| 56486 |
LD BC,2560 |
| 56489 |
ADD HL,BC |
| 56490 |
ADD HL,DE |
| 56491 |
PUSH HL |
| 56492 |
POP IY |
| 56494 |
LD B,4 |
| 56496 |
LD H,40 |
| 56498 |
PUSH BC |
| 56499 |
LD A,8 |
| 56501 |
PUSH IX |
| 56503 |
LD BC,20 |
| 56506 |
PUSH AF |
| 56507 |
LD L,A |
| 56508 |
CALL 56412 |
| 56511 |
LD A,(IX+0) |
| 56514 |
LD (DE),A |
| 56515 |
ADD IX,BC |
| 56517 |
POP AF |
| 56518 |
INC A |
| 56519 |
CP 40 |
| 56521 |
JP NZ,56506 |
| 56524 |
PUSH IY |
| 56526 |
POP IX |
| 56528 |
LD DE,22565 |
| 56531 |
LD B,4 |
| 56533 |
PUSH HL |
| 56534 |
PUSH BC |
| 56535 |
LD A,(IX+0) |
| 56538 |
LD (DE),A |
| 56539 |
LD BC,20 |
| 56542 |
ADD IX,BC |
| 56544 |
LD HL,32 |
| 56547 |
ADD HL,DE |
| 56548 |
EX DE,HL |
| 56549 |
POP BC |
| 56550 |
DJNZ 56534 |
| 56552 |
POP HL |
| 56553 |
POP IX |
| 56555 |
POP BC |
| 56556 |
LD A,B |
| 56557 |
PUSH BC |
| 56558 |
PUSH IX |
| 56560 |
PUSH HL |
| 56561 |
CP 1 |
| 56563 |
JP Z,56662 |
| 56566 |
LD A,5 |
| 56568 |
LD C,35 |
| 56570 |
LD B,C |
| 56571 |
SLA B |
| 56573 |
DJNZ 56573 |
| 56575 |
XOR 16 |
| 56577 |
OUT (254),A |
| 56579 |
DEC C |
| 56580 |
JP NZ,56570 |
| 56583 |
LD HL,5000 |
| 56586 |
LD DE,1250 |
| 56589 |
LD A,(HL) |
| 56590 |
AND 240 |
| 56592 |
OR 5 |
| 56594 |
OUT (254),A |
| 56596 |
INC HL |
| 56597 |
DEC DE |
| 56598 |
LD A,D |
| 56599 |
OR E |
| 56600 |
JP NZ,56589 |
| 56603 |
LD A,1 |
| 56605 |
LD (58730),A |
| 56608 |
LD B,4 |
| 56610 |
PUSH BC |
| 56611 |
LD A,(58730) |
| 56614 |
LD B,A |
| 56615 |
LD C,7 |
| 56617 |
CALL Calculate_ScreenBlockAddress |
| 56620 |
LD A,8 |
| 56622 |
PUSH HL |
| 56623 |
LD BC,3 |
| 56626 |
PUSH HL |
| 56627 |
POP DE |
| 56628 |
INC DE |
| 56629 |
PUSH HL |
| 56630 |
LDDR |
| 56632 |
INC HL |
| 56633 |
LD (HL),C |
| 56634 |
POP HL |
| 56635 |
INC H |
| 56636 |
DEC A |
| 56637 |
JP NZ,56623 |
| 56640 |
POP HL |
| 56641 |
CALL Calculate_AttributeAddress |
| 56644 |
PUSH DE |
| 56645 |
POP HL |
| 56646 |
INC DE |
| 56647 |
LD BC,3 |
| 56650 |
LDDR |
| 56652 |
LD A,0 |
| 56654 |
LD (DE),A |
| 56655 |
LD HL,58730 |
| 56658 |
INC (HL) |
| 56659 |
POP BC |
| 56660 |
DJNZ 56610 |
| 56662 |
POP HL |
| 56663 |
POP IX |
| 56665 |
DEC IX |
| 56667 |
DEC IY |
| 56669 |
POP BC |
| 56670 |
DEC B |
| 56671 |
JP NZ,56498 |
| 56674 |
RET |
