Prev: 64289 Up: Map Next: 64393
64349: Action: Wear
Action_Wear 64349 CALL Parser_ValidateDirectObject Call Parser_ValidateDirectObject.
64352 RET C Return if there is no direct object in the user input (so the command is malformed).
64353 CP 2 Jump to Response_PleaseRephraseThat_Duplicate if there were more than 2 direct objects referenced in the user input (so the command is malformed).
64355 JP NC,Response_PleaseRephraseThat_Duplicate
64358 LD HL,64373 HL=Table_ActionWear_TokenGroup.
64361 LD DE,64383 DE=Table_ActionsWear.
64364 LD BC,5 BC=0005.
64367 CALL 45278 Call 45278.
Print "Don't be ridiculous.".
64370 JP Response_DontBeRidiculous Jump to Response_DontBeRidiculous.
The token table for the action "wear":
Table_ActionWear_TokenGroup 64373 DEFW PhraseTokens_Torc Token group 1.
64375 DEFW PhraseTokens_Helmet Token group 2.
64377 DEFW PhraseTokens_Amulet Token group 3.
64379 DEFW PhraseTokens_Shield Token group 4.
64381 DEFW PhraseTokens_Cloak Token group 5.
The actions table for "wear":
Table_ActionsWear 64383 DEFW Process_WearTorc Action routine 1.
64385 DEFW Process_WearHelmet Action routine 2.
64387 DEFW Process_WearAmulet Action routine 3.
64389 DEFW Process_WearShield Action routine 4.
64391 DEFW Process_WearCloak Action routine 5.
Prev: 64289 Up: Map Next: 64393