Routines
Prev: 63771 Up: Map Next: 63897
63814: Action: Climb
Action_Climb 63814 CALL Parser_ValidateDirectObject Call Parser_ValidateDirectObject.
63817 RET C Return if the direct object is malformed.
63818 LD HL,60082 Call MatchPhraseTokens with PhraseTokens_UpLadder.
63821 CALL MatchPhraseTokens
63824 JR NZ,Action_Climb_0 Jump to Action_Climb_0 if the token isn't for the .
63826 LD A,(48331) Jump to Response_YouCant_Duplicate if *CurrentRoom is not room 4: " In A Rowing Boat".
63829 CP 4
63831 JP NZ,Response_YouCant_Duplicate
63834 LD A,3 Call ChangeRoom to room 3: Your Ship.
63836 CALL ChangeRoom
63839 RET Return.
Action_Climb_0 63840 LD HL,60085 Call MatchPhraseTokens with PhraseTokens_DownLadder.
63843 CALL MatchPhraseTokens
63846 JR NZ,Action_Climb_1 Jump to Action_Climb_1 if the token isn't for the .
63848 LD A,(48331) Jump to Response_YouCant_Duplicate if *CurrentRoom is not room 3: " Your Ship".
63851 CP 3
63853 JP NZ,Response_YouCant_Duplicate
63856 LD A,4 Call ChangeRoom to room 4: In A Rowing Boat.
63858 CALL ChangeRoom
63861 RET Return.
Action_Climb_1 63862 LD HL,60092 Call MatchPhraseTokens with PhraseTokens_Ladder.
63865 CALL MatchPhraseTokens
63868 JR NZ,Action_Climb_2 Jump to Action_Climb_2 if the token isn't for the .
Print "Please be more specific.".
63870 LD HL,48849 HL=Messaging_PleaseBeMoreSpecific.
63873 JP PrintStringAndNewline_Alias Jump to PrintStringAndNewline_Alias.
Action_Climb_2 63876 LD HL,59917 Call MatchPhraseTokens with PhraseTokens_IntoBoat.
63879 CALL MatchPhraseTokens
63882 JP Z,Validate_GetIntoBoat Jump to Validate_GetIntoBoat if the token is for the .
63885 LD HL,59933 Call MatchPhraseTokens with PhraseTokens_OutOfBoat.
63888 CALL MatchPhraseTokens
63891 JP Z,IsPlayerInRowingBoat_1 Jump to IsPlayerInRowingBoat_1 if the token is for the .
63894 JP Response_YouCant_Duplicate Jump to Response_YouCant_Duplicate.
Prev: 63771 Up: Map Next: 63897