93A6: Routine at 93A6
| 93A6 |
LD HL,($607A) |
| 93A9 |
LD (IX+$03),H |
| 93AC |
LD (IX+$02),L |
| 93AF |
LD A,($607C) |
| 93B2 |
ADD A,$08 |
| 93B4 |
CP $AF |
| 93B6 |
JR C,$93BA |
| 93B8 |
LD A,$AF |
| 93BA |
LD (IX+$04),A |
| 93BD |
CALL $8701 |
| 93C0 |
CALL $8733 |
| 93C3 |
CALL $945C |
| 93C6 |
JR Z,$93E3 |
| 93C8 |
BIT 0,(IX+$08) |
| 93CC |
RET NZ |
| 93CD |
LD (IX+$00),$2F |
| 93D1 |
LD HL,$6080 |
| 93D4 |
RES 0,(HL) |
| 93D6 |
LD A,($607D) |
| 93D9 |
LD (IX+$05),A |
| 93DC |
LD (IX+$06),$10 |
| 93E0 |
JP $B8C3 |
| 93E3 |
RES 0,(IX+$08) |
| 93E7 |
RET |
| 93E8 |
LD A,(IX+$06) |
| 93EB |
CP $30 |
| 93ED |
JR NC,$93F5 |
| 93EF |
INC (IX+$06) |
| 93F2 |
INC (IX+$06) |
| 93F5 |
SRA A |
| 93F7 |
SRA A |
| 93F9 |
SRA A |
| 93FB |
SRA A |
| 93FD |
ADD A,(IX+$04) |
| 9400 |
LD (IX+$04),A |
| 9403 |
CP $B0 |
| 9405 |
JR C,$9435 |
| 9407 |
CALL $91BB |
| 940A |
LD A,$B7 |
| 940C |
LD (IX+$04),A |
| 940F |
LD DE,$7000 |
| 9412 |
EX DE,HL |
| 9413 |
ADD HL,DE |
| 9414 |
LD (HL),$03 |
| 9416 |
INC DE |
| 9417 |
LD A,D |
| 9418 |
AND $03 |
| 941A |
LD D,A |
| 941B |
LD HL,$7000 |
| 941E |
ADD HL,DE |
| 941F |
LD (HL),$03 |
| 9421 |
LD A,(IX+$02) |
| 9424 |
AND $F8 |
| 9426 |
LD L,A |
| 9427 |
LD (IX+$02),L |
| 942A |
CALL $98AE |
| 942D |
CALL $8701 |
| 9430 |
LD (IX+$00),$00 |
| 9434 |
RET |
| 9435 |
LD A,(IX+$05) |
| 9438 |
SRA A |
| 943A |
SRA A |
| 943C |
SRA A |
| 943E |
SRA A |
| 9440 |
LD C,A |
| 9441 |
LD B,$00 |
| 9443 |
JP P,$9448 |
| 9446 |
LD B,$FF |
| 9448 |
LD L,(IX+$02) |
| 944B |
LD H,(IX+$03) |
| 944E |
ADD HL,BC |
| 944F |
LD (IX+$03),H |
| 9452 |
LD (IX+$02),L |
| 9455 |
CALL $8701 |
| 9458 |
CALL $8733 |
| 945B |
RET |
