A54F: Routine at A54F
| A54F |
LD A,($9703) |
| A552 |
CP (IX+$01) |
| A555 |
JP NZ,$A493 |
| A558 |
LD A,$17 |
| A55A |
LD ($96AD),A |
| A55D |
CALL StoreEntity |
| A560 |
LD A,($9702) |
| A563 |
SUB $10 |
| A565 |
CP $20 |
| A567 |
JP NC,$A4A6 |
| A56A |
DEC (IX+$02) |
| A56D |
CALL Z,$A5CD |
| A570 |
LD A,(IX+$06) |
| A573 |
OR (IX+$07) |
| A576 |
JR Z,$A59D |
| A578 |
CALL $A44B |
| A57B |
BIT 0,B |
| A57D |
JR NZ,$A5C3 |
| A57F |
BIT 1,B |
| A581 |
JR NZ,$A5C8 |
| A583 |
LD BC,$1717 |
| A586 |
CALL $B81C |
| A589 |
CALL $AAED |
| A58C |
CALL Z,$A5CD |
| A58F |
LD A,(IX+$00) |
| A592 |
XOR %00000001 |
| A594 |
LD (IX+$00),A |
| A597 |
LD (IX+$03),E |
| A59A |
LD (IX+$04),D |
| A59D |
LD BC,$1313 |
| A5A0 |
CALL $AB36 |
| A5A3 |
JP NC,$AD5D |
| A5A6 |
JP $A4A6 |
