AD8F: Routine at AD8F
| AD8F |
LD IY,($9789) |
| AD93 |
LD HL,$4081 |
| AD96 |
LD B,$0C |
| AD98 |
PUSH BC |
| AD99 |
PUSH HL |
| AD9A |
CALL $ADAC |
| AD9D |
POP HL |
| AD9E |
LD A,$20 |
| ADA0 |
ADD A,L |
| ADA1 |
LD L,A |
| ADA2 |
JR NC,$ADA8 |
| ADA4 |
LD A,$08 |
| ADA6 |
ADD A,H |
| ADA7 |
LD H,A |
| ADA8 |
POP BC |
| ADA9 |
DJNZ $AD98 |
| ADAB |
RET |
| ADAC |
LD B,$0F |
| ADAE |
PUSH BC |
| ADAF |
PUSH HL |
| ADB0 |
CALL $ADBC |
| ADB3 |
POP HL |
| ADB4 |
INC L |
| ADB5 |
INC L |
| ADB6 |
POP BC |
| ADB7 |
INC IY |
| ADB9 |
DJNZ $ADAE |
| ADBB |
RET |
| ADBC |
BIT 7,(IY+$00) |
| ADC0 |
RET NZ |
| ADC1 |
BIT 4,(IY+$00) |
| ADC5 |
RET NZ |
| ADC6 |
LD E,(IX+$00) |
| ADC9 |
LD D,(IX+$01) |
| ADCC |
LD ($ADDE),SP |
| ADD0 |
EX DE,HL |
| ADD1 |
LD SP,HL |
| ADD2 |
EX DE,HL |
| ADD3 |
LD B,$08 |
| ADD5 |
POP DE |
| ADD6 |
LD (HL),E |
| ADD7 |
INC L |
| ADD8 |
LD (HL),D |
| ADD9 |
DEC L |
| ADDA |
INC H |
| ADDB |
DJNZ $ADD5 |
| ADDD |
LD SP,$0000 |
| ADE0 |
RET |
| ADE1 |
LD IY,($9789) |
| ADE5 |
LD HL,$DE01 |
| ADE8 |
LD ($AEFB),HL |
| ADEB |
LD HL,$D7A2 |
| ADEE |
LD ($AEFD),HL |
| ADF1 |
LD B,$0C |
| ADF3 |
PUSH BC |
| ADF4 |
PUSH IY |
| ADF6 |
CALL $AE13 |
| ADF9 |
POP IY |
| ADFB |
CALL $AE2A |
| ADFE |
LD HL,($AEFB) |
| AE01 |
INC H |
| AE02 |
LD ($AEFB),HL |
| AE05 |
LD HL,($AEFD) |
| AE08 |
LD DE,$0020 |
| AE0B |
ADD HL,DE |
| AE0C |
LD ($AEFD),HL |
| AE0F |
POP BC |
| AE10 |
DJNZ $ADF3 |
| AE12 |
RET |
| AE13 |
LD B,$0F |
| AE15 |
LD HL,($AEFB) |
| AE18 |
PUSH BC |
| AE19 |
PUSH HL |
| AE1A |
BIT 7,(IY+$00) |
| AE1E |
CALL Z,$AE82 |
| AE21 |
POP HL |
| AE22 |
INC L |
| AE23 |
INC L |
| AE24 |
INC IY |
| AE26 |
POP BC |
| AE27 |
DJNZ $AE18 |
| AE29 |
RET |
| AE2A |
LD B,$0F |
| AE2C |
LD HL,($AEFD) |
| AE2F |
BIT 7,(IY+$00) |
| AE33 |
JR NZ,$AE42 |
| AE35 |
RES 6,(HL) |
| AE37 |
INC L |
| AE38 |
LD A,L |
| AE39 |
CPL |
| AE3A |
AND $1F |
| AE3C |
JR Z,$AE42 |
| AE3E |
RES 6,(HL) |
| AE40 |
JR $AE43 |
| AE42 |
INC L |
| AE43 |
INC L |
| AE44 |
INC IY |
| AE46 |
DJNZ $AE2F |
| AE48 |
RET |
| AE49 |
LD HL,($AEFB) |
| AE4C |
INC H |
| AE4D |
INC L |
| AE4E |
PUSH BC |
| AE4F |
PUSH HL |
| AE50 |
BIT 7,(IY+$00) |
| AE54 |
CALL Z,$AE60 |
| AE57 |
POP HL |
| AE58 |
INC L |
| AE59 |
INC L |
| AE5A |
INC IY |
| AE5C |
POP BC |
| AE5D |
DJNZ $AE4E |
| AE5F |
RET |
| AE60 |
LD DE,$55AA |
| AE63 |
LD C,L |
| AE64 |
CALL $AE6F |
| AE67 |
LD A,L |
| AE68 |
AND $1F |
| AE6A |
CP $1D |
| AE6C |
RET Z |
| AE6D |
LD L,C |
| AE6E |
INC L |
| AE6F |
LD B,$04 |
| AE71 |
LD A,(HL) |
| AE72 |
AND E |
| AE73 |
LD (HL),A |
| AE74 |
LD A,L |
| AE75 |
ADD A,$20 |
| AE77 |
LD L,A |
| AE78 |
LD A,(HL) |
| AE79 |
AND D |
| AE7A |
LD (HL),A |
| AE7B |
LD A,L |
| AE7C |
ADD A,$20 |
| AE7E |
LD L,A |
| AE7F |
DJNZ $AE71 |
| AE81 |
RET |
| AE82 |
LD ($AEB5),SP |
| AE86 |
PUSH HL |
| AE87 |
LD DE,$FFE0 |
| AE8A |
ADD HL,DE |
| AE8B |
LD (HL),$00 |
| AE8D |
INC L |
| AE8E |
LD (HL),$00 |
| AE90 |
POP HL |
| AE91 |
LD A,L |
| AE92 |
AND $1F |
| AE94 |
DEC A |
| AE95 |
JR Z,$AEA4 |
| AE97 |
PUSH HL |
| AE98 |
DEC L |
| AE99 |
LD DE,$0020 |
| AE9C |
LD B,$08 |
| AE9E |
RES 0,(HL) |
| AEA0 |
ADD HL,DE |
| AEA1 |
DJNZ $AE9E |
| AEA3 |
POP HL |
| AEA4 |
LD SP,$AEFF |
| AEA7 |
LD DE,$001F |
| AEAA |
LD A,$08 |
| AEAC |
POP BC |
| AEAD |
LD (HL),C |
| AEAE |
INC L |
| AEAF |
LD (HL),B |
| AEB0 |
ADD HL,DE |
| AEB1 |
DEC A |
| AEB2 |
JR NZ,$AEAC |
| AEB4 |
LD SP,$0000 |
| AEB7 |
LD C,L |
| AEB8 |
LD (HL),A |
| AEB9 |
INC L |
| AEBA |
LD (HL),A |
| AEBB |
LD A,L |
| AEBC |
AND $1F |
| AEBE |
CP $1E |
| AEC0 |
JR Z,$AECE |
| AEC2 |
INC L |
| AEC3 |
LD DE,$FFE0 |
| AEC6 |
ADD HL,DE |
| AEC7 |
LD B,$08 |
| AEC9 |
RES 7,(HL) |
| AECB |
ADD HL,DE |
| AECC |
DJNZ $AEC9 |
| AECE |
LD A,C |
| AECF |
AND $1F |
| AED1 |
LD HL,($AEFD) |
| AED4 |
ADD A,L |
| AED5 |
LD L,A |
| AED6 |
LD DE,$FFDE |
| AED9 |
ADD HL,DE |
| AEDA |
PUSH HL |
| AEDB |
LD A,(IY+$00) |
| AEDE |
AND $0F |
| AEE0 |
LD HL,$AEEB |
| AEE3 |
CALL PrintLine_9 |
| AEE6 |
LD B,(HL) |
| AEE7 |
POP HL |
| AEE8 |
LD (HL),B |
| AEE9 |
INC L |
| AEEA |
LD (HL),B |
| AEEB |
RET |
