B717: Routine at B717
| B717 |
LD B,A |
| B718 |
LD IX,$9C08 |
| B71C |
PUSH BC |
| B71D |
LD L,(IX+$01) |
| B720 |
LD H,(IX+$00) |
| B723 |
LD C,(IX+$03) |
| B726 |
LD B,(IX+$02) |
| B729 |
CALL $9CF4 |
| B72C |
LD BC,$0004 |
| B72F |
ADD IX,BC |
| B731 |
POP BC |
| B732 |
DJNZ $B71C |
| B734 |
XOR A |
| B735 |
LD ($9C24),A |
| B738 |
LD HL,$9C08 |
| B73B |
LD ($B2DA),HL |
| B73E |
RET |
| B73F |
NOP |
| B740 |
LD A,$C9 |
| B742 |
LD ($B73F),A |
| B745 |
LD HL,($9789) |
| B748 |
LD B,$B4 |
| B74A |
LD A,(HL) |
| B74B |
AND $90 |
| B74D |
JR Z,$B754 |
| B74F |
INC HL |
| B750 |
DJNZ $B74A |
| B752 |
JR $B764 |
| B754 |
LD IY,($B793) |
| B758 |
PUSH IX |
| B75A |
LD IX,$C0B8 |
| B75E |
CALL Sounds_Brick_Metal |
| B761 |
DI |
| B762 |
POP IX |
| B764 |
RET |
