Message From Andromeda: Routine at 38590

38590: Action: Land

Land the ship when the coordinates are set.
ActionLand	38590	CALL Parser_MatchOrRephrase	Call Parser_MatchOrRephrase to match or rephrase.
	38593	RET C	Return if the command was rejected.
	38594	JR ActionLand_Step1	Continue at ActionLand_Step1 to check where the ship can land.
ActionLand_Loop1	38596	LD HL,25691	Print "You can't." and start a new line.
ActionLand_Loop2	38599	CALL PrintStringAndANewline	Print "You can't." and start a new line.
	38602	RET	Return.
ActionLand_Step1	38603	LD HL,35525	Jump to ActionLand_Step3 unless the command matches the phrase at 35525.
	38606	CALL Parser_AdvanceToSeparator
	38609	JR NZ,ActionLand_Step3
	38611	LD A,(25123)	Fetch the current room.
	38614	CP 3	The ship is already in In the Galaxy at rest,on a landing pad., ready to land.
	38616	JR Z,ActionLand_Step2
	38618	LD HL,30539	Print "The ship is not in orbit." and start a new line.
	38621	JR ActionLand_Loop2	Print "The ship is not in orbit." and start a new line.
ActionLand_Step2	38623	LD A,4	Move the player to In the Galaxy at rest,on a landing pad. (4).
	38625	CALL MovePlayerToRoom
	38628	RET	Return.
ActionLand_Step3	38629	JR ActionLand_Loop1	Continue at ActionLand_Loop1 to say the player can't.