BA20: Routine at BA20
| BA20 |
LD A,($A036) |
| BA23 |
LD HL,$BA67 |
| BA26 |
CP $03 |
| BA28 |
JR Z,$BA31 |
| BA2A |
LD HL,$BB67 |
| BA2D |
CP $02 |
| BA2F |
JR NZ,$BA34 |
| BA31 |
CALL $BA3E |
| BA34 |
LD A,$01 |
| BA36 |
POP HL |
| BA37 |
POP IY |
| BA39 |
POP IX |
| BA3B |
AND A |
| BA3C |
SCF |
| BA3D |
RET |
| BA3E |
PUSH IX |
| BA40 |
XOR A |
| BA41 |
LD ($9FEB),A |
| BA44 |
LD E,(IX+$05) |
| BA47 |
LD D,(IX+$06) |
| BA4A |
PUSH DE |
| BA4B |
PUSH DE |
| BA4C |
POP IY |
| BA4E |
CALL $D1DB |
| BA51 |
POP IX |
| BA53 |
PUSH AF |
| BA54 |
CALL $A1AF |
| BA57 |
POP AF |
| BA58 |
POP IX |
| BA5A |
PUSH AF |
| BA5B |
CALL $B9FA |
| BA5E |
POP AF |
| BA5F |
RET |
| BA60 |
NOP |
| BA61 |
NOP |
| BA62 |
NOP |
| BA63 |
NOP |
| BA64 |
NOP |
| BA65 |
NOP |
| BA66 |
NOP |
| BA67 |
LD ($BA60),A |
| BA6A |
LD ($BA61),A |
| BA6D |
CALL $BD7E |
| BA70 |
JP C,$BBBE |
| BA73 |
JR Z,$BAA6 |
| BA75 |
CALL $BD4B |
| BA78 |
JR NZ,$BA85 |
| BA7A |
LD A,$01 |
| BA7C |
CALL $BB46 |
| BA7F |
LD ($BA65),IX |
| BA83 |
JR $BAAB |
| BA85 |
CALL $BD51 |
| BA88 |
JR NZ,$BA9D |
| BA8A |
LD A,$02 |
| BA8C |
BIT 5,(IX+$03) |
| BA90 |
JR NZ,$BA7C |
| BA92 |
CALL $D29D |
| BA95 |
CP $32 |
| BA97 |
LD A,$03 |
| BA99 |
JR C,$BA7C |
| BA9B |
JR $BAA6 |
| BA9D |
CALL $D29D |
| BAA0 |
CP $46 |
| BAA2 |
LD A,$04 |
| BAA4 |
JR C,$BA7C |
| BAA6 |
CALL $AEA9 |
| BAA9 |
JR NZ,$BA6D |
| BAAB |
LD A,($BA60) |
| BAAE |
AND A |
| BAAF |
JP Z,$BB3F |
| BAB2 |
LD A,($BA61) |
| BAB5 |
AND A |
| BAB6 |
JR Z,$BB16 |
| BAB8 |
LD IX,$9FF6 |
| BABC |
CALL $A0F7 |
| BABF |
JR Z,$BAF5 |
| BAC1 |
LD A,($BA62) |
| BAC4 |
CP (IX+$00) |
| BAC7 |
JR NZ,$BABC |
| BAC9 |
LD A,($BA63) |
| BACC |
CP (IX+$01) |
| BACF |
JR NZ,$BABC |
| BAD1 |
LD A,($BA64) |
| BAD4 |
CP (IX+$02) |
| BAD7 |
JR NZ,$BABC |
| BAD9 |
PUSH IY |
| BADB |
PUSH IX |
| BADD |
POP DE |
| BADE |
LD IY,$9FF4 |
| BAE2 |
CALL $A104 |
| BAE5 |
LD A,(IX-$02) |
| BAE8 |
LD (IY-$02),A |
| BAEB |
LD A,(IX-$01) |
| BAEE |
LD (IY-$01),A |
| BAF1 |
POP IY |
| BAF3 |
JR $BAFA |
| BAF5 |
LD A,$05 |
| BAF7 |
CALL $A11C |
| BAFA |
LD A,($BA62) |
| BAFD |
LD HL,($BA63) |
| BB00 |
LD (IX+$00),A |
| BB03 |
LD (IX+$01),L |
| BB06 |
LD (IX+$02),H |
| BB09 |
LD HL,($9FF4) |
| BB0C |
LD ($9FF4),IX |
| BB10 |
LD (IX-$02),L |
| BB13 |
LD (IX-$01),H |
| BB16 |
LD A,($BA60) |
| BB19 |
CP $01 |
| BB1B |
JR Z,$BB5C |
| BB1D |
CALL $D29D |
| BB20 |
CP $19 |
| BB22 |
JR C,$BB3F |
| BB24 |
LD IX,$BA62 |
| BB28 |
CALL $BD06 |
| BB2B |
JR NZ,$BB3F |
| BB2D |
LD A,C |
| BB2E |
PUSH BC |
| BB2F |
CALL $A4BC |
| BB32 |
POP AF |
| BB33 |
PUSH HL |
| BB34 |
CALL $A4BC |
| BB37 |
PUSH HL |
| BB38 |
LD HL,$6F62 |
| BB3B |
CALL $A59F |
| BB3E |
RET |
| BB3F |
LD HL,$6F54 |
| BB42 |
CALL $A59F |
| BB45 |
RET |
| BB46 |
PUSH AF |
| BB47 |
LD A,$01 |
| BB49 |
LD ($BA61),A |
| BB4C |
POP AF |
| BB4D |
LD ($BA60),A |
| BB50 |
LD HL,$BA19 |
| BB53 |
LD DE,$BA62 |
| BB56 |
LD BC,$0003 |
| BB59 |
LDIR |
| BB5B |
RET |
| BB5C |
LD IX,($BA65) |
| BB60 |
LD L,(IX+$03) |
| BB63 |
LD H,(IX+$04) |
| BB66 |
JP (HL) |
| BB67 |
LD ($BA1D),A |
| BB6A |
LD ($BA1C),A |
| BB6D |
CALL $BD7E |
| BB70 |
JP C,$BBBE |
| BB73 |
CALL $BC21 |
| BB76 |
JR Z,$BB7C |
| BB78 |
LD HL,$BA1C |
| BB7B |
INC (HL) |
| BB7C |
CALL $AEA9 |
| BB7F |
JR NZ,$BB6D |
| BB81 |
LD A,($BA1C) |
| BB84 |
AND A |
| BB85 |
JR NZ,$BB8E |
| BB87 |
LD HL,$725F |
| BB8A |
CALL $A59F |
| BB8D |
RET |
| BB8E |
LD A,($BA1D) |
| BB91 |
AND A |
| BB92 |
JR Z,$BBC9 |
| BB94 |
LD IX,($BA1E) |
| BB98 |
PUSH IX |
| BB9A |
CALL $BE5A |
| BB9D |
LD A,(IX+$03) |
| BBA0 |
AND $C0 |
| BBA2 |
CP $80 |
| BBA4 |
JR Z,$BBB1 |
| BBA6 |
BIT 3,(IX+$03) |
| BBAA |
JR NZ,$BBB1 |
| BBAC |
CALL $BE72 |
| BBAF |
JR $BB9D |
| BBB1 |
POP IX |
| BBB3 |
JR NZ,$BBC4 |
| BBB5 |
LD HL,$7295 |
| BBB8 |
PUSH IX |
| BBBA |
CALL $A59F |
| BBBD |
RET |
| BBBE |
LD HL,$7243 |
| BBC1 |
JP $A59F |
| BBC4 |
LD HL,$72A6 |
| BBC7 |
JR $BBB8 |
| BBC9 |
CALL $BC46 |
| BBCC |
CALL $BC9C |
| BBCF |
LD A,B |
| BBD0 |
AND A |
| BBD1 |
JR NZ,$BBE5 |
| BBD3 |
CALL $BC74 |
| BBD6 |
AND A |
| BBD7 |
JR Z,$BBDE |
| BBD9 |
LD HL,$72BD |
| BBDC |
JR $BBB8 |
| BBDE |
LD HL,$727E |
| BBE1 |
CALL $A59F |
| BBE4 |
RET |
