93CA: Routine at 93CA
| 93CA |
PUSH IX |
| 93CC |
CALL $9366 |
| 93CF |
EXX |
| 93D0 |
LD HL,$5B00 |
| 93D3 |
LD DE,$6400 |
| 93D6 |
EXX |
| 93D7 |
LD HL,($6DA0) |
| 93DA |
LD DE,($6DA2) |
| 93DE |
LD IX,$5800 |
| 93E2 |
LD B,$00 |
| 93E4 |
LD A,B |
| 93E5 |
CP E |
| 93E6 |
JR C,$9406 |
| 93E8 |
LD A,D |
| 93E9 |
CP B |
| 93EA |
JR C,$9406 |
| 93EC |
LD C,$00 |
| 93EE |
LD A,C |
| 93EF |
CP L |
| 93F0 |
JR C,$93FC |
| 93F2 |
LD A,H |
| 93F3 |
CP C |
| 93F4 |
JR C,$93FC |
| 93F6 |
EXX |
| 93F7 |
CALL $9421 |
| 93FA |
JR $93FF |
| 93FC |
CALL $9418 |
| 93FF |
INC C |
| 9400 |
BIT 5,C |
| 9402 |
JR Z,$93EE |
| 9404 |
JR $940F |
| 9406 |
PUSH BC |
| 9407 |
LD B,$20 |
| 9409 |
CALL $9418 |
| 940C |
DJNZ $9409 |
| 940E |
POP BC |
| 940F |
INC B |
| 9410 |
LD A,B |
| 9411 |
CP $18 |
| 9413 |
JR NZ,$93E4 |
| 9415 |
POP IX |
| 9417 |
RET |
| 9418 |
LD (IX+$00),$09 |
| 941C |
EXX |
| 941D |
LD A,$FF |
| 941F |
LD (HL),A |
| 9420 |
LD (DE),A |
| 9421 |
INC HL |
| 9422 |
INC HL |
| 9423 |
INC HL |
| 9424 |
INC DE |
| 9425 |
INC DE |
| 9426 |
INC DE |
| 9427 |
EXX |
| 9428 |
INC IX |
| 942A |
RET |
