B54A: Routine at B54A
B54A |
LD A,($B549) |
B54D |
INC A |
B54E |
JR NZ,$B576 |
B550 |
LD ($B549),A |
B553 |
LD A,($B179) |
B556 |
BIT 7,A |
B558 |
JR Z,$B576 |
B55A |
LD A,$FE |
B55C |
LD ($A035),A |
B55F |
LD HL,($B178) |
B562 |
LD ($A031),HL |
B565 |
OR $01 |
B567 |
RET |
B568 |
LD A,($A010) |
B56B |
CP $05 |
B56D |
JR Z,$B54A |
B56F |
LD A,($B179) |
B572 |
BIT 7,A |
B574 |
JR Z,$B57B |
B576 |
LD A,$FF |
B578 |
CP $FF |
B57A |
RET |
B57B |
PUSH IY |
B57D |
LD IX,($B180) |
B581 |
LD A,($A01D) |
B584 |
AND $01 |
B586 |
LD ($A038),A |
B589 |
LD A,($A010) |
B58C |
CP $05 |
B58E |
LD IY,$D39B |
B592 |
JR C,$B598 |
B594 |
LD IY,$D36A |
B598 |
CALL $B5A4 |
B59B |
CP $FF |
B59D |
LD ($B180),IX |
B5A1 |
POP IY |
B5A3 |
RET |
B5A4 |
LD HL,$B178 |
B5A7 |
CALL $B4A0 |
B5AA |
CP $FF |
B5AC |
RET Z |
B5AD |
LD ($A035),A |
B5B0 |
LD HL,$B16E |
B5B3 |
SET 1,(HL) |
B5B5 |
RET |
B5B6 |
LD ($A01B),A |
B5B9 |
LD IX,($9FF2) |
B5BD |
LD ($9FF0),IX |
B5C1 |
LD L,(IX-$02) |
B5C4 |
LD H,(IX-$01) |
B5C7 |
LD ($9FF2),HL |
B5CA |
LD (IX-$02),$00 |
B5CE |
LD (IX-$01),$00 |
B5D2 |
RET |
B5D3 |
LD A,($B16E) |
B5D6 |
BIT 0,A |
B5D8 |
JR Z,$B610 |
B5DA |
LD A,($B183) |
B5DD |
LD HL,$B178 |
B5E0 |
JR $B5EF |
B5E2 |
LD A,($B16D) |
B5E5 |
BIT 0,A |
B5E7 |
JR Z,$B5FC |
B5E9 |
LD A,($B182) |
B5EC |
LD HL,$B172 |
B5EF |
CALL $B83C |
B5F2 |
CALL $B5B6 |
B5F5 |
LD HL,$6888 |
B5F8 |
CALL $A59F |
B5FB |
RET |
B5FC |
CALL $B633 |
B5FF |
LD HL,($B186) |
B602 |
PUSH HL |
B603 |
LD A,($B182) |
B606 |
CALL $B5B6 |
B609 |
LD HL,$6880 |
B60C |
CALL $A59F |
B60F |
RET |
B610 |
CALL $B62F |
B613 |
LD HL,$0000 |
B616 |
PUSH HL |
B617 |
LD HL,$B172 |
B61A |
PUSH HL |
B61B |
CALL $B633 |
B61E |
LD HL,($B186) |
B621 |
PUSH HL |
B622 |
LD A,($B183) |
B625 |
CALL $B5B6 |
B628 |
LD HL,$687C |
B62B |
CALL $A59F |
B62E |
RET |
B62F |
LD A,$28 |
B631 |
JR $B635 |
B633 |
LD A,$20 |
B635 |
LD ($B649),A |
B638 |
LD ($B658),A |
B63B |
LD IX,($B18E) |
B63F |
LD L,(IX+$04) |
B642 |
LD H,(IX+$05) |
B645 |
BIT 7,(IX+$07) |
B649 |
JR NZ,$B64E |
B64B |
LD HL,$0000 |
B64E |
EX (SP),HL |
B64F |
PUSH HL |
B650 |
LD L,(IX+$02) |
B653 |
LD H,(IX+$03) |
B656 |
BIT 5,H |
B658 |
JR NZ,$B65D |
B65A |
LD HL,$0000 |
B65D |
EX (SP),HL |
B65E |
JP (HL) |
B65F |
LD A,($A00F) |
B662 |
CP $05 |
B664 |
JR Z,$B671 |
B666 |
CP $06 |
B668 |
JR Z,$B671 |
B66A |
LD A,($B173) |
B66D |
BIT 7,A |
B66F |
JR Z,$B678 |
B671 |
LD HL,$6855 |
B674 |
CALL $A59F |
B677 |
RET |
B678 |
LD HL,$B16D |
B67B |
BIT 0,(HL) |
B67D |
LD HL,$B172 |
B680 |
CALL NZ,$B6DA |
B683 |
CALL $B633 |
B686 |
LD A,($B16D) |
B689 |
LD HL,$B172 |
B68C |
LD DE,($B186) |
B690 |
PUSH DE |
B691 |
BIT 0,A |
B693 |
JR Z,$B69D |
B695 |
CALL $B83C |
B698 |
LD HL,$05B3 |
B69B |
JR $B6A6 |
B69D |
LD HL,$0000 |
B6A0 |
PUSH HL |
B6A1 |
PUSH HL |
B6A2 |
PUSH HL |
B6A3 |
LD HL,$05DB |
B6A6 |
PUSH HL |
B6A7 |
LD HL,$6894 |
B6AA |
CALL $A59F |
B6AD |
RET |
B6AE |
LD A,($A010) |
B6B1 |
CP $05 |
B6B3 |
JR Z,$B671 |
B6B5 |
CP $06 |
B6B7 |
JR Z,$B671 |
B6B9 |
LD A,($B179) |
B6BC |
BIT 7,A |
B6BE |
JR NZ,$B671 |
B6C0 |
LD HL,$B16E |
B6C3 |
BIT 0,(HL) |
B6C5 |
LD HL,$B178 |
B6C8 |
CALL NZ,$B6F0 |
B6CB |
CALL $B62F |
B6CE |
LD A,($B16E) |
B6D1 |
LD HL,$B178 |
B6D4 |
JR $B68C |