| 57292 |
LD HL,30108 |
| 57295 |
LD A,6 |
| 57297 |
CALL FetchObjectDataPointer |
| 57300 |
LD A,(40969) |
| 57303 |
CP (IX+15) |
| 57306 |
JP NZ,CheckCharacterState_1 |
| 57309 |
LD HL,30162 |
| 57312 |
JP CheckCharacterState_1 |
| 57315 |
LD A,(41014) |
| 57318 |
CP 100 |
| 57320 |
JR 57341 |
| 57322 |
LD B,A |
| 57323 |
DJNZ 57296 |
| 57325 |
RST 24 |
| 57326 |
JR 57351 |
| 57328 |
LD C,B |
| 57329 |
DJNZ 57359 |
| 57331 |
RET PO |
| 57332 |
LD A,100 |
| 57334 |
JR 57384 |
| 57336 |
LD A,(41014) |
| 57339 |
CP 1 |
| 57341 |
JP NZ,ReturnZero |
| 57344 |
OR 1 |
| 57346 |
RET |
| 57347 |
LD B,A |
| 57348 |
DJNZ 57342 |
| 57350 |
RST 24 |
| 57351 |
XOR A |
| 57352 |
CALL 57402 |
| 57355 |
LD IX,(40979) |
| 57359 |
LD (IX+1),0 |
| 57363 |
LD A,(40970) |
| 57366 |
LD (IX+15),A |
| 57369 |
OR 1 |
| 57371 |
RET |
| 57372 |
LD A,(41014) |
| 57375 |
AND A |
| 57376 |
JR 57341 |
| 57378 |
LD C,B |
| 57379 |
DJNZ 57409 |
| 57381 |
RET PO |
| 57382 |
LD A,1 |
| 57384 |
CALL 57402 |
| 57387 |
LD IX,(40979) |
| 57391 |
LD (IX+1),0 |
| 57395 |
LD (IX+15),0 |
| 57399 |
OR 1 |
| 57401 |
RET |
