8916: Routine at 8916
| 8916 |
CALL $8A27 |
| 8919 |
CALL $92B5 |
| 891C |
LD IY,$88D2 |
| 8920 |
LD HL,$E09C |
| 8923 |
LD B,$04 |
| 8925 |
PUSH BC |
| 8926 |
LD E,(IY+$00) |
| 8929 |
LD D,(IY+$01) |
| 892C |
INC IY |
| 892E |
INC IY |
| 8930 |
LD A,D |
| 8931 |
OR E |
| 8932 |
JR Z,$8954 |
| 8934 |
PUSH DE |
| 8935 |
POP IX |
| 8937 |
LD A,(IX+$00) |
| 893A |
CP $FF |
| 893C |
JR Z,$8954 |
| 893E |
LD A,(IX+$0A) |
| 8941 |
AND $80 |
| 8943 |
JR Z,$894D |
| 8945 |
PUSH IX |
| 8947 |
POP DE |
| 8948 |
LD BC,$000C |
| 894B |
LDIR |
| 894D |
LD BC,$000C |
| 8950 |
ADD IX,BC |
| 8952 |
JR $8937 |
| 8954 |
POP BC |
| 8955 |
DJNZ $8925 |
| 8957 |
LD HL,$6DDD |
| 895A |
LD DE,$6D65 |
| 895D |
XOR A |
| 895E |
SBC HL,DE |
| 8960 |
LD B,L |
| 8961 |
LD HL,$6D65 |
| 8964 |
LD (HL),A |
| 8965 |
INC HL |
| 8966 |
DJNZ $8964 |
| 8968 |
LD A,$01 |
| 896A |
LD ($6D88),A |
| 896D |
LD L,$02 |
| 896F |
LD H,$01 |
| 8971 |
LD ($6DB9),HL |
| 8974 |
LD A,$09 |
| 8976 |
LD ($6DA5),A |
| 8979 |
LD A,$06 |
| 897B |
LD ($6DA6),A |
| 897E |
LD DE,$0000 |
| 8981 |
CALL $9284 |
| 8984 |
LD HL,$6DB3 |
| 8987 |
LD DE,$D29D |
| 898A |
LD B,$03 |
| 898C |
LD (HL),E |
| 898D |
INC HL |
| 898E |
LD (HL),D |
| 898F |
INC HL |
| 8990 |
DJNZ $898C |
| 8992 |
CALL $7FE7 |
| 8995 |
LD HL,$D48E |
| 8998 |
LD ($D48C),HL |
| 899B |
LD HL,$D63A |
| 899E |
LD ($D638),HL |
| 89A1 |
RET |
