Prev: F84B Up: Map Next: F88F
F853: Action: Examine
Action_Examine F853 CALL Parser_ValidateDirectObject Call Parser_ValidateDirectObject.
F856 RET C Return if there is no direct object in the user input (so the command is malformed).
F857 CP $02 Jump to Response_PleaseRephraseThat_Duplicate if there were more than 02 direct objects referenced in the user input (so the command is malformed).
F859 JP NC,Response_PleaseRephraseThat_Duplicate
F85C LD HL,$F86B HL=Table_ActionExamine_TokenGroup.
F85F LD DE,$F87D DE=Table_ActionsExamine.
F862 LD BC,$0009 BC=0009.
F865 CALL $B0DE Call B0DE.
Print "You see nothing special.".
F868 JP Response_YouSeeNothingSpecial Jump to Response_YouSeeNothingSpecial.
The token table for the action "examine":
Table_ActionExamine_TokenGroup F86B DEFW PhraseTokens_Urn Token group 01.
F86D DEFW PhraseTokens_Helmet Token group 02.
F86F DEFW PhraseTokens_Monolith Token group 03.
F871 DEFW PhraseTokens_Sword Token group 04.
F873 DEFW PhraseTokens_Amulet Token group 05.
F875 DEFW PhraseTokens_Staff Token group 06.
F877 DEFW PhraseTokens_Body Token group 07.
F879 DEFW PhraseTokens_Torc Token group 08.
F87B DEFW PhraseTokens_Slab Token group 09.
The actions table for "examine":
Table_ActionsExamine F87D DEFW Process_ExamineUrn Action routine 01.
F87F DEFW Process_ExamineHelmet Action routine 02.
F881 DEFW Process_ExamineMonolith Action routine 03.
F883 DEFW Process_ExamineSword Action routine 04.
F885 DEFW Process_ExamineAmulet Action routine 05.
F887 DEFW Process_ExamineStaff Action routine 06.
F889 DEFW Process_ExamineBody Action routine 07.
F88B DEFW Process_ExamineTorc Action routine 08.
F88D DEFW Process_ExamineSlab Action routine 09.
Prev: F84B Up: Map Next: F88F