38484: Routine at 9654
| 38484 |
LD HL,24158 |
| 38487 |
INC (HL) |
| 38488 |
LD H,(IX+3) |
| 38491 |
LD L,(IX+2) |
| 38494 |
LD DE,(24698) |
| 38498 |
AND A |
| 38499 |
SBC HL,DE |
| 38501 |
BIT 4,H |
| 38503 |
JP NZ,38615 |
| 38506 |
LD C,0 |
| 38508 |
LD A,(IX+5) |
| 38511 |
AND A |
| 38512 |
JP P,38519 |
| 38515 |
CP 209 |
| 38517 |
JR C,38521 |
| 38519 |
SUB 2 |
| 38521 |
LD (IX+5),A |
| 38524 |
LD A,(24696) |
| 38527 |
CP 17 |
| 38529 |
JR C,38535 |
| 38531 |
LD A,104 |
| 38533 |
JR 38538 |
| 38535 |
LD A,(24700) |
| 38538 |
SUB (IX+4) |
| 38541 |
JP M,38632 |
| 38544 |
LD A,(IX+6) |
| 38547 |
AND A |
| 38548 |
JP M,38555 |
| 38551 |
CP 48 |
| 38553 |
JR NC,38557 |
| 38555 |
ADD A,2 |
| 38557 |
LD (IX+6),A |
| 38560 |
SRA A |
| 38562 |
SRA A |
| 38564 |
SRA A |
| 38566 |
SRA A |
| 38568 |
ADD A,(IX+4) |
| 38571 |
CP 56 |
| 38573 |
JR C,38647 |
| 38575 |
CP 176 |
| 38577 |
JR NC,38661 |
| 38579 |
LD (IX+4),A |
| 38582 |
INC (IX+17) |
| 38585 |
LD A,(IX+17) |
| 38588 |
AND 7 |
| 38590 |
BIT 7,C |
| 38592 |
JR NZ,38596 |
| 38594 |
XOR 7 |
| 38596 |
ADD A,72 |
| 38598 |
LD (IX+0),A |
| 38601 |
LD A,(24130) |
| 38604 |
RLA |
| 38605 |
AND 2 |
| 38607 |
ADD A,68 |
| 38609 |
LD (IX+7),A |
| 38612 |
JP 38219 |
| 38615 |
LD C,128 |
| 38617 |
LD A,(IX+5) |
| 38620 |
AND A |
| 38621 |
JP M,38628 |
| 38624 |
CP 48 |
| 38626 |
JR NC,38521 |
| 38628 |
ADD A,2 |
| 38630 |
JR 38521 |
| 38632 |
LD A,(IX+6) |
| 38635 |
AND A |
| 38636 |
JP P,38643 |
| 38639 |
CP 209 |
| 38641 |
JR C,38557 |
| 38643 |
SUB 2 |
| 38645 |
JR 38557 |
| 38647 |
LD A,(IX+6) |
| 38650 |
AND A |
| 38651 |
JP P,38582 |
| 38654 |
NEG |
| 38656 |
LD (IX+6),A |
| 38659 |
JR 38582 |
| 38661 |
LD A,(IX+6) |
| 38664 |
AND A |
| 38665 |
JP M,38582 |
| 38668 |
JR 38654 |