41040: Routine at A050
| 41040 |
PUSH IX |
| 41042 |
PUSH BC |
| 41043 |
PUSH DE |
| 41044 |
LD C,A |
| 41045 |
CALL LocateObject |
| 41048 |
LD A,(IX+7) |
| 41051 |
AND 40 |
| 41053 |
JR Z,41111 |
| 41055 |
LD A,C |
| 41056 |
CALL ObjectCount |
| 41059 |
CP 0 |
| 41061 |
JR Z,41111 |
| 41063 |
BIT 6,(IX+7) |
| 41067 |
JR Z,41076 |
| 41069 |
LD A,C |
| 41070 |
PUSH AF |
| 41071 |
LD HL,44537 |
| 41074 |
JR 41102 |
| 41076 |
LD HL,923 |
| 41079 |
DEC A |
| 41080 |
JR Z,41085 |
| 41082 |
LD HL,101 |
| 41085 |
PUSH HL |
| 41086 |
LD L,(IX+8) |
| 41089 |
LD A,(IX+9) |
| 41092 |
AND 15 |
| 41094 |
LD H,A |
| 41095 |
PUSH HL |
| 41096 |
CALL 41117 |
| 41099 |
LD HL,45024 |
| 41102 |
CALL PrintMsg |
| 41105 |
AND A |
| 41106 |
POP DE |
| 41107 |
POP BC |
| 41108 |
POP IX |
| 41110 |
RET |
| 41111 |
CALL 34179 |
| 41114 |
SCF |
| 41115 |
JR 41106 |
| 41117 |
LD HL,45002 |
| 41120 |
LD A,(IX+4) |
| 41123 |
RLCA |
| 41124 |
RLCA |
| 41125 |
AND 60 |
| 41127 |
LD E,A |
| 41128 |
LD D,0 |
| 41130 |
ADD HL,DE |
| 41131 |
JP PrintMsg |