.BEGIN \JSR BRKBK \ This instruction is commented out in the original \ source LDX #(CATF-COMC) \ We start by zeroing all the configuration variables \ between COMC and CATF, to set them to their default \ values, so set a counter in X for CATF - 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 \ Fall through into TT170 to start the gameName: BEGIN [Show more] Type: Subroutine Category: Loader Summary: Initialise the configuration variables and start the gameContext: 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
[X]
Label BEL1 is local to this routine
[X]
Variable CATF in workspace Parasite variables
This byte appears to be unused (the CATF variable in the I/O processor code is used to store the CATF flag, not this one)
[X]
Variable COMC in workspace Parasite variables
The colour of the dot on the compass
[X]
Configuration variable SST = 2
Ship type for a Coriolis space station
[X]
Variable XX21 (category: Drawing ships)
Ship blueprints lookup table
[X]
Variable spasto (category: Universe)
Contains the address of the Coriolis space station's ship blueprint