26801: Animate explosion
AnimateExplosion |
26801 |
LD HL,24011 |
|
26804 |
INC (HL) |
|
26805 |
LD C,(IX+4) |
|
26808 |
LD B,(IX+5) |
|
26811 |
LD A,(24012) |
|
26814 |
AND B |
|
26815 |
JR NZ,AnimateExplosion_0 |
|
26817 |
INC (IX+4) |
AnimateExplosion_0 |
26820 |
LD A,C |
|
26821 |
SLA C |
|
26823 |
LD B,0 |
|
26825 |
LD HL,26895 |
|
26828 |
ADD HL,BC |
|
26829 |
LD E,(HL) |
|
26830 |
INC HL |
|
26831 |
LD D,(HL) |
|
26832 |
LD L,(IX+1) |
|
26835 |
LD H,(IX+2) |
|
26838 |
CP 6 |
|
26840 |
JR NC,AnimateExplosion_1 |
|
26842 |
CP 3 |
|
26844 |
JR NC,AnimateExplosion_2 |
|
26846 |
CALL 29339 |
|
26849 |
LD A,(24014) |
|
26852 |
AND 7 |
|
26854 |
OR 66 |
|
26856 |
LD (IX+3),A |
|
26859 |
JP ColouriseSprite |
AnimateExplosion_1 |
26862 |
LD A,(IX+6) |
|
26865 |
LD (IX+0),A |
|
26868 |
CALL StoreEntity |
|
26871 |
CALL 29349 |
|
26874 |
LD (IX+0),0 |
|
26878 |
LD A,(IX+6) |
|
26881 |
AND 63 |
|
26883 |
CP 3 |
|
26885 |
JP C,PlayerReset |
|
26888 |
RET |
AnimateExplosion_2 |
26889 |
CALL 29226 |
|
26892 |
JP 29352 |