9CA2: Routine at 9CA2
| 9CA2 |
LD A,$55 |
| 9CA4 |
CALL $D237 |
| 9CA7 |
BIT 7,(IX+$05) |
| 9CAB |
RET Z |
| 9CAC |
LD HL,$9CA1 |
| 9CAF |
LD A,(HL) |
| 9CB0 |
CP $FF |
| 9CB2 |
RET Z |
| 9CB3 |
DEC (HL) |
| 9CB4 |
RET NZ |
| 9CB5 |
LD HL,$015B |
| 9CB8 |
LD (IX+$09),L |
| 9CBB |
LD (IX+$0A),H |
| 9CBE |
XOR A |
| 9CBF |
LD (IX+$0D),A |
| 9CC2 |
LD (IX+$0E),A |
| 9CC5 |
LD IX,$99B7 |
| 9CC9 |
RES 1,(IX+$03) |
| 9CCD |
RET |
| 9CCE |
LD IX,($A017) |
| 9CD2 |
LD B,(IX+$0F) |
| 9CD5 |
LD A,C |
| 9CD6 |
CALL $D237 |
| 9CD9 |
LD A,(IX+$0F) |
| 9CDC |
CP B |
| 9CDD |
RET NZ |
| 9CDE |
LD A,C |
| 9CDF |
CALL $C821 |
| 9CE2 |
JR Z,$9CE6 |
| 9CE4 |
XOR A |
| 9CE5 |
RET |
| 9CE6 |
OR $01 |
| 9CE8 |
RET |
