63508: Routine at F814
63508 |
LD HL,(63506) |
63511 |
LD A,(IY+15) |
63514 |
CP (HL) |
63515 |
JR Z,63523 |
63517 |
LD DE,21 |
63520 |
ADD HL,DE |
63521 |
CP (HL) |
63522 |
RET NZ |
63523 |
INC HL |
63524 |
LD E,(HL) |
63525 |
INC HL |
63526 |
LD D,(HL) |
63527 |
INC HL |
63528 |
LD A,(HL) |
63529 |
LD B,A |
63530 |
LD (43064),DE |
63534 |
CALL 43069 |
63537 |
LD A,(IY+5) |
63540 |
SUB E |
63541 |
SUB 4 |
63543 |
CP 248 |
63545 |
RET C |
63546 |
LD A,(IY+10) |
63549 |
SUB D |
63550 |
ADD A,12 |
63552 |
CP 248 |
63554 |
RET C |
63555 |
LD HL,(63506) |
63558 |
INC HL |
63559 |
INC HL |
63560 |
INC HL |
63561 |
INC HL |
63562 |
LD A,(HL) |
63563 |
CP 255 |
63565 |
JR NZ,63570 |
63567 |
LD HL,63465 |
63570 |
LD (63506),HL |
63573 |
LD A,(IY+25) |
63576 |
CP B |
63577 |
JR Z,63588 |
63579 |
LD A,(IY+20) |
63582 |
ADD A,32 |
63584 |
CP 128 |
63586 |
JR C,63590 |
63588 |
LD A,128 |
63590 |
LD (IY+20),A |
63593 |
CALL 58221 |
63596 |
LD BC,25660 |
63599 |
LD DE,296 |
63602 |
LD HL,259 |
63605 |
CALL PlayWaveSequence |
63608 |
RET |