.SFRMIS LDX #MSL \ Set X to the ship type of a missile, and call SFS1-2 JSR SFS1-2 \ to add the missile to our universe with an AI flag \ of %11111110 (AI enabled, hostile, no E.C.M.) BCC NO1 \ The C flag will be set if the call to SFS1-2 was a \ success, so if it's clear, jump to NO1 to return from \ the subroutine (as NO1 contains an RTS) LDA #120 \ Print recursive token 120 ("INCOMING MISSILE") as an JSR MESS \ in-flight message LDA #48 \ Call the NOISE routine with A = 48 to make the sound BNE NOISE \ of the missile being launched and return from the \ subroutine using a tail call (this BNE is effectively \ a JMP as A will never be zero)Name: SFRMIS [Show more] Type: Subroutine Category: Tactics Summary: Add an enemy missile to our local bubble of universeContext: 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: * TACTICS (Part 5 of 7) calls SFRMIS
An enemy has fired a missile, so add the missile to our universe if there is room, and if there is, make the appropriate warnings and noises.
Subroutine MESS (category: Text)
Display an in-flight message
Configuration variable: MSL = 9
Ship type for a missile
Entry point NO1 in subroutine NORM (category: Maths (Geometry))
Contains an RTS
Subroutine NOISE (category: Sound)
Make the sound whose number is in A
Entry point SFS1-2 in subroutine SFS1 (category: Universe)
Add a missile to the local bubble that has AI enabled, is hostile, but has no E.C.M.