Inventing the Adventure Game (1984)(warrenrobinett.com)

    >GIVE AXE TO TROLL

    The troll, who is not overly proud, graciously accepts the gift 
    and not having the most discriminating tastes, gleefully eats it.

    The troll, disarmed, cowers in terror, pleading for 
    his life in the guttural tongue of the trolls.

    >GIVE TROLL TO TROLL

    The troll, who is not overly proud, graciously accepts the gift 
    and not having the most discriminating tastes, gleefully eats it.

               <COND (<VERB? "THROW" "GIVE">
                      <COND (<VERB? "THROW">
                             <TELL
    "The troll, who is remarkably coordinated, catches the " 1 <ODESC2 <PRSO>>>)
                            (<TELL
    "The troll, who is not overly proud, graciously accepts the gift">)>
                      <COND (<==? <PRSO> <SFIND-OBJ "KNIFE">>
                             <TELL
    "and being for the moment sated, throws it back.  Fortunately, the
    troll has poor control, and the knife falls to the floor.  He does
    not look pleased." ,LONG-TELL1>
                             <TRO .T ,FIGHTBIT>)
                            (<TELL
    "and not having the most discriminating tastes, gleefully eats it.">
                      <REMOVE-OBJECT <PRSO>>)>)
                     (<VERB? "TAKE" "MOVE">
                      <TELL
    "The troll spits in your face, saying \"Better luck next time.\"">)
                     (<VERB? "MUNG">
                      <TELL
    "The troll laughs at your puny gesture.">)>)
              (<AND ,TROLL-FLAG!-FLAG
                    <VERB? "HELLO">>
               <TELL "Unfortunately, the troll can't hear you.">)>>