![]() |
Routines |
| Prev: CE5B | Up: Map | Next: CE97 |
|
Used by the routine at NextStep.
Used when the ship is on the same row as a step of a segment. It sets bit 7 of the contact flags at ContactFlags. If the vertical speed is not negative it also sets bit 0 (clearing bit 7) and copies the flags into LastContactFlags. It carries on at NextStep_Column.
|
||||
| FlagFloorContact | CE79 | LD A,($5C31) | The contact flags. | |
| CE7C | OR %10000000 | Set the bits of A that are set in 80. | ||
| CE7E | LD ($5C31),A | Update the contact flags. | ||
| CE81 | LD A,($CCBA) | The vertical scroll speed. | ||
| CE84 | BIT 7,A | Jump to NextStep_Column if bit 7 of A is set. | ||
| CE86 | JP NZ,NextStep_Column | |||
| CE89 | LD A,($5C31) | The contact flags. | ||
| CE8C | XOR %10000001 | Flip the bits of A that are set in 81. | ||
| CE8E | LD ($5C31),A | Update the contact flags. | ||
| CE91 | LD ($5C32),A | Update the last contact flags. | ||
| CE94 | JP NextStep_Column | Jump to NextStep_Column. | ||
| Prev: CE5B | Up: Map | Next: CE97 |