AEF1: Routine at AEF1
| AEF1 |
EXX |
| AEF2 |
LD A,(IX+$01) |
| AEF5 |
AND $7F |
| AEF7 |
OR (IY+$01) |
| AEFA |
LD (IY+$01),A |
| AEFD |
LD A,(IX+$00) |
| AF00 |
LD (IY+$00),A |
| AF03 |
EXX |
| AF04 |
LD A,(IX+$04) |
| AF07 |
OR (IX+$05) |
| AF0A |
RET Z |
| AF0B |
LD A,$0E |
| AF0D |
CALL $AF38 |
| AF10 |
RET NZ |
| AF11 |
EXX |
| AF12 |
PUSH IY |
| AF14 |
POP HL |
| AF15 |
LD DE,$0012 |
| AF18 |
ADD HL,DE |
| AF19 |
PUSH HL |
| AF1A |
LD DE,$FFF6 |
| AF1D |
ADD HL,DE |
| AF1E |
POP DE |
| AF1F |
LD BC,$0006 |
| AF22 |
LDIR |
| AF24 |
LD DE,$0004 |
| AF27 |
CALL $AF52 |
| AF2A |
LD A,(IY+$02) |
| AF2D |
OR (IY+$03) |
| AF30 |
LD DE,$0002 |
| AF33 |
CALL Z,$AF56 |
| AF36 |
EXX |
| AF37 |
RET |
