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 |