27916: Routine at 6D0C
| 27916 |
CALL StoreEntity |
| 27919 |
LD DE,30362 |
| 27922 |
LD A,(24172) |
| 27925 |
AND A |
| 27926 |
JR Z,27911 |
| 27928 |
LD A,(24098) |
| 27931 |
AND A |
| 27932 |
JR NZ,27911 |
| 27934 |
LD A,(24123) |
| 27937 |
CP (IX+6) |
| 27940 |
JR Z,27949 |
| 27942 |
LD (IX+6),A |
| 27945 |
LD (IX+5),1 |
| 27949 |
DEC (IX+5) |
| 27952 |
JR NZ,27911 |
| 27954 |
LD A,(24123) |
| 27957 |
AND A |
| 27958 |
JR Z,27966 |
| 27960 |
CP 1 |
| 27962 |
JR Z,27911 |
| 27964 |
JR 27889 |
| 27966 |
DEC (IX+2) |
| 27969 |
LD A,(IX+4) |
| 27972 |
RLCA |
| 27973 |
RLCA |
| 27974 |
LD B,A |
| 27975 |
LD A,(IX+2) |
| 27978 |
CP 112 |
| 27980 |
JP C,26254 |
| 27983 |
LD A,32 |
| 27985 |
SUB B |
| 27986 |
LD (IX+5),A |
| 27989 |
LD A,(24085) |
| 27992 |
AND 64 |
| 27994 |
LD (24085),A |
| 27997 |
CALL 29919 |
| 28000 |
CALL ColouriseSprite |
| 28003 |
LD L,(IX+1) |
| 28006 |
LD H,(IX+2) |
| 28009 |
LD A,H |
| 28010 |
CP 184 |
| 28012 |
JR NC,28036 |
| 28014 |
CPL |
| 28015 |
AND 7 |
| 28017 |
JR NZ,28026 |
| 28019 |
PUSH HL |
| 28020 |
CALL AttributeAddress |
| 28023 |
LD (HL),124 |
| 28025 |
POP HL |
| 28026 |
PUSH HL |
| 28027 |
CALL ScreenAddress |
| 28030 |
LD (HL),185 |
| 28032 |
POP HL |
| 28033 |
INC H |
| 28034 |
JR 28009 |
| 28036 |
XOR A |
| 28037 |
LD (24123),A |
| 28040 |
LD A,(IX+4) |
| 28043 |
AND A |
| 28044 |
RET M |
| 28045 |
LD A,(24085) |
| 28048 |
AND 1 |
| 28050 |
RET NZ |
| 28051 |
LD A,(IX+2) |
| 28054 |
AND 15 |
| 28056 |
RET NZ |
| 28057 |
JP 27662 |