Prev: 6965 Up: Map Next: 6AEF
6A6C: Routine at 6A6C
6A6C LD HL,$5DCB
6A6F INC (HL)
6A70 CALL $6CE7
6A73 CALL MeteorUpdate_9
6A76 DEC C
6A77 JP Z,$6AE6
6A7A CALL MeteorUpdate_4
6A7D DEC E
6A7E JP Z,$648D
6A81 XOR A
6A82 LD ($5DC9),A
6A85 CALL $761D
6A88 BIT 2,E
6A8A JR Z,$6AA1
6A8C BIT 7,E
6A8E JR NZ,$6ACA
6A90 BIT 4,E
6A92 JR NZ,$6AD0
6A94 LD A,E
6A95 AND $40
6A97 LD E,A
6A98 LD A,(IX+$04)
6A9B AND $BF
6A9D OR E
6A9E LD (IX+$04),A
6AA1 BIT 6,(IX+$04)
6AA5 LD A,(IX+$01)
6AA8 JR Z,$6AD6
6AAA ADD A,$02
6AAC LD (IX+$01),A
6AAF BIT 7,(IX+$04)
6AB3 LD A,(IX+$02)
6AB6 JR Z,$6ADA
6AB8 ADD A,$02
6ABA LD (IX+$02),A
6ABD LD A,($5DC9)
6AC0 AND A
6AC1 JP NZ,$6D7A
6AC4 INC A
6AC5 LD ($5DC9),A
6AC8 JR $6A85
6ACA RES 7,(IX+$04)
6ACE JR $6AA1
6AD0 SET 7,(IX+$04)
6AD4 JR $6AA1
6AD6 SUB $02
6AD8 JR $6AAC
6ADA SUB $02
6ADC CP $24
6ADE JR NC,$6ABA
6AE0 SET 7,(IX+$04)
6AE4 JR $6ABA
6AE6 LD BC,$0080
6AE9 CALL AddPointsToScore
6AEC JP $6C28
Prev: 6965 Up: Map Next: 6AEF