Prev: 6541 Up: Map Next: 65a8
6565: Pick up and carry a rocket module/fuel pod.
Used by the routine at 64e8.
Input
IX Collectible item object - rocket module or fuel pod.
6565 ld a,(ix+$06) Item sprite jump table offset
6568 cp $18
656a jr z,$6597 Jump to delivery check if a fuel pod?
656c sla a
656e add a,(ix+$02) Add item Y position
6571 cp $b7
6573 jp c,$6508 Increment item Y position and draw sprite if < 183
6576 ld a,($5d3c)
6579 or $01
657b ld ($5d3c),a
657e ld a,($5d34)
6581 inc a
6582 ld ($5d34),a
6585 ld a,(ix+$06) Item sprite jump table offset
6588 add a,$08
658a call $6ec2 Copy rocket sprite to buffers
658d call $726d Find and destroy current sprite
6590 ld (ix+$00),$00 Set item type to unused
6594 jp $67c6 SFX for rocket building
Check if fuel pod delivered to ship, and increment count if so.
6597 ld a,(ix+$02) Item Y position of fuel pod
659a cp $b0 Has it reached the rocket yet?
659c jp c,$6508 Move the fuel cell down one pixel if not
659f ld a,($5d35)
65a2 inc a
65a3 ld ($5d35),a
65a6 jr $658d Loop back and repeat
Prev: 6541 Up: Map Next: 65a8