Routines
Prev: 63814 Up: Map Next: 63972
63897: Action: Eat
Action_Eat 63897 CALL Parser_ValidateDirectObject Call Parser_ValidateDirectObject.
63900 RET C Return if the direct object is malformed.
63901 LD HL,59852 Call MatchPhraseTokens with PhraseTokens_Fish.
63904 CALL MatchPhraseTokens
63907 JR NZ,Action_Eat_1 Jump to Action_Eat_1 if the token isn't for the .
63909 LD HL,59541 Call CheckActiveScenicEvents with Data_ItemGroup_Fish.
63912 CALL CheckActiveScenicEvents
63915 LD B,A B=A.
63916 PUSH BC Stash BC on the stack.
63917 CALL CheckObjectInInventory Call CheckObjectInInventory.
63920 JR NZ,Action_Eat_0 Jump to Action_Eat_0 if A is not equal to 4.
63922 LD HL,48280 HL=Count_InventoryItems.
63925 DEC (HL) Decrease *HL by one.
Action_Eat_0 63926 POP BC Restore BC from the stack.
63927 LD A,B A=B.
63928 CALL Handler_DestroyItemEvent Call Handler_DestroyItemEvent.
Print "You eat the fish. It was quite tasty.".
63931 LD HL,57717 HL=57717.
63934 JP PrintStringAndNewline_Alias Jump to PrintStringAndNewline_Alias.
Action_Eat_1 63937 LD HL,59863 Call MatchPhraseTokens with PhraseTokens_Fruit.
63940 CALL MatchPhraseTokens
63943 JR NZ,Action_Eat_2 Jump to Action_Eat_2 if the token isn't for the .
Bad luck!
63945 LD HL,60887 Switch GameOver onto the stack so the next return actions a "game over".
63948 EX (SP),HL
Print "You start to eat the fruit. You suddenly feel very unwell. Too late,you realise that the fruit is poisonous.".
63949 LD HL,57755 HL=57755.
63952 JP PrintStringAndNewline_Alias Jump to PrintStringAndNewline_Alias.
Action_Eat_2 63955 LD HL,59877 Call MatchPhraseTokens with PhraseTokens_Coconut.
63958 CALL MatchPhraseTokens
63961 JR NZ,Action_Eat_3 Jump to Action_Eat_3 if the token isn't for the .
Print "No. You don't like coconut.".
63963 LD HL,57864 HL=57864.
63966 JP PrintStringAndNewline_Alias Jump to PrintStringAndNewline_Alias.
Action_Eat_3 63969 JP Response_YouMustBeJoking Jump to Response_YouMustBeJoking.
Prev: 63814 Up: Map Next: 63972