A968: Routine at A968
| A968 |
LD IXh,$00 |
| A96B |
LD HL,$732C |
| A96E |
LD (HL),$09 |
| A970 |
LD HL,$0605 |
| A973 |
LD D,$01 |
| A975 |
PUSH HL |
| A976 |
PUSH DE |
| A977 |
LD E,D |
| A978 |
CALL $A8EC |
| A97B |
LD A,$14 |
| A97D |
ADD A,L |
| A97E |
LD L,A |
| A97F |
LD A,$0C |
| A981 |
ADD A,H |
| A982 |
LD H,A |
| A983 |
CALL $A8EC |
| A986 |
LD A,$08 |
| A988 |
ADD A,E |
| A989 |
LD E,A |
| A98A |
LD A,L |
| A98B |
SUB $14 |
| A98D |
LD L,A |
| A98E |
LD A,$08 |
| A990 |
ADD A,E |
| A991 |
CALL $A8EC |
| A994 |
LD A,H |
| A995 |
SUB $0C |
| A997 |
LD H,A |
| A998 |
LD A,$0C |
| A99A |
ADD A,L |
| A99B |
LD L,A |
| A99C |
CALL $A9FA |
| A99F |
POP DE |
| A9A0 |
POP HL |
| A9A1 |
INC E |
| A9A2 |
INC E |
| A9A3 |
INC D |
| A9A4 |
INC D |
| A9A5 |
INC H |
| A9A6 |
DEC L |
| A9A7 |
LD BC,$2710 |
| A9AA |
CALL $A921 |
| A9AD |
LD A,L |
| A9AE |
CP $FF |
| A9B0 |
JR NZ,$A975 |
| A9B2 |
LD BC,$1800 |
| A9B5 |
LD HL,$4000 |
| A9B8 |
LD (HL),$00 |
| A9BA |
INC HL |
| A9BB |
DEC BC |
| A9BC |
LD A,B |
| A9BD |
OR C |
| A9BE |
JR NZ,$A9B8 |
| A9C0 |
LD A,IXh |
| A9C2 |
LD IXh,$01 |
| A9C5 |
LD HL,$732C |
| A9C8 |
LD (HL),$04 |
| A9CA |
AND A |
| A9CB |
JR Z,$A970 |
| A9CD |
RET |