604D: Routine at 604D
| 604D |
LD BC,$00FF |
| 6050 |
LD HL,$5901 |
| 6053 |
LD DE,$5900 |
| 6056 |
LDIR |
| 6058 |
LD BC,$07FF |
| 605B |
LD HL,$4801 |
| 605E |
LD DE,$4800 |
| 6061 |
LDIR |
| 6063 |
BIT 3,A |
| 6065 |
CALL NZ,$6D09 |
| 6068 |
CALL $6E0E |
| 606B |
LD B,$10 |
| 606D |
LD HL,$001F |
| 6070 |
PUSH BC |
| 6071 |
PUSH HL |
| 6072 |
XOR A |
| 6073 |
LD C,$2D |
| 6075 |
CALL $6114 |
| 6078 |
POP HL |
| 6079 |
INC H |
| 607A |
POP BC |
| 607B |
DJNZ $6070 |
| 607D |
LD BC,$001F |
| 6080 |
LD HL,$5001 |
| 6083 |
LD DE,$5000 |
| 6086 |
LDIR |
| 6088 |
CALL $60B6 |
| 608B |
LD A,L |
| 608C |
LD ($65D0),A |
| 608F |
LD A,H |
| 6090 |
LD ($501F),A |
| 6093 |
CALL $6148 |
| 6096 |
LD HL,($5B2C) |
| 6099 |
INC HL |
| 609A |
LD ($5B2C),HL |
| 609D |
CALL $61C4 |
| 60A0 |
CALL Handler_Flak |
| 60A3 |
CALL $6A24 |
| 60A6 |
CALL $6ADA |
| 60A9 |
CALL $6F9E |
| 60AC |
CALL $6FD8 |
| 60AF |
CALL $6FFD |
| 60B2 |
CALL $70A8 |
| 60B5 |
RET |
