Loader: BEGIN

       Name: BEGIN                                                   [Show more]
       Type: Subroutine
   Category: Loader
    Summary: Initialise the configuration variables and start the game
    Context: See this subroutine in context in the source code
 Variations: See code variations for this subroutine in the different versions
 References: This subroutine is called as follows:
             * S% calls BEGIN


.BEGIN

 LDX #(DISK-COMC)       \ We start by zeroing all the configuration variables
                        \ between COMC and DISK, to set them to their default
                        \ values, so set a counter in X for DISK - COMC bytes

 LDA #0                 \ Set A = 0 so we can zero the variables

.BEL1

 STA COMC,X             \ Zero the X-th configuration variable

 DEX                    \ Decrement the loop counter

 BPL BEL1               \ Loop back to BEL1 to zero the next byte, until we have
                        \ zeroed them all

 LDA XX21+SST*2-2       \ Set spasto(1 0) to the Coriolis space station entry
 STA spasto             \ from the ship blueprint lookup table at XX21 (so
 LDA XX21+SST*2-1       \ spasto(1 0) points to the Coriolis blueprint)
 STA spasto+1

 JSR JAMESON            \ Call JAMESON to set the last saved commander to the
                        \ default "JAMESON" commander

                        \ Fall through into TT170 to start the game