6A6C: Routine at 6A6C
| 6A6C |
LD HL,$5DCB |
| 6A6F |
INC (HL) |
| 6A70 |
CALL $6CE7 |
| 6A73 |
CALL $6E52 |
| 6A76 |
DEC C |
| 6A77 |
JP Z,$6AE6 |
| 6A7A |
CALL $6E20 |
| 6A7D |
DEC E |
| 6A7E |
JP Z,$648D |
| 6A81 |
XOR A |
| 6A82 |
LD ($5DC9),A |
| 6A85 |
CALL $761D |
| 6A88 |
BIT 2,E |
| 6A8A |
JR Z,$6AA1 |
| 6A8C |
BIT 7,E |
| 6A8E |
JR NZ,$6ACA |
| 6A90 |
BIT 4,E |
| 6A92 |
JR NZ,$6AD0 |
| 6A94 |
LD A,E |
| 6A95 |
AND $40 |
| 6A97 |
LD E,A |
| 6A98 |
LD A,(IX+$04) |
| 6A9B |
AND $BF |
| 6A9D |
OR E |
| 6A9E |
LD (IX+$04),A |
| 6AA1 |
BIT 6,(IX+$04) |
| 6AA5 |
LD A,(IX+$01) |
| 6AA8 |
JR Z,$6AD6 |
| 6AAA |
ADD A,$02 |
| 6AAC |
LD (IX+$01),A |
| 6AAF |
BIT 7,(IX+$04) |
| 6AB3 |
LD A,(IX+$02) |
| 6AB6 |
JR Z,$6ADA |
| 6AB8 |
ADD A,$02 |
| 6ABA |
LD (IX+$02),A |
| 6ABD |
LD A,($5DC9) |
| 6AC0 |
AND A |
| 6AC1 |
JP NZ,$6D7A |
| 6AC4 |
INC A |
| 6AC5 |
LD ($5DC9),A |
| 6AC8 |
JR $6A85 |
| 6ACA |
RES 7,(IX+$04) |
| 6ACE |
JR $6AA1 |
| 6AD0 |
SET 7,(IX+$04) |
| 6AD4 |
JR $6AA1 |
| 6AD6 |
SUB $02 |
| 6AD8 |
JR $6AAC |
| 6ADA |
SUB $02 |
| 6ADC |
CP $24 |
| 6ADE |
JR NC,$6ABA |
| 6AE0 |
SET 7,(IX+$04) |
| 6AE4 |
JR $6ABA |
| 6AE6 |
LD BC,$0080 |
| 6AE9 |
CALL $70F9 |
| 6AEC |
JP $6C28 |
