27731: Routine at 6C53
| 27731 |
CALL StoreEntity |
| 27734 |
LD A,(24206) |
| 27737 |
CP (IX+2) |
| 27740 |
JR C,27750 |
| 27742 |
LD (IX+5),1 |
| 27746 |
LD (IX+4),1 |
| 27750 |
LD A,(IX+4) |
| 27753 |
AND A |
| 27754 |
JR Z,27838 |
| 27756 |
LD A,(IX+5) |
| 27759 |
AND A |
| 27760 |
JR NZ,27804 |
| 27762 |
LD A,(24087) |
| 27765 |
CPL |
| 27766 |
AND %00000111 |
| 27768 |
JR NZ,27838 |
| 27770 |
CALL 27847 |
| 27773 |
CALL 29864 |
| 27776 |
EXX |
| 27777 |
INC (IX+6) |
| 27780 |
LD A,(IX+6) |
| 27783 |
CP 3 |
| 27785 |
JR NZ,27791 |
| 27787 |
LD (IX+4),0 |
| 27791 |
CALL 27847 |
| 27794 |
CALL 29888 |
| 27797 |
EXX |
| 27798 |
CALL 29938 |
| 27801 |
JP ColouriseSprite |
| 27804 |
LD A,(24087) |
| 27807 |
AND %00000011 |
| 27809 |
JR NZ,27838 |
| 27811 |
CALL 27847 |
| 27814 |
CALL 29864 |
| 27817 |
EXX |
| 27818 |
DEC (IX+6) |
| 27821 |
JP P,27791 |
| 27824 |
INC (IX+6) |
| 27827 |
CALL 27847 |
| 27830 |
CALL 27194 |
| 27833 |
LD HL,24208 |
| 27836 |
DEC (HL) |
| 27837 |
RET |
| 27838 |
CALL 27847 |
| 27841 |
CALL 29980 |
| 27844 |
JP ColouriseSprite |
