Prev: CE5B Up: Map Next: CE97
CE79: Record Floor Contact
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