Routines
Prev: F8D9 Up: Map Next: F999
F946: Action: Climb
Action_Climb F946 CALL Parser_ValidateDirectObject Call Parser_ValidateDirectObject.
F949 RET C Return if the direct object is malformed.
F94A LD HL,$EAB2 Call MatchPhraseTokens with PhraseTokens_UpLadder.
F94D CALL MatchPhraseTokens
F950 JR NZ,Action_Climb_0 Jump to Action_Climb_0 if the token isn't for the .
F952 LD A,($BCCB) Jump to Response_YouCant_Duplicate if *CurrentRoom is not room 04: " In A Rowing Boat".
F955 CP $04
F957 JP NZ,Response_YouCant_Duplicate
F95A LD A,$03 Call EF54 to room 03: Your Ship.
F95C CALL $EF54
F95F RET Return.
Action_Climb_0 F960 LD HL,$EAB5 Call MatchPhraseTokens with PhraseTokens_DownLadder.
F963 CALL MatchPhraseTokens
F966 JR NZ,Action_Climb_1 Jump to Action_Climb_1 if the token isn't for the .
F968 LD A,($BCCB) Jump to Response_YouCant_Duplicate if *CurrentRoom is not room 03: " Your Ship".
F96B CP $03
F96D JP NZ,Response_YouCant_Duplicate
F970 LD A,$04 Call EF54 to room 04: In A Rowing Boat.
F972 CALL $EF54
F975 RET Return.
Action_Climb_1 F976 LD HL,$EABC Call MatchPhraseTokens with PhraseTokens_Ladder.
F979 CALL MatchPhraseTokens
F97C JR NZ,Action_Climb_2 Jump to Action_Climb_2 if the token isn't for the .
Print "Please be more specific.".
F97E LD HL,$BED1 HL=Messaging_PleaseBeMoreSpecific.
F981 JP PrintStringAndNewline_Alias Jump to PrintStringAndNewline_Alias.
Action_Climb_2 F984 LD HL,$EA0D Call MatchPhraseTokens with PhraseTokens_IntoBoat.
F987 CALL MatchPhraseTokens
F98A JP Z,Validate_GetIntoBoat Jump to Validate_GetIntoBoat if the token is for the .
F98D LD HL,$EA1D Call MatchPhraseTokens with PhraseTokens_OutOfBoat.
F990 CALL MatchPhraseTokens
F993 JP Z,IsPlayerInRowingBoat_1 Jump to IsPlayerInRowingBoat_1 if the token is for the .
F996 JP Response_YouCant_Duplicate Jump to Response_YouCant_Duplicate.
Prev: F8D9 Up: Map Next: F999