9531: Routine at 9531
| 9531 |
LD HL,$5E5E |
| 9534 |
INC (HL) |
| 9535 |
LD A,(IX+$04) |
| 9538 |
ADD A,$02 |
| 953A |
CP $B0 |
| 953C |
JR NC,$95B3 |
| 953E |
LD (IX+$04),A |
| 9541 |
LD A,($5E42) |
| 9544 |
AND $07 |
| 9546 |
ADD A,$50 |
| 9548 |
LD (IX+$00),A |
| 954B |
LD A,(IX+$0A) |
| 954E |
AND A |
| 954F |
JR NZ,$955F |
| 9551 |
BIT 0,(IX+$08) |
| 9555 |
JR NZ,$955F |
| 9557 |
INC (IX+$17) |
| 955A |
JR NZ,$9563 |
| 955C |
JP $9937 |
| 955F |
LD (IX+$17),$00 |
| 9563 |
LD H,(IX+$03) |
| 9566 |
LD L,(IX+$02) |
| 9569 |
LD A,(IX+$05) |
| 956C |
LD D,$00 |
| 956E |
SRA A |
| 9570 |
SRA A |
| 9572 |
SRA A |
| 9574 |
SRA A |
| 9576 |
JP P,$957B |
| 9579 |
LD D,$FF |
| 957B |
LD E,A |
| 957C |
ADD HL,DE |
| 957D |
LD A,H |
| 957E |
AND $1F |
| 9580 |
LD (IX+$03),A |
| 9583 |
LD (IX+$02),L |
| 9586 |
CALL $8701 |
| 9589 |
CALL $8733 |
| 958C |
BIT 0,(IX+$10) |
| 9590 |
JR Z,$95A9 |
| 9592 |
LD A,(IX+$00) |
| 9595 |
RRA |
| 9596 |
RRA |
| 9597 |
RRA |
| 9598 |
AND $1F |
| 959A |
ADD A,$01 |
| 959C |
DAA |
| 959D |
LD L,A |
| 959E |
LD H,$00 |
| 95A0 |
ADD HL,HL |
| 95A1 |
ADD HL,HL |
| 95A2 |
ADD HL,HL |
| 95A3 |
ADD HL,HL |
| 95A4 |
LD B,H |
| 95A5 |
LD C,L |
| 95A6 |
CALL AddPointsToScore |
| 95A9 |
CALL $A766 |
| 95AC |
CALL $B2A2 |
| 95AF |
RET NC |
| 95B0 |
CALL $B2D7 |
| 95B3 |
JP $A76B |
