29386: Routine at 72CA
| 29386 |
LD A,(23330) |
| 29389 |
OR A |
| 29390 |
RET Z |
| 29391 |
DEC A |
| 29392 |
JR NZ,29469 |
| 29394 |
LD A,(23302) |
| 29397 |
DEC A |
| 29398 |
JR NZ,29405 |
| 29400 |
LD A,100 |
| 29402 |
CALL 29718 |
| 29405 |
LD HL,(23328) |
| 29408 |
LD A,H |
| 29409 |
BIT 7,A |
| 29411 |
JR Z,29415 |
| 29413 |
LD H,0 |
| 29415 |
CP 16 |
| 29417 |
JR C,29420 |
| 29419 |
DEC H |
| 29420 |
PUSH HL |
| 29421 |
LD DE,29634 |
| 29424 |
LD A,H |
| 29425 |
CP 10 |
| 29427 |
JR NC,29439 |
| 29429 |
LD DE,29676 |
| 29432 |
CP 5 |
| 29434 |
JR C,29439 |
| 29436 |
LD DE,29655 |
| 29439 |
LD A,2 |
| 29441 |
LD (23330),A |
| 29444 |
LD HL,29697 |
| 29447 |
EX DE,HL |
| 29448 |
LD BC,21 |
| 29451 |
LDIR |
| 29453 |
POP HL |
| 29454 |
LD (29697),HL |
| 29457 |
LD (29704),HL |
| 29460 |
LD (29711),HL |
| 29463 |
DEC L |
| 29464 |
LD A,75 |
| 29466 |
CALL 29597 |
| 29469 |
LD B,3 |
| 29471 |
PUSH IX |
| 29473 |
DI |
| 29474 |
LD IX,29697 |
| 29478 |
PUSH BC |
| 29479 |
BIT 0,(IX+5) |
| 29483 |
JR Z,29556 |
| 29485 |
LD L,(IX+0) |
| 29488 |
LD H,(IX+1) |
| 29491 |
DEC L |
| 29492 |
PUSH HL |
| 29493 |
LD A,(IX+2) |
| 29496 |
CALL 29597 |
| 29499 |
POP HL |
| 29500 |
DEC (IX+6) |
| 29503 |
JR Z,29552 |
| 29505 |
LD A,(IX+3) |
| 29508 |
ADD A,H |
| 29509 |
LD H,A |
| 29510 |
INC A |
| 29511 |
JR Z,29552 |
| 29513 |
CP 17 |
| 29515 |
JR NC,29552 |
| 29517 |
LD A,(IX+4) |
| 29520 |
ADD A,L |
| 29521 |
LD L,A |
| 29522 |
AND 224 |
| 29524 |
JR NZ,29552 |
| 29526 |
INC (IX+2) |
| 29529 |
LD A,(IX+2) |
| 29532 |
CP 75 |
| 29534 |
JR NZ,29541 |
| 29536 |
LD A,72 |
| 29538 |
LD (IX+2),A |
| 29541 |
LD (IX+0),L |
| 29544 |
LD (IX+1),H |
| 29547 |
CALL 29597 |
| 29550 |
JR 29556 |
| 29552 |
LD (IX+5),0 |
| 29556 |
POP BC |
| 29557 |
LD DE,7 |
| 29560 |
ADD IX,DE |
| 29562 |
DJNZ 29478 |
| 29564 |
LD IX,29697 |
| 29568 |
LD A,(IX+5) |
| 29571 |
OR (IX+12) |
| 29574 |
OR (IX+19) |
| 29577 |
POP IX |
| 29579 |
EI |
| 29580 |
RET NZ |
| 29581 |
LD A,3 |
| 29583 |
LD (23330),A |
| 29586 |
LD C,255 |
| 29588 |
CALL Sounds_Crash |
| 29591 |
LD C,255 |
| 29593 |
CALL Sounds_Crash |
| 29596 |
RET |
