6CF5: Routine at 6CF5
6CF5 |
CALL $6CE7 |
6CF8 |
LD HL,$5DCB |
6CFB |
INC (HL) |
6CFC |
CALL MeteorUpdate_9 |
6CFF |
DEC C |
6D00 |
JP Z,$6D90 |
6D03 |
CALL MeteorUpdate_4 |
6D06 |
DEC E |
6D07 |
JP Z,$648D |
6D0A |
XOR A |
6D0B |
LD ($5DC9),A |
6D0E |
CALL $761D |
6D11 |
BIT 2,E |
6D13 |
JR Z,$6D2E |
6D15 |
BIT 7,E |
6D17 |
JP NZ,$6D9E |
6D1A |
BIT 4,E |
6D1C |
JP NZ,$6DAD |
6D1F |
LD A,E |
6D20 |
AND $40 |
6D22 |
XOR $40 |
6D24 |
LD E,A |
6D25 |
LD A,(IX+$04) |
6D28 |
AND $BF |
6D2A |
OR E |
6D2B |
LD (IX+$04),A |
6D2E |
BIT 6,(IX+$04) |
6D32 |
LD A,(IX+$01) |
6D35 |
JP NZ,$6DB4 |
6D38 |
ADD A,$02 |
6D3A |
LD (IX+$01),A |
6D3D |
LD H,$00 |
6D3F |
LD L,(IX+$06) |
6D42 |
ADD HL,HL |
6D43 |
LD D,(IX+$02) |
6D46 |
LD E,(IX+$05) |
6D49 |
BIT 7,(IX+$04) |
6D4D |
JR Z,$6DC4 |
6D4F |
ADD HL,DE |
6D50 |
LD (IX+$05),L |
6D53 |
LD (IX+$02),H |
6D56 |
LD A,H |
6D57 |
CP $28 |
6D59 |
JR NC,$6D5F |
6D5B |
SET 7,(IX+$04) |
6D5F |
BIT 7,(IX+$04) |
6D63 |
JR Z,$6DB9 |
6D65 |
INC (IX+$06) |
6D68 |
JR NZ,$6D6E |
6D6A |
LD (IX+$06),$FF |
6D6E |
LD A,($5DC9) |
6D71 |
AND A |
6D72 |
JR NZ,$6D7A |
6D74 |
INC A |
6D75 |
LD ($5DC9),A |
6D78 |
JR $6D0E |
6D7A |
LD A,(IX+$00) |
6D7D |
PUSH AF |
6D7E |
AND $C0 |
6D80 |
OR $03 |
6D82 |
LD (IX+$00),A |
6D85 |
CALL $726A |
6D88 |
CALL ColouriseSprite |
6D8B |
POP AF |
6D8C |
LD (IX+$00),A |
6D8F |
RET |
6D90 |
LD BC,$0060 |
6D93 |
CALL AddPointsToScore |
6D96 |
CALL EndAnimation |
6D99 |
LD A,$01 |
6D9B |
JP ExplosionInitialise |
6D9E |
RES 7,(IX+$04) |
6DA2 |
LD A,($5DCE) |
6DA5 |
ADD A,$08 |
6DA7 |
LD (IX+$06),A |
6DAA |
JP $6D2E |
6DAD |
SET 7,(IX+$04) |
6DB1 |
JP $6D2E |
6DB4 |
SUB $02 |
6DB6 |
JP $6D3A |
6DB9 |
DEC (IX+$06) |
6DBC |
JR NZ,$6D6E |
6DBE |
SET 7,(IX+$04) |
6DC2 |
JR $6D6E |
6DC4 |
AND A |
6DC5 |
EX DE,HL |
6DC6 |
SBC HL,DE |
6DC8 |
JP $6D50 |
6DCB |
INC BC |
6DCC |
NOP |
6DCD |
NOP |
6DCE |
LD B,D |
6DCF |
ADD A,B |
6DD0 |
INC B |
6DD1 |
NOP |
6DD2 |
INC E |