ECAB: Routine at ECAB
| ECAB |
LD HL,$0A23 |
| ECAE |
LD ($5C09),HL |
| ECB1 |
CALL $749C |
| ECB4 |
LD HL,$5900 |
| ECB7 |
LD B,$40 |
| ECB9 |
LD (HL),$04 |
| ECBB |
INC L |
| ECBC |
DJNZ $ECB9 |
| ECBE |
EXX |
| ECBF |
LD DE,$4800 |
| ECC2 |
EXX |
| ECC3 |
LD B,$40 |
| ECC5 |
LD HL,$EE14 |
| ECC8 |
CALL PRINT_STRING |
| ECCB |
CALL $EC6E |
| ECCE |
CP $0D |
| ECD0 |
JR NZ,$ECDB |
| ECD2 |
LD HL,$0101 |
| ECD5 |
LD ($5C09),HL |
| ECD8 |
JP $6CAA |
| ECDB |
LD DE,$782E |
| ECDE |
LD (DE),A |
| ECDF |
EXX |
| ECE0 |
LD E,$20 |
| ECE2 |
EXX |
| ECE3 |
LD HL,$E9A0 |
| ECE6 |
LD B,$20 |
| ECE8 |
CALL PRINT_STRING |
| ECEB |
LD B,$04 |
| ECED |
LD HL,$EEB4 |
| ECF0 |
EXX |
| ECF1 |
LD E,$09 |
| ECF3 |
EXX |
| ECF4 |
PUSH BC |
| ECF5 |
LD B,$03 |
| ECF7 |
CALL PRINT_STRING |
| ECFA |
POP BC |
| ECFB |
PUSH HL |
| ECFC |
CALL $EC6E |
| ECFF |
POP HL |
| ED00 |
INC E |
| ED01 |
LD (DE),A |
| ED02 |
DJNZ $ECF0 |
| ED04 |
LD C,$07 |
| ED06 |
LD HL,$EEC0 |
| ED09 |
LD E,$2E |
| ED0B |
LD B,$05 |
| ED0D |
LD A,(DE) |
| ED0E |
INC E |
| ED0F |
CP (HL) |
| ED10 |
JR NZ,$ED1D |
| ED12 |
INC HL |
| ED13 |
DJNZ $ED0D |
| ED15 |
LD A,$07 |
| ED17 |
SUB C |
| ED18 |
LD ($7820),A |
| ED1B |
JR $ECD2 |
| ED1D |
INC HL |
| ED1E |
DJNZ $ED1D |
| ED20 |
DEC C |
| ED21 |
JR NZ,$ED09 |
| ED23 |
EXX |
| ED24 |
LD E,$00 |
| ED26 |
EXX |
| ED27 |
LD HL,$EE54 |
| ED2A |
LD B,$20 |
| ED2C |
CALL PRINT_STRING |
| ED2F |
CALL PAUSE |
| ED32 |
JP $ECAB |
| ED35 |
NOP |
| ED36 |
NOP |
| ED37 |
NOP |
| ED38 |
NOP |
| ED39 |
CALL $7552 |
| ED3C |
LD A,($7820) |
| ED3F |
LD B,A |
| ED40 |
ADD A,A |
| ED41 |
ADD A,A |
| ED42 |
ADD A,B |
| ED43 |
LD C,A |
| ED44 |
LD B,$00 |
| ED46 |
LD HL,$EEC0 |
| ED49 |
ADD HL,BC |
| ED4A |
LD DE,$BACF |
| ED4D |
LD C,$05 |
| ED4F |
LDIR |
| ED51 |
RET |
