26419: Update Rocket Colour
| 26419 |
LD L,(IX+1) |
| 26422 |
LD H,(IX+2) |
| 26425 |
PUSH HL |
| 26426 |
LD A,(IX+4) |
| 26429 |
LD B,A |
| 26430 |
LD C,0 |
| 26432 |
PUSH BC |
| 26433 |
LD A,(24048) |
| 26436 |
RRCA |
| 26437 |
RRCA |
| 26438 |
AND 3 |
| 26440 |
OR C |
| 26441 |
SLA A |
| 26443 |
CALL 25832 |
| 26446 |
CALL 29278 |
| 26449 |
POP BC |
| 26450 |
LD A,(IX+2) |
| 26453 |
SUB 16 |
| 26455 |
LD (IX+2),A |
| 26458 |
LD A,(24001) |
| 26461 |
SUB 16 |
| 26463 |
LD (24001),A |
| 26466 |
LD A,C |
| 26467 |
ADD A,4 |
| 26469 |
LD C,A |
| 26470 |
DJNZ 26432 |
| 26472 |
LD A,2 |
| 26474 |
LD (24004),A |
| 26477 |
XOR A |
| 26478 |
LD (24003),A |
| 26481 |
POP HL |
| 26482 |
LD (IX+2),H |
| 26485 |
LD (24015),HL |
| 26488 |
LD B,(IX+4) |
| 26491 |
SLA B |
| 26493 |
LD A,B |
| 26494 |
CP 6 |
| 26496 |
JR C,26537 |
| 26498 |
LD A,(IX+5) |
| 26501 |
AND A |
| 26502 |
JR Z,26537 |
| 26504 |
CP 6 |
| 26506 |
PUSH AF |
| 26507 |
LD A,(24012) |
| 26510 |
RRCA |
| 26511 |
RRCA |
| 26512 |
AND 4 |
| 26514 |
OR 67 |
| 26516 |
LD C,A |
| 26517 |
POP AF |
| 26518 |
LD A,C |
| 26519 |
JR NC,26539 |
| 26521 |
LD B,(IX+5) |
| 26524 |
LD (IX+3),67 |
| 26528 |
CALL 26545 |
| 26531 |
LD A,6 |
| 26533 |
SUB (IX+5) |
| 26536 |
LD B,A |
| 26537 |
LD A,71 |
| 26539 |
LD (IX+3),A |
| 26542 |
JP 26545 |
| 26545 |
PUSH BC |
| 26546 |
CALL ColouriseSprite |
| 26549 |
POP BC |
| 26550 |
LD HL,(24015) |
| 26553 |
LD A,H |
| 26554 |
SUB 8 |
| 26556 |
LD H,A |
| 26557 |
LD (24015),HL |
| 26560 |
DJNZ 26545 |
| 26562 |
RET |
