D405: Routine at D405
| D405 |
PUSH AF |
| D406 |
PUSH DE |
| D407 |
LD D,(IY+$01) |
| D40A |
LD E,(IY+$00) |
| D40D |
CALL $A7D0 |
| D410 |
LD A,($A028) |
| D413 |
AND A |
| D414 |
JR NZ,$D438 |
| D416 |
LD E,(IY+$02) |
| D419 |
LD D,(IY+$03) |
| D41C |
RES 7,D |
| D41E |
BIT 7,(IY+$03) |
| D422 |
LD A,$40 |
| D424 |
CALL Z,$A815 |
| D427 |
LD E,(IY+$04) |
| D42A |
LD D,(IY+$05) |
| D42D |
RES 7,D |
| D42F |
BIT 7,(IY+$05) |
| D433 |
LD A,$40 |
| D435 |
CALL Z,$A815 |
| D438 |
LD E,(IY+$00) |
| D43B |
LD D,(IY+$01) |
| D43E |
LD A,D |
| D43F |
OR E |
| D440 |
LD A,$50 |
| D442 |
CALL NZ,$A815 |
| D445 |
POP DE |
| D446 |
POP AF |
| D447 |
RET |
| D448 |
PUSH DE |
| D449 |
PUSH BC |
| D44A |
PUSH IY |
| D44C |
LD B,A |
| D44D |
CALL $D33C |
| D450 |
LD DE,$0006 |
| D453 |
ADD IX,DE |
| D455 |
CALL FetchNextObject |
| D458 |
JR Z,$D467 |
| D45A |
LD A,(IX+$02) |
| D45D |
AND A |
| D45E |
JR Z,$D455 |
| D460 |
LD A,(IX+$00) |
| D463 |
CP B |
| D464 |
JP NZ,$D455 |
| D467 |
POP IY |
| D469 |
POP BC |
| D46A |
POP DE |
| D46B |
RET |
| D46C |
PUSH AF |
| D46D |
LD A,$01 |
| D46F |
JR $D474 |
