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 |