.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 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]
Subroutine JAMESON (category: Save and load)
Restore the default JAMESON commander
[X]
Configuration variable SST = 2
Ship type for a Coriolis space station
[X]
Configuration variable XX21 = &8000
The address of the ship blueprints lookup table, as set in elite-data.asm
[X]
Variable spasto (category: Universe)
Contains the address of the Coriolis space station's ship blueprint