Prev: 6568 Up: Map Next: 6735
65E8: Routine at 65E8
65E8 LD A,(IX+$07)
65EB AND $01
65ED ADD A,$26
65EF LD (IX+$00),A
65F2 CALL $7617
65F5 CALL $74EE
65F8 LD A,(IX+$07)
65FB AND A
65FC JR Z,$6602
65FE DEC (IX+$07)
6601 RET
6602 LD (IX+$00),$00
6606 RET
6607 LD HL,$5F1B
660A INC (HL)
660B CALL $76D0
660E LD A,(IX+$03)
6611 CP $47
6613 JR Z,$6628
6615 CALL $7317
6618 BIT 7,(IX+$00)
661C JR Z,$6628
661E LD (IX+$06),$02
6622 LD BC,$0125
6625 CALL AddPointsToScore
6628 LD HL,$6631
662B LD A,(IX+$06)
662E JP StartGame_0
6631 DEFB $39,$66,$53,$66,$69,$66,$81,$66
6639 DEFB $DD,$7E,$02,$3D,$FE,$A0,$38,$09
6641 DEFB $DD,$77,$02,$CD,$CC,$75,$C3,$EE
6649 DEFB $74,$DD,$36,$07,$10,$DD,$34,$06
6651 DEFB $18,$F1
6653 DEC (IX+$07)
6656 JR Z,$664E
6658 LD A,($5F1D)
665B AND $07
665D JR NZ,$6644
665F LD A,(IX+$00)
6662 XOR $01
6664 LD (IX+$00),A
6667 JR $6644
6669 LD A,(IX+$02)
666C ADD A,$04
666E CP $B8
6670 JR NC,$6674
6672 JR $6641
6674 LD A,R
6676 AND $0F
6678 OR $01
667A LD (IX+$07),A
667D INC (IX+$06)
6680 RET
6681 DEC (IX+$07)
6684 RET NZ
6685 LD A,(IX+$03)
6688 CP $47
668A LD A,$00
668C JR Z,$6695
668E LD A,($5F2F)
6691 AND $02
6693 ADD A,$1A
6695 LD (IX+$00),A
6698 JP $6915
669B CALL $76D0
669E LD HL,$5F1B
66A1 INC (HL)
66A2 LD A,(IX+$01)
66A5 CP $C4
66A7 JR NC,$66ED
66A9 CALL $6A46
66AC DEC E
66AD JP Z,$6A73
66B0 CALL $7317
66B3 BIT 7,(IX+$00)
66B7 JP NZ,$730D
66BA LD A,(IX+$07)
66BD INC A
66BE AND $0F
66C0 LD (IX+$07),A
66C3 JR NZ,$66CC
66C5 LD A,R
66C7 AND $07
66C9 LD (IX+$06),A
66CC CALL $6735
66CF LD (IX+$03),$43
66D3 JR NZ,$66D6
66D5 INC HL
66D6 LD A,(HL)
66D7 BIT 1,(IX+$06)
66DB JR NZ,$66DF
66DD NEG
66DF ADD A,(IX+$02)
66E2 CP $A0
66E4 JR NC,$6719
66E6 CP $20
66E8 JR C,$6723
66EA LD (IX+$02),A
66ED CALL $6735
66F0 JR Z,$66F3
66F2 INC HL
66F3 LD A,(HL)
66F4 BIT 0,(IX+$06)
66F8 JR NZ,$66FC
66FA NEG
66FC ADD A,(IX+$01)
66FF CP $04
6701 JR C,$6729
6703 CP $C0
6705 JR NC,$672F
6707 LD (IX+$01),A
670A LD A,(IX+$07)
670D RRA
670E AND $01
6710 XOR (IX+$00)
6713 LD (IX+$00),A
6716 JP $72D4
6719 LD (IX+$02),$A0
671D RES 1,(IX+$06)
6721 JR $66ED
6723 SET 1,(IX+$06)
6727 JR $66ED
6729 SET 0,(IX+$06)
672D JR $6707
672F RES 0,(IX+$06)
6733 JR $6707
Prev: 6568 Up: Map Next: 6735