Skip to navigation

⌂ ∞ Elite on the BBC Micro and NES

Dashboard: COMPAS

[Elite-A, Flight]

       Name: COMPAS                                                  [Show more]
       Type: Subroutine
   Category: Dashboard
    Summary: Update the compass

    Context: See this subroutine in context in the source code
 References: This subroutine is called as follows:
             * DIALS (Part 4 of 4) calls COMPAS




.COMPAS

 JSR DOT                \ Call DOT to redraw (i.e. remove) the current compass
                        \ dot

                        \ --- Mod: Code removed for Elite-A: ------------------>

\ LDA SSPR              \ If we are inside the space station safe zone, jump to
\ BNE SP1               \ SP1 to draw the space station on the compass
\
\ JSR SPS1              \ Otherwise we need to draw the planet on the compass,
\                       \ so first call SPS1 to calculate the vector to the
\                       \ planet and store it in XX15
\
\ JMP SP2               \ Jump to SP2 to draw XX15 on the compass, returning
\                       \ from the subroutine using a tail call

                        \ --- And replaced by: -------------------------------->

 LDY #NI%               \ Set Y = NI%, so SPS1 will calculate the vector to the
                        \ second slot in the local bubble, i.e. the space
                        \ station or the sun

 LDA SSPR               \ If we are inside the space station safe zone, jump to
 BNE l_station          \ l_station to skip the following instruction and ensure
                        \ we draw the space station on the compass

 LDY finder             \ We are not inside the space station safe zone, so
                        \ set the value of Y to finder, which determines whether
                        \ the compass is configured to show the sun or the
                        \ planet

.l_station

 JSR SPS1               \ We now draw the planet or sun/station on the compass,
                        \ so first call SPS1 to calculate the vector to the
                        \ planet/sun/station and store it in XX15

                        \ Fall through into SP2 to draw XX15 on the compass

                        \ --- End of replacement ------------------------------>