| jetpac | Routines |
| Prev: 6565 | Up: Map | Next: 65db |
|
Used by the routine at 6971.
|
||||
| 65a8 | ld a,($5d00) | Jetman direction | ||
| 65ab | and $3f | |||
| 65ad | ret z | Return if not one of the 6 directions | ||
| 65ae | cp $03 | |||
| 65b0 | ret nc | Return if >= 3 (all movement except up right?) | ||
| 65b1 | ld hl,$603b | HL=default item state | ||
| 65b4 | ld de,$5d40 | DE=collectible object | ||
| 65b7 | ld bc,$0008 | |||
| 65ba | ld a,(de) | A=item type | ||
| 65bb | and a | |||
| 65bc | ret nz | Return if currently in use | ||
| 65bd | ld a,($5dcc) | Game timer | ||
| 65c0 | and $7f | |||
| 65c2 | ret nz | Return if between 1-127 | ||
| 65c3 | ldir | |||
| 65c5 | call $65db | A=column to drop item | ||
| 65c8 | ld ($5d41),a | |||
| 65cb | ld a,r | Get random number | ||
| 65cd | and $0e | A=2, 4, 6, 8, 10, 12, or 14 | ||
| 65cf | bit 3,a | Jump if bit-3 is already reset | ||
| 65d1 | jr z,$65d5 | |||
| 65d3 | and $08 | else set bit-3 | ||
| 65d5 | or $20 | Make sure bit-5 (32) is set | ||
| 65d7 | ld ($5d46),a | |||
| 65da | ret | |||
| Prev: 6565 | Up: Map | Next: 65db |