38754: Routine at 9762
38754 |
LD L,(IX+4) |
38757 |
LD H,(IX+5) |
38760 |
LD D,(HL) |
38761 |
INC HL |
38762 |
LD E,(HL) |
38763 |
DEC HL |
38764 |
LD A,(DE) |
38765 |
AND 17 |
38767 |
JR NZ,38818 |
38769 |
LD DE,10 |
38772 |
LD IX,32256 |
38776 |
BIT 0,(IX+0) |
38780 |
JR Z,38786 |
38782 |
ADD IX,DE |
38784 |
JR 38776 |
38786 |
SET 0,(IX+0) |
38790 |
LD (IX+1),L |
38793 |
LD (IX+2),H |
38796 |
CALL 38823 |
38799 |
LD A,(39339) |
38802 |
ADD A,1 |
38804 |
DAA |
38805 |
LD (39339),A |
38808 |
LD HL,39340 |
38811 |
DEC (HL) |
38812 |
LD HL,61439 |
38815 |
SET 2,(HL) |
38817 |
RET |
38818 |
SET 3,(IX+0) |
38822 |
RET |
38823 |
PUSH IX |
38825 |
LD DE,3 |
38828 |
ADD IX,DE |
38830 |
LD (39352),IX |
38834 |
LD A,0 |
38836 |
LD IX,(39375) |
38840 |
CALL 38342 |
38843 |
LD DE,38092 |
38846 |
LD (37987),DE |
38850 |
LD DE,(39352) |
38854 |
POP IX |
38856 |
LD L,(IX+1) |
38859 |
LD H,(IX+2) |
38862 |
LD A,0 |
38864 |
LD IX,(39375) |
38868 |
JP 37959 |