61121: Routine at EEC1
61121 |
CALL 61090 |
61124 |
LD A,(IY+15) |
61127 |
LD (47441),A |
61130 |
LD B,0 |
61132 |
CALL Handler_ItemsCurrentRoom |
61135 |
LD A,(HL) |
61136 |
CP 255 |
61138 |
JR Z,61155 |
61140 |
INC HL |
61141 |
LD E,(HL) |
61142 |
INC HL |
61143 |
LD D,(HL) |
61144 |
INC HL |
61145 |
INC HL |
61146 |
LD (43064),DE |
61150 |
CALL 43069 |
61153 |
JR 61135 |
61155 |
LD E,(IY+15) |
61158 |
SLA E |
61160 |
LD D,0 |
61162 |
LD HL,61171 |
61165 |
ADD HL,DE |
61166 |
LD E,(HL) |
61167 |
INC HL |
61168 |
LD D,(HL) |
61169 |
EX DE,HL |
61170 |
JP (HL) |
61171 |
LD (HL),D |
61172 |
PUSH AF |
61173 |
OR 242 |
61175 |
LD C,E |
61176 |
JP P,62198 |
61179 |
INC BC |
61180 |
PUSH AF |
61181 |
LD (HL),H |
61182 |
OR 246 |
61184 |
JP P,62198 |
61187 |
INC A |
61188 |
CALL P,62198 |
61191 |
SBC A,L |
61192 |
CALL P,62961 |
61195 |
LD (HL),E |
61196 |
RST 48 |
61197 |
OR 242 |
61199 |
ADD HL,BC |
61200 |
CALL P,62217 |
61203 |
OUT (244),A |
61205 |
INC DE |
61206 |
DEFB 237,246 |
61208 |
JP P,62198 |
61211 |
OR 242 |
61213 |
OR 242 |
61215 |
CALL PE,18166 |
61218 |
RST 48 |
61219 |
OR 242 |
61221 |
OR 242 |
61223 |
OR 242 |
61225 |
INC (HL) |
61226 |
DI |
61227 |
OR 242 |
61229 |
OR 242 |
61231 |
LD A,L |
61232 |
DI |
61233 |
XOR E |
61234 |
DI |
61235 |
LD C,A |
61236 |
PUSH AF |
61237 |
LD E,(IX+2) |
61240 |
LD D,(IX+3) |
61243 |
PUSH BC |
61244 |
PUSH AF |
61245 |
XOR A |
61246 |
LD (63091),A |
61249 |
LD (63090),A |
61252 |
LD A,(IX+0) |
61255 |
ADD A,E |
61256 |
LD L,A |
61257 |
LD A,(BC) |
61258 |
INC BC |
61259 |
CP L |
61260 |
JR NZ,61273 |
61262 |
LD A,1 |
61264 |
LD (63090),A |
61267 |
LD A,E |
61268 |
NEG |
61270 |
LD E,A |
61271 |
JR 61277 |
61273 |
LD A,(BC) |
61274 |
CP L |
61275 |
JR Z,61262 |
61277 |
INC BC |
61278 |
LD A,(IX+1) |
61281 |
ADD A,D |
61282 |
LD H,A |
61283 |
LD A,(BC) |
61284 |
INC BC |
61285 |
CP H |
61286 |
JR NZ,61299 |
61288 |
LD A,1 |
61290 |
LD (63091),A |
61293 |
LD A,D |
61294 |
NEG |
61296 |
LD D,A |
61297 |
JR 61303 |
61299 |
LD A,(BC) |
61300 |
CP H |
61301 |
JR Z,61288 |
61303 |
LD (43064),HL |
61306 |
LD (IX+0),L |
61309 |
LD (IX+1),H |
61312 |
LD (IX+2),E |
61315 |
LD (IX+3),D |
61318 |
POP AF |
61319 |
POP BC |
61320 |
INC IX |
61322 |
INC IX |
61324 |
INC IX |
61326 |
INC IX |
61328 |
RET |