9762: Routine at 9762
9762 |
LD L,(IX+$04) |
9765 |
LD H,(IX+$05) |
9768 |
LD D,(HL) |
9769 |
INC HL |
976A |
LD E,(HL) |
976B |
DEC HL |
976C |
LD A,(DE) |
976D |
AND $11 |
976F |
JR NZ,$97A2 |
9771 |
LD DE,$000A |
9774 |
LD IX,$7E00 |
9778 |
BIT 0,(IX+$00) |
977C |
JR Z,$9782 |
977E |
ADD IX,DE |
9780 |
JR $9778 |
9782 |
SET 0,(IX+$00) |
9786 |
LD (IX+$01),L |
9789 |
LD (IX+$02),H |
978C |
CALL $97A7 |
978F |
LD A,($99AB) |
9792 |
ADD A,$01 |
9794 |
DAA |
9795 |
LD ($99AB),A |
9798 |
LD HL,$99AC |
979B |
DEC (HL) |
979C |
LD HL,$EFFF |
979F |
SET 2,(HL) |
97A1 |
RET |
97A2 |
SET 3,(IX+$00) |
97A6 |
RET |
97A7 |
PUSH IX |
97A9 |
LD DE,$0003 |
97AC |
ADD IX,DE |
97AE |
LD ($99B8),IX |
97B2 |
LD A,$00 |
97B4 |
LD IX,($99CF) |
97B8 |
CALL $95C6 |
97BB |
LD DE,$94CC |
97BE |
LD ($9463),DE |
97C2 |
LD DE,($99B8) |
97C6 |
POP IX |
97C8 |
LD L,(IX+$01) |
97CB |
LD H,(IX+$02) |
97CE |
LD A,$00 |
97D0 |
LD IX,($99CF) |
97D4 |
JP $9447 |