Home » Archimedes archive » Acorn User » AU 1995-04.adf » !StarInfo_StarInfo » Miskin/!CompInfo/Zcode/h/GRAMMAR

Miskin/!CompInfo/Zcode/h/GRAMMAR

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Archimedes archive » Acorn User » AU 1995-04.adf » !StarInfo_StarInfo
Filename: Miskin/!CompInfo/Zcode/h/GRAMMAR
Read OK:
File size: 386D bytes
Load address: 0000
Exec address: 0000
File contents
! ----------------------------------------------------------------------------
!  GRAMMAR:  Grammar table entries for the standard verbs library.
!
!  Supplied for use with Inform 5                         Serial number 941007
!                                                                  Release 5/5
!  (c) Graham Nelson, 1993/4, but freely usable
! ----------------------------------------------------------------------------
!  The "meta-verbs", commands to the game rather than in the game, come first:
! ----------------------------------------------------------------------------

Verb meta "score"
                *                                -> Score;
Verb meta "fullscore" "full"
                *                                -> FullScore;
Verb meta "q" "quit" "die"
                *                                -> Quit;
Verb meta "restore"
                *                                -> Restore;
Verb meta "restart"
                *                                -> Restart;
Verb meta "verify"
                *                                -> Verify;
Verb meta "save"
                *                                -> Save;
Verb meta "script"
                *                                -> ScriptOn
                * "off"                          -> ScriptOff
                * "on"                           -> ScriptOn;
Verb meta "noscript" "unscript"
                *                                -> ScriptOff;
Verb meta "superbrief" "short"
                *                                -> LMode3;
Verb meta "verbose" "long"
                *                                -> LMode2;
Verb meta "brief" "normal"
                *                                -> LMode1;
Verb meta "pronouns" "nouns"
                *                                -> Pronouns;
Verb meta "notify"
                * "on"                           -> NotifyOn
                * "off"                          -> NotifyOff;
Verb meta "version"
                *                                -> Version;

! ----------------------------------------------------------------------------
!  Debugging grammar
! ----------------------------------------------------------------------------

#ifdef DEBUG;
Verb meta "trace"
                *                                -> TraceOn
                * number                         -> TraceLevel
                * "on"                           -> TraceOn
                * "off"                          -> TraceOff;
Verb meta "actions"
                *                                -> ActionsOn
                * "on"                           -> ActionsOn
                * "off"                          -> ActionsOff;
Verb meta "routines"
                *                                -> RoutinesOn
                * "on"                           -> RoutinesOn
                * "off"                          -> RoutinesOff;
Verb meta "timers" "daemons"
                *                                -> TimersOn
                * "on"                           -> TimersOn
                * "off"                          -> TimersOff;
Verb meta "purloin"
                * multi                          -> XPurloin;
Verb meta "abstract"
                * noun "to" noun                 -> XAbstract;
Verb meta "tree"
                *                                -> XTree
                * noun                           -> XTree;
Verb meta "goto"
                * number                         -> Goto;
#endif;

! ----------------------------------------------------------------------------
!  And now the game verbs.
! ----------------------------------------------------------------------------

Verb "take" "get"
                * "out"                          -> Exit
                * "off"                          -> Exit
                * "up"                           -> Exit
                * multi                          -> Take
                * multiinside "from" noun        -> Remove
                * "in" noun                      -> Enter
                * "on" noun                      -> Enter
                * multiinside "off" noun         -> Remove
                * "off" worn                     -> Disrobe
                * "off" noun                     -> GetOff
                * "inventory"                    -> Inv;
Verb "stand"
                *                                -> Exit
                * "up"                           -> Exit;
Verb "remove"
                * held                           -> Disrobe
                * multi                          -> Take
                * multiinside "from" noun        -> Remove;
Verb "shed" "doff" "disrobe"
                * held                           -> Disrobe; 
Verb "wear" "don"
                * held                           -> Wear;
Verb "put"
                * multiexcept "in" noun          -> Insert
                * multiexcept "inside" noun      -> Insert
                * multiexcept "into" noun        -> Insert
                * multiexcept "on" noun          -> PutOn
                * multiexcept "onto" noun        -> PutOn
                * "on" held                      -> Wear
                * "down" multiheld               -> Drop
                * multiheld "down"               -> Drop;
Verb "insert"
                * multiexcept "in" noun          -> Insert
                * multiexcept "into" noun        -> Insert;
Verb "empty"
                * noun                           -> Empty
                * "out" noun                     -> Empty
                * noun "out"                     -> Empty
                * noun "to" noun                 -> EmptyT
                * noun "into" noun               -> EmptyT
                * noun "on" noun                 -> EmptyT
                * noun "onto" noun               -> EmptyT;
Verb "transfer"
                * noun "to" noun                 -> Transfer;
Verb "drop" "throw" "discard"
                * multiheld                      -> Drop
                * multiexcept "in" noun          -> Insert
                * multiexcept "into" noun        -> Insert
                * multiexcept "on" noun          -> PutOn
                * multiexcept "onto" noun        -> PutOn
                * multiexcept "down" noun        -> Insert
                * held "at" noun                 -> ThrowAt
                * held "against" noun            -> ThrowAt;
Verb "give" "pay" "offer" "feed"
                * creature held                  -> GiveR
                * held "to" creature             -> Give
                * "over" held "to" creature      -> Give;
Verb "show"
                * creature held                  -> ShowR
                * held "to" creature             -> Show;
Verb "go" "walk" "run" "leave"
                *                                -> VagueGo
                * direction                      -> Go
                * noun                           -> Enter
                * "into" noun                    -> Enter
                * "in" noun                      -> Enter
                * "inside" noun                  -> Enter
                * "through" noun                 -> Enter;
Verb "inventory" "inv" "i"
                *                                -> Inv
                * "tall"                         -> InvTall
                * "wide"                         -> InvWide;
Verb "look" "l"
                *                                -> Look
                * "at" noun                      -> Examine
                * "inside" noun                  -> Search
                * "in" noun                      -> Search
                * "under" noun                   -> LookUnder
                * "through" noun                 -> Search
                * "up" special                   -> Consult;
Verb "consult"  * noun "about" special           -> Consult;
Verb "open" "unwrap" "uncover" "undo"
                * noun                           -> Open
                * noun "with" held               -> Unlock;
Verb "close" "shut" "cover"
                * noun                           -> Close;
Verb "enter" "cross"
                *                                -> GoIn
                * noun                           -> Enter;
Verb "sit"      * "on" noun                      -> Enter;
Verb "in" "inside"
                *                                -> GoIn;
Verb "exit" "out" "outside"
                *                                -> Exit;
Verb "examine" "x" "read" "watch" "describe" "check"
                * noun                           -> Examine;
Verb "yes" "y"
                *                                -> Yes;
Verb "no"
                *                                -> No;
Verb "sorry"
                *                                -> Sorry;
Verb "shit" "fuck" "damn" "sod"
                *                                -> Strong
                * special                        -> Strong;
Verb "bother" "curses" "drat" "darn"
                *                                -> Mild
                * special                        -> Mild;
Verb "search"
                * noun                           -> Search;
Verb "wave"
                *                                -> WaveHands
                * noun                           -> Wave;
Verb "set" "adjust"
                * noun                           -> Set
                * noun "to" special              -> SetTo;
Verb "pull" "drag"
                * noun                           -> Pull;
Verb "push" "move" "shift" "clear" "press"
                * noun                           -> Push
                * noun noun                      -> PushDir
                * noun "to" noun                 -> Transfer;
Verb "turn" "rotate" "twist" "unscrew" "screw"
                * noun                           -> Turn
                * noun "on"                      -> Switchon
                * noun "off"                     -> Switchoff
                * "on" noun                      -> Switchon
                * "off" noun                     -> Switchoff;
Verb "switch"
                * noun                           -> Switchon
                * noun "on"                      -> Switchon
                * noun "off"                     -> Switchoff
                * "on" noun                      -> Switchon
                * "off" noun                     -> Switchoff;
Verb "lock"
                * noun "with" held               -> Lock;
Verb "unlock"
                * noun "with" held               -> Unlock;
Verb "attack" "break" "smash" "hit" "fight" "wreck"
     "crack" "destroy" "murder" "kill" "torture"
                * noun                           -> Attack;
Verb "wait" "z"
                *                                -> Wait;
Verb "answer" "say" "shout" "speak"
                * special "to" creature          -> Answer;
Verb "ask"
                * creature "about" special       -> Ask;
Verb "eat"
                * held                           -> Eat;
Verb "sleep" "nap"
                *                                -> Sleep;
Verb "peel"
                * noun                           -> Take
                * "off" noun                     -> Take;
Verb "sing"
                *                                -> Sing;
Verb "climb" "scale"
                * noun                           -> Climb;
Verb "buy" "purchase"
                * special                        -> Buy;
Verb "squeeze" "squash"
                * noun                           -> Squeeze;
Verb "swim" "dive"
                *                                -> Swim;
Verb "swing"
                * noun                           -> Swing
                * "on" noun                      -> Swing;
Verb "blow"
                * held                           -> Blow;
Verb "pray"
                *                                -> Pray;
Verb "wake" "awake" "awaken"
                *                                -> Wake
                * "up"                           -> Wake
                * creature                       -> WakeOther
                * "up" creature                  -> WakeOther;
Verb "kiss" "embrace" "hug"
                * creature                       -> Kiss;
Verb "think"
                *                                -> Think;
Verb "smell" "sniff"
                *                                -> Smell
                * noun                           -> Smell;
Verb "hear" "listen"
                *                                -> Listen
                * noun                           -> Listen
                * "to" noun                      -> Listen;
Verb "taste"
                *                                -> Taste;
Verb "touch" "fondle" "feel" "grope"
                *                                -> Touch
                * noun                           -> TouchThing;
Verb "rub" "shine" "polish" "sweep" "clean" "dust" "wipe" "scrub"
                * noun                           -> Rub;
Verb "tie" "attach" "fasten" "fix"
                * noun                           -> Tie
                * noun "to" noun                 -> Tie;
Verb "burn" "light"
                * noun                           -> Burn
                * noun "with" held               -> Burn;
Verb "drink" "swallow" "sip"
                * noun                           -> Drink;
Verb "fill"
                * noun                           -> Fill;
Verb "cut" "slice" "prune" "chop"
                * noun                           -> Cut;
Verb "jump" "skip" "hop"
                *                                -> Jump
                * "over" noun                    -> JumpOver;

! ----------------------------------------------------------------------------
!  Final task: provide trivial routines if the user hasn't already:
! ----------------------------------------------------------------------------

#Stub TimePasses      0;
#Stub Amusing         0;
#Stub DeathMessage    0;
#Stub DarkToDark      0;
#Stub NewRoom         0;
#Stub LookRoutine     0;
#Stub AfterLife       0;
#Stub GamePreRoutine  0;
#Stub GamePostRoutine 0;
#Stub PrintRank       1;
#Stub PrintTaskName   1;
#Stub InScope         1;
#Stub UnknownVerb     1;
#Stub PrintVerb       1;
#Stub ParserError     1;
#Stub ParseNumber     2;

! ----------------------------------------------------------------------------
00000000  21 20 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |! --------------|
00000010  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00000040  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 0a 21  |--------------.!|
00000050  20 20 47 52 41 4d 4d 41  52 3a 20 20 47 72 61 6d  |  GRAMMAR:  Gram|
00000060  6d 61 72 20 74 61 62 6c  65 20 65 6e 74 72 69 65  |mar table entrie|
00000070  73 20 66 6f 72 20 74 68  65 20 73 74 61 6e 64 61  |s for the standa|
00000080  72 64 20 76 65 72 62 73  20 6c 69 62 72 61 72 79  |rd verbs library|
00000090  2e 0a 21 0a 21 20 20 53  75 70 70 6c 69 65 64 20  |..!.!  Supplied |
000000a0  66 6f 72 20 75 73 65 20  77 69 74 68 20 49 6e 66  |for use with Inf|
000000b0  6f 72 6d 20 35 20 20 20  20 20 20 20 20 20 20 20  |orm 5           |
000000c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 53 65  |              Se|
000000d0  72 69 61 6c 20 6e 75 6d  62 65 72 20 39 34 31 30  |rial number 9410|
000000e0  30 37 0a 21 20 20 20 20  20 20 20 20 20 20 20 20  |07.!            |
000000f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000120  20 20 20 20 20 20 52 65  6c 65 61 73 65 20 35 2f  |      Release 5/|
00000130  35 0a 21 20 20 28 63 29  20 47 72 61 68 61 6d 20  |5.!  (c) Graham |
00000140  4e 65 6c 73 6f 6e 2c 20  31 39 39 33 2f 34 2c 20  |Nelson, 1993/4, |
00000150  62 75 74 20 66 72 65 65  6c 79 20 75 73 61 62 6c  |but freely usabl|
00000160  65 0a 21 20 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |e.! ------------|
00000170  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
000001b0  0a 21 20 20 54 68 65 20  22 6d 65 74 61 2d 76 65  |.!  The "meta-ve|
000001c0  72 62 73 22 2c 20 63 6f  6d 6d 61 6e 64 73 20 74  |rbs", commands t|
000001d0  6f 20 74 68 65 20 67 61  6d 65 20 72 61 74 68 65  |o the game rathe|
000001e0  72 20 74 68 61 6e 20 69  6e 20 74 68 65 20 67 61  |r than in the ga|
000001f0  6d 65 2c 20 63 6f 6d 65  20 66 69 72 73 74 3a 0a  |me, come first:.|
00000200  21 20 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |! --------------|
00000210  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00000240  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 0a 0a  |--------------..|
00000250  56 65 72 62 20 6d 65 74  61 20 22 73 63 6f 72 65  |Verb meta "score|
00000260  22 0a 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |".              |
00000270  20 20 2a 20 20 20 20 20  20 20 20 20 20 20 20 20  |  *             |
00000280  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000290  20 20 20 2d 3e 20 53 63  6f 72 65 3b 0a 56 65 72  |   -> Score;.Ver|
000002a0  62 20 6d 65 74 61 20 22  66 75 6c 6c 73 63 6f 72  |b meta "fullscor|
000002b0  65 22 20 22 66 75 6c 6c  22 0a 20 20 20 20 20 20  |e" "full".      |
000002c0  20 20 20 20 20 20 20 20  20 20 2a 20 20 20 20 20  |          *     |
000002d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002e0  20 20 20 20 20 20 20 20  20 20 20 2d 3e 20 46 75  |           -> Fu|
000002f0  6c 6c 53 63 6f 72 65 3b  0a 56 65 72 62 20 6d 65  |llScore;.Verb me|
00000300  74 61 20 22 71 22 20 22  71 75 69 74 22 20 22 64  |ta "q" "quit" "d|
00000310  69 65 22 0a 20 20 20 20  20 20 20 20 20 20 20 20  |ie".            |
00000320  20 20 20 20 2a 20 20 20  20 20 20 20 20 20 20 20  |    *           |
00000330  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000340  20 20 20 20 20 2d 3e 20  51 75 69 74 3b 0a 56 65  |     -> Quit;.Ve|
00000350  72 62 20 6d 65 74 61 20  22 72 65 73 74 6f 72 65  |rb meta "restore|
00000360  22 0a 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |".              |
00000370  20 20 2a 20 20 20 20 20  20 20 20 20 20 20 20 20  |  *             |
00000380  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000390  20 20 20 2d 3e 20 52 65  73 74 6f 72 65 3b 0a 56  |   -> Restore;.V|
000003a0  65 72 62 20 6d 65 74 61  20 22 72 65 73 74 61 72  |erb meta "restar|
000003b0  74 22 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |t".             |
000003c0  20 20 20 2a 20 20 20 20  20 20 20 20 20 20 20 20  |   *            |
000003d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003e0  20 20 20 20 2d 3e 20 52  65 73 74 61 72 74 3b 0a  |    -> Restart;.|
000003f0  56 65 72 62 20 6d 65 74  61 20 22 76 65 72 69 66  |Verb meta "verif|
00000400  79 22 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |y".             |
00000410  20 20 20 2a 20 20 20 20  20 20 20 20 20 20 20 20  |   *            |
00000420  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000430  20 20 20 20 2d 3e 20 56  65 72 69 66 79 3b 0a 56  |    -> Verify;.V|
00000440  65 72 62 20 6d 65 74 61  20 22 73 61 76 65 22 0a  |erb meta "save".|
00000450  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000460  2a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |*               |
00000470  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000480  20 2d 3e 20 53 61 76 65  3b 0a 56 65 72 62 20 6d  | -> Save;.Verb m|
00000490  65 74 61 20 22 73 63 72  69 70 74 22 0a 20 20 20  |eta "script".   |
000004a0  20 20 20 20 20 20 20 20  20 20 20 20 20 2a 20 20  |             *  |
000004b0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000004c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2d 3e  |              ->|
000004d0  20 53 63 72 69 70 74 4f  6e 0a 20 20 20 20 20 20  | ScriptOn.      |
000004e0  20 20 20 20 20 20 20 20  20 20 2a 20 22 6f 66 66  |          * "off|
000004f0  22 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |"               |
00000500  20 20 20 20 20 20 20 20  20 20 20 2d 3e 20 53 63  |           -> Sc|
00000510  72 69 70 74 4f 66 66 0a  20 20 20 20 20 20 20 20  |riptOff.        |
00000520  20 20 20 20 20 20 20 20  2a 20 22 6f 6e 22 20 20  |        * "on"  |
00000530  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000540  20 20 20 20 20 20 20 20  20 2d 3e 20 53 63 72 69  |         -> Scri|
00000550  70 74 4f 6e 3b 0a 56 65  72 62 20 6d 65 74 61 20  |ptOn;.Verb meta |
00000560  22 6e 6f 73 63 72 69 70  74 22 20 22 75 6e 73 63  |"noscript" "unsc|
00000570  72 69 70 74 22 0a 20 20  20 20 20 20 20 20 20 20  |ript".          |
00000580  20 20 20 20 20 20 2a 20  20 20 20 20 20 20 20 20  |      *         |
00000590  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000005a0  20 20 20 20 20 20 20 2d  3e 20 53 63 72 69 70 74  |       -> Script|
000005b0  4f 66 66 3b 0a 56 65 72  62 20 6d 65 74 61 20 22  |Off;.Verb meta "|
000005c0  73 75 70 65 72 62 72 69  65 66 22 20 22 73 68 6f  |superbrief" "sho|
000005d0  72 74 22 0a 20 20 20 20  20 20 20 20 20 20 20 20  |rt".            |
000005e0  20 20 20 20 2a 20 20 20  20 20 20 20 20 20 20 20  |    *           |
000005f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000600  20 20 20 20 20 2d 3e 20  4c 4d 6f 64 65 33 3b 0a  |     -> LMode3;.|
00000610  56 65 72 62 20 6d 65 74  61 20 22 76 65 72 62 6f  |Verb meta "verbo|
00000620  73 65 22 20 22 6c 6f 6e  67 22 0a 20 20 20 20 20  |se" "long".     |
00000630  20 20 20 20 20 20 20 20  20 20 20 2a 20 20 20 20  |           *    |
00000640  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000650  20 20 20 20 20 20 20 20  20 20 20 20 2d 3e 20 4c  |            -> L|
00000660  4d 6f 64 65 32 3b 0a 56  65 72 62 20 6d 65 74 61  |Mode2;.Verb meta|
00000670  20 22 62 72 69 65 66 22  20 22 6e 6f 72 6d 61 6c  | "brief" "normal|
00000680  22 0a 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |".              |
00000690  20 20 2a 20 20 20 20 20  20 20 20 20 20 20 20 20  |  *             |
000006a0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000006b0  20 20 20 2d 3e 20 4c 4d  6f 64 65 31 3b 0a 56 65  |   -> LMode1;.Ve|
000006c0  72 62 20 6d 65 74 61 20  22 70 72 6f 6e 6f 75 6e  |rb meta "pronoun|
000006d0  73 22 20 22 6e 6f 75 6e  73 22 0a 20 20 20 20 20  |s" "nouns".     |
000006e0  20 20 20 20 20 20 20 20  20 20 20 2a 20 20 20 20  |           *    |
000006f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000700  20 20 20 20 20 20 20 20  20 20 20 20 2d 3e 20 50  |            -> P|
00000710  72 6f 6e 6f 75 6e 73 3b  0a 56 65 72 62 20 6d 65  |ronouns;.Verb me|
00000720  74 61 20 22 6e 6f 74 69  66 79 22 0a 20 20 20 20  |ta "notify".    |
00000730  20 20 20 20 20 20 20 20  20 20 20 20 2a 20 22 6f  |            * "o|
00000740  6e 22 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |n"              |
00000750  20 20 20 20 20 20 20 20  20 20 20 20 20 2d 3e 20  |             -> |
00000760  4e 6f 74 69 66 79 4f 6e  0a 20 20 20 20 20 20 20  |NotifyOn.       |
00000770  20 20 20 20 20 20 20 20  20 2a 20 22 6f 66 66 22  |         * "off"|
00000780  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000790  20 20 20 20 20 20 20 20  20 20 2d 3e 20 4e 6f 74  |          -> Not|
000007a0  69 66 79 4f 66 66 3b 0a  56 65 72 62 20 6d 65 74  |ifyOff;.Verb met|
000007b0  61 20 22 76 65 72 73 69  6f 6e 22 0a 20 20 20 20  |a "version".    |
000007c0  20 20 20 20 20 20 20 20  20 20 20 20 2a 20 20 20  |            *   |
000007d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000007e0  20 20 20 20 20 20 20 20  20 20 20 20 20 2d 3e 20  |             -> |
000007f0  56 65 72 73 69 6f 6e 3b  0a 0a 21 20 2d 2d 2d 2d  |Version;..! ----|
00000800  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00000840  2d 2d 2d 2d 2d 2d 2d 2d  0a 21 20 20 44 65 62 75  |--------.!  Debu|
00000850  67 67 69 6e 67 20 67 72  61 6d 6d 61 72 0a 21 20  |gging grammar.! |
00000860  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
000008a0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 0a 0a 23 69  |------------..#i|
000008b0  66 64 65 66 20 44 45 42  55 47 3b 0a 56 65 72 62  |fdef DEBUG;.Verb|
000008c0  20 6d 65 74 61 20 22 74  72 61 63 65 22 0a 20 20  | meta "trace".  |
000008d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2a 20  |              * |
000008e0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000008f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2d  |               -|
00000900  3e 20 54 72 61 63 65 4f  6e 0a 20 20 20 20 20 20  |> TraceOn.      |
00000910  20 20 20 20 20 20 20 20  20 20 2a 20 6e 75 6d 62  |          * numb|
00000920  65 72 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |er              |
00000930  20 20 20 20 20 20 20 20  20 20 20 2d 3e 20 54 72  |           -> Tr|
00000940  61 63 65 4c 65 76 65 6c  0a 20 20 20 20 20 20 20  |aceLevel.       |
00000950  20 20 20 20 20 20 20 20  20 2a 20 22 6f 6e 22 20  |         * "on" |
00000960  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000970  20 20 20 20 20 20 20 20  20 20 2d 3e 20 54 72 61  |          -> Tra|
00000980  63 65 4f 6e 0a 20 20 20  20 20 20 20 20 20 20 20  |ceOn.           |
00000990  20 20 20 20 20 2a 20 22  6f 66 66 22 20 20 20 20  |     * "off"    |
000009a0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000009b0  20 20 20 20 20 20 2d 3e  20 54 72 61 63 65 4f 66  |      -> TraceOf|
000009c0  66 3b 0a 56 65 72 62 20  6d 65 74 61 20 22 61 63  |f;.Verb meta "ac|
000009d0  74 69 6f 6e 73 22 0a 20  20 20 20 20 20 20 20 20  |tions".         |
000009e0  20 20 20 20 20 20 20 2a  20 20 20 20 20 20 20 20  |       *        |
000009f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000a00  20 20 20 20 20 20 20 20  2d 3e 20 41 63 74 69 6f  |        -> Actio|
00000a10  6e 73 4f 6e 0a 20 20 20  20 20 20 20 20 20 20 20  |nsOn.           |
00000a20  20 20 20 20 20 2a 20 22  6f 6e 22 20 20 20 20 20  |     * "on"     |
00000a30  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000a40  20 20 20 20 20 20 2d 3e  20 41 63 74 69 6f 6e 73  |      -> Actions|
00000a50  4f 6e 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |On.             |
00000a60  20 20 20 2a 20 22 6f 66  66 22 20 20 20 20 20 20  |   * "off"      |
00000a70  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000a80  20 20 20 20 2d 3e 20 41  63 74 69 6f 6e 73 4f 66  |    -> ActionsOf|
00000a90  66 3b 0a 56 65 72 62 20  6d 65 74 61 20 22 72 6f  |f;.Verb meta "ro|
00000aa0  75 74 69 6e 65 73 22 0a  20 20 20 20 20 20 20 20  |utines".        |
00000ab0  20 20 20 20 20 20 20 20  2a 20 20 20 20 20 20 20  |        *       |
00000ac0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000ad0  20 20 20 20 20 20 20 20  20 2d 3e 20 52 6f 75 74  |         -> Rout|
00000ae0  69 6e 65 73 4f 6e 0a 20  20 20 20 20 20 20 20 20  |inesOn.         |
00000af0  20 20 20 20 20 20 20 2a  20 22 6f 6e 22 20 20 20  |       * "on"   |
00000b00  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000b10  20 20 20 20 20 20 20 20  2d 3e 20 52 6f 75 74 69  |        -> Routi|
00000b20  6e 65 73 4f 6e 0a 20 20  20 20 20 20 20 20 20 20  |nesOn.          |
00000b30  20 20 20 20 20 20 2a 20  22 6f 66 66 22 20 20 20  |      * "off"   |
00000b40  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000b50  20 20 20 20 20 20 20 2d  3e 20 52 6f 75 74 69 6e  |       -> Routin|
00000b60  65 73 4f 66 66 3b 0a 56  65 72 62 20 6d 65 74 61  |esOff;.Verb meta|
00000b70  20 22 74 69 6d 65 72 73  22 20 22 64 61 65 6d 6f  | "timers" "daemo|
00000b80  6e 73 22 0a 20 20 20 20  20 20 20 20 20 20 20 20  |ns".            |
00000b90  20 20 20 20 2a 20 20 20  20 20 20 20 20 20 20 20  |    *           |
00000ba0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000bb0  20 20 20 20 20 2d 3e 20  54 69 6d 65 72 73 4f 6e  |     -> TimersOn|
00000bc0  0a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
00000bd0  20 2a 20 22 6f 6e 22 20  20 20 20 20 20 20 20 20  | * "on"         |
00000be0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000bf0  20 20 2d 3e 20 54 69 6d  65 72 73 4f 6e 0a 20 20  |  -> TimersOn.  |
00000c00  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2a 20  |              * |
00000c10  22 6f 66 66 22 20 20 20  20 20 20 20 20 20 20 20  |"off"           |
00000c20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2d  |               -|
00000c30  3e 20 54 69 6d 65 72 73  4f 66 66 3b 0a 56 65 72  |> TimersOff;.Ver|
00000c40  62 20 6d 65 74 61 20 22  70 75 72 6c 6f 69 6e 22  |b meta "purloin"|
00000c50  0a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
00000c60  20 2a 20 6d 75 6c 74 69  20 20 20 20 20 20 20 20  | * multi        |
00000c70  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000c80  20 20 2d 3e 20 58 50 75  72 6c 6f 69 6e 3b 0a 56  |  -> XPurloin;.V|
00000c90  65 72 62 20 6d 65 74 61  20 22 61 62 73 74 72 61  |erb meta "abstra|
00000ca0  63 74 22 0a 20 20 20 20  20 20 20 20 20 20 20 20  |ct".            |
00000cb0  20 20 20 20 2a 20 6e 6f  75 6e 20 22 74 6f 22 20  |    * noun "to" |
00000cc0  6e 6f 75 6e 20 20 20 20  20 20 20 20 20 20 20 20  |noun            |
00000cd0  20 20 20 20 20 2d 3e 20  58 41 62 73 74 72 61 63  |     -> XAbstrac|
00000ce0  74 3b 0a 56 65 72 62 20  6d 65 74 61 20 22 74 72  |t;.Verb meta "tr|
00000cf0  65 65 22 0a 20 20 20 20  20 20 20 20 20 20 20 20  |ee".            |
00000d00  20 20 20 20 2a 20 20 20  20 20 20 20 20 20 20 20  |    *           |
00000d10  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000d20  20 20 20 20 20 2d 3e 20  58 54 72 65 65 0a 20 20  |     -> XTree.  |
00000d30  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2a 20  |              * |
00000d40  6e 6f 75 6e 20 20 20 20  20 20 20 20 20 20 20 20  |noun            |
00000d50  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2d  |               -|
00000d60  3e 20 58 54 72 65 65 3b  0a 56 65 72 62 20 6d 65  |> XTree;.Verb me|
00000d70  74 61 20 22 67 6f 74 6f  22 0a 20 20 20 20 20 20  |ta "goto".      |
00000d80  20 20 20 20 20 20 20 20  20 20 2a 20 6e 75 6d 62  |          * numb|
00000d90  65 72 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |er              |
00000da0  20 20 20 20 20 20 20 20  20 20 20 2d 3e 20 47 6f  |           -> Go|
00000db0  74 6f 3b 0a 23 65 6e 64  69 66 3b 0a 0a 21 20 2d  |to;.#endif;..! -|
00000dc0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00000e00  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 0a 21 20 20 41  |-----------.!  A|
00000e10  6e 64 20 6e 6f 77 20 74  68 65 20 67 61 6d 65 20  |nd now the game |
00000e20  76 65 72 62 73 2e 0a 21  20 2d 2d 2d 2d 2d 2d 2d  |verbs..! -------|
00000e30  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00000e70  2d 2d 2d 2d 2d 0a 0a 56  65 72 62 20 22 74 61 6b  |-----..Verb "tak|
00000e80  65 22 20 22 67 65 74 22  0a 20 20 20 20 20 20 20  |e" "get".       |
00000e90  20 20 20 20 20 20 20 20  20 2a 20 22 6f 75 74 22  |         * "out"|
00000ea0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000eb0  20 20 20 20 20 20 20 20  20 20 2d 3e 20 45 78 69  |          -> Exi|
00000ec0  74 0a 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |t.              |
00000ed0  20 20 2a 20 22 6f 66 66  22 20 20 20 20 20 20 20  |  * "off"       |
00000ee0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000ef0  20 20 20 2d 3e 20 45 78  69 74 0a 20 20 20 20 20  |   -> Exit.     |
00000f00  20 20 20 20 20 20 20 20  20 20 20 2a 20 22 75 70  |           * "up|
00000f10  22 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |"               |
00000f20  20 20 20 20 20 20 20 20  20 20 20 20 2d 3e 20 45  |            -> E|
00000f30  78 69 74 0a 20 20 20 20  20 20 20 20 20 20 20 20  |xit.            |
00000f40  20 20 20 20 2a 20 6d 75  6c 74 69 20 20 20 20 20  |    * multi     |
00000f50  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000f60  20 20 20 20 20 2d 3e 20  54 61 6b 65 0a 20 20 20  |     -> Take.   |
00000f70  20 20 20 20 20 20 20 20  20 20 20 20 20 2a 20 6d  |             * m|
00000f80  75 6c 74 69 69 6e 73 69  64 65 20 22 66 72 6f 6d  |ultiinside "from|
00000f90  22 20 6e 6f 75 6e 20 20  20 20 20 20 20 20 2d 3e  |" noun        ->|
00000fa0  20 52 65 6d 6f 76 65 0a  20 20 20 20 20 20 20 20  | Remove.        |
00000fb0  20 20 20 20 20 20 20 20  2a 20 22 69 6e 22 20 6e  |        * "in" n|
00000fc0  6f 75 6e 20 20 20 20 20  20 20 20 20 20 20 20 20  |oun             |
00000fd0  20 20 20 20 20 20 20 20  20 2d 3e 20 45 6e 74 65  |         -> Ente|
00000fe0  72 0a 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |r.              |
00000ff0  20 20 2a 20 22 6f 6e 22  20 6e 6f 75 6e 20 20 20  |  * "on" noun   |
00001000  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001010  20 20 20 2d 3e 20 45 6e  74 65 72 0a 20 20 20 20  |   -> Enter.    |
00001020  20 20 20 20 20 20 20 20  20 20 20 20 2a 20 6d 75  |            * mu|
00001030  6c 74 69 69 6e 73 69 64  65 20 22 6f 66 66 22 20  |ltiinside "off" |
00001040  6e 6f 75 6e 20 20 20 20  20 20 20 20 20 2d 3e 20  |noun         -> |
00001050  52 65 6d 6f 76 65 0a 20  20 20 20 20 20 20 20 20  |Remove.         |
00001060  20 20 20 20 20 20 20 2a  20 22 6f 66 66 22 20 77  |       * "off" w|
00001070  6f 72 6e 20 20 20 20 20  20 20 20 20 20 20 20 20  |orn             |
00001080  20 20 20 20 20 20 20 20  2d 3e 20 44 69 73 72 6f  |        -> Disro|
00001090  62 65 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |be.             |
000010a0  20 20 20 2a 20 22 6f 66  66 22 20 6e 6f 75 6e 20  |   * "off" noun |
000010b0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000010c0  20 20 20 20 2d 3e 20 47  65 74 4f 66 66 0a 20 20  |    -> GetOff.  |
000010d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2a 20  |              * |
000010e0  22 69 6e 76 65 6e 74 6f  72 79 22 20 20 20 20 20  |"inventory"     |
000010f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2d  |               -|
00001100  3e 20 49 6e 76 3b 0a 56  65 72 62 20 22 73 74 61  |> Inv;.Verb "sta|
00001110  6e 64 22 0a 20 20 20 20  20 20 20 20 20 20 20 20  |nd".            |
00001120  20 20 20 20 2a 20 20 20  20 20 20 20 20 20 20 20  |    *           |
00001130  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001140  20 20 20 20 20 2d 3e 20  45 78 69 74 0a 20 20 20  |     -> Exit.   |
00001150  20 20 20 20 20 20 20 20  20 20 20 20 20 2a 20 22  |             * "|
00001160  75 70 22 20 20 20 20 20  20 20 20 20 20 20 20 20  |up"             |
00001170  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2d 3e  |              ->|
00001180  20 45 78 69 74 3b 0a 56  65 72 62 20 22 72 65 6d  | Exit;.Verb "rem|
00001190  6f 76 65 22 0a 20 20 20  20 20 20 20 20 20 20 20  |ove".           |
000011a0  20 20 20 20 20 2a 20 68  65 6c 64 20 20 20 20 20  |     * held     |
000011b0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000011c0  20 20 20 20 20 20 2d 3e  20 44 69 73 72 6f 62 65  |      -> Disrobe|
000011d0  0a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
000011e0  20 2a 20 6d 75 6c 74 69  20 20 20 20 20 20 20 20  | * multi        |
000011f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001200  20 20 2d 3e 20 54 61 6b  65 0a 20 20 20 20 20 20  |  -> Take.      |
00001210  20 20 20 20 20 20 20 20  20 20 2a 20 6d 75 6c 74  |          * mult|
00001220  69 69 6e 73 69 64 65 20  22 66 72 6f 6d 22 20 6e  |iinside "from" n|
00001230  6f 75 6e 20 20 20 20 20  20 20 20 2d 3e 20 52 65  |oun        -> Re|
00001240  6d 6f 76 65 3b 0a 56 65  72 62 20 22 73 68 65 64  |move;.Verb "shed|
00001250  22 20 22 64 6f 66 66 22  20 22 64 69 73 72 6f 62  |" "doff" "disrob|
00001260  65 22 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |e".             |
00001270  20 20 20 2a 20 68 65 6c  64 20 20 20 20 20 20 20  |   * held       |
00001280  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001290  20 20 20 20 2d 3e 20 44  69 73 72 6f 62 65 3b 20  |    -> Disrobe; |
000012a0  0a 56 65 72 62 20 22 77  65 61 72 22 20 22 64 6f  |.Verb "wear" "do|
000012b0  6e 22 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |n".             |
000012c0  20 20 20 2a 20 68 65 6c  64 20 20 20 20 20 20 20  |   * held       |
000012d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000012e0  20 20 20 20 2d 3e 20 57  65 61 72 3b 0a 56 65 72  |    -> Wear;.Ver|
000012f0  62 20 22 70 75 74 22 0a  20 20 20 20 20 20 20 20  |b "put".        |
00001300  20 20 20 20 20 20 20 20  2a 20 6d 75 6c 74 69 65  |        * multie|
00001310  78 63 65 70 74 20 22 69  6e 22 20 6e 6f 75 6e 20  |xcept "in" noun |
00001320  20 20 20 20 20 20 20 20  20 2d 3e 20 49 6e 73 65  |         -> Inse|
00001330  72 74 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |rt.             |
00001340  20 20 20 2a 20 6d 75 6c  74 69 65 78 63 65 70 74  |   * multiexcept|
00001350  20 22 69 6e 73 69 64 65  22 20 6e 6f 75 6e 20 20  | "inside" noun  |
00001360  20 20 20 20 2d 3e 20 49  6e 73 65 72 74 0a 20 20  |    -> Insert.  |
00001370  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2a 20  |              * |
00001380  6d 75 6c 74 69 65 78 63  65 70 74 20 22 69 6e 74  |multiexcept "int|
00001390  6f 22 20 6e 6f 75 6e 20  20 20 20 20 20 20 20 2d  |o" noun        -|
000013a0  3e 20 49 6e 73 65 72 74  0a 20 20 20 20 20 20 20  |> Insert.       |
000013b0  20 20 20 20 20 20 20 20  20 2a 20 6d 75 6c 74 69  |         * multi|
000013c0  65 78 63 65 70 74 20 22  6f 6e 22 20 6e 6f 75 6e  |except "on" noun|
000013d0  20 20 20 20 20 20 20 20  20 20 2d 3e 20 50 75 74  |          -> Put|
000013e0  4f 6e 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |On.             |
000013f0  20 20 20 2a 20 6d 75 6c  74 69 65 78 63 65 70 74  |   * multiexcept|
00001400  20 22 6f 6e 74 6f 22 20  6e 6f 75 6e 20 20 20 20  | "onto" noun    |
00001410  20 20 20 20 2d 3e 20 50  75 74 4f 6e 0a 20 20 20  |    -> PutOn.   |
00001420  20 20 20 20 20 20 20 20  20 20 20 20 20 2a 20 22  |             * "|
00001430  6f 6e 22 20 68 65 6c 64  20 20 20 20 20 20 20 20  |on" held        |
00001440  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2d 3e  |              ->|
00001450  20 57 65 61 72 0a 20 20  20 20 20 20 20 20 20 20  | Wear.          |
00001460  20 20 20 20 20 20 2a 20  22 64 6f 77 6e 22 20 6d  |      * "down" m|
00001470  75 6c 74 69 68 65 6c 64  20 20 20 20 20 20 20 20  |ultiheld        |
00001480  20 20 20 20 20 20 20 2d  3e 20 44 72 6f 70 0a 20  |       -> Drop. |
00001490  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2a  |               *|
000014a0  20 6d 75 6c 74 69 68 65  6c 64 20 22 64 6f 77 6e  | multiheld "down|
000014b0  22 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |"               |
000014c0  2d 3e 20 44 72 6f 70 3b  0a 56 65 72 62 20 22 69  |-> Drop;.Verb "i|
000014d0  6e 73 65 72 74 22 0a 20  20 20 20 20 20 20 20 20  |nsert".         |
000014e0  20 20 20 20 20 20 20 2a  20 6d 75 6c 74 69 65 78  |       * multiex|
000014f0  63 65 70 74 20 22 69 6e  22 20 6e 6f 75 6e 20 20  |cept "in" noun  |
00001500  20 20 20 20 20 20 20 20  2d 3e 20 49 6e 73 65 72  |        -> Inser|
00001510  74 0a 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |t.              |
00001520  20 20 2a 20 6d 75 6c 74  69 65 78 63 65 70 74 20  |  * multiexcept |
00001530  22 69 6e 74 6f 22 20 6e  6f 75 6e 20 20 20 20 20  |"into" noun     |
00001540  20 20 20 2d 3e 20 49 6e  73 65 72 74 3b 0a 56 65  |   -> Insert;.Ve|
00001550  72 62 20 22 65 6d 70 74  79 22 0a 20 20 20 20 20  |rb "empty".     |
00001560  20 20 20 20 20 20 20 20  20 20 20 2a 20 6e 6f 75  |           * nou|
00001570  6e 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |n               |
00001580  20 20 20 20 20 20 20 20  20 20 20 20 2d 3e 20 45  |            -> E|
00001590  6d 70 74 79 0a 20 20 20  20 20 20 20 20 20 20 20  |mpty.           |
000015a0  20 20 20 20 20 2a 20 22  6f 75 74 22 20 6e 6f 75  |     * "out" nou|
000015b0  6e 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |n               |
000015c0  20 20 20 20 20 20 2d 3e  20 45 6d 70 74 79 0a 20  |      -> Empty. |
000015d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2a  |               *|
000015e0  20 6e 6f 75 6e 20 22 6f  75 74 22 20 20 20 20 20  | noun "out"     |
000015f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001600  2d 3e 20 45 6d 70 74 79  0a 20 20 20 20 20 20 20  |-> Empty.       |
00001610  20 20 20 20 20 20 20 20  20 2a 20 6e 6f 75 6e 20  |         * noun |
00001620  22 74 6f 22 20 6e 6f 75  6e 20 20 20 20 20 20 20  |"to" noun       |
00001630  20 20 20 20 20 20 20 20  20 20 2d 3e 20 45 6d 70  |          -> Emp|
00001640  74 79 54 0a 20 20 20 20  20 20 20 20 20 20 20 20  |tyT.            |
00001650  20 20 20 20 2a 20 6e 6f  75 6e 20 22 69 6e 74 6f  |    * noun "into|
00001660  22 20 6e 6f 75 6e 20 20  20 20 20 20 20 20 20 20  |" noun          |
00001670  20 20 20 20 20 2d 3e 20  45 6d 70 74 79 54 0a 20  |     -> EmptyT. |
00001680  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2a  |               *|
00001690  20 6e 6f 75 6e 20 22 6f  6e 22 20 6e 6f 75 6e 20  | noun "on" noun |
000016a0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000016b0  2d 3e 20 45 6d 70 74 79  54 0a 20 20 20 20 20 20  |-> EmptyT.      |
000016c0  20 20 20 20 20 20 20 20  20 20 2a 20 6e 6f 75 6e  |          * noun|
000016d0  20 22 6f 6e 74 6f 22 20  6e 6f 75 6e 20 20 20 20  | "onto" noun    |
000016e0  20 20 20 20 20 20 20 20  20 20 20 2d 3e 20 45 6d  |           -> Em|
000016f0  70 74 79 54 3b 0a 56 65  72 62 20 22 74 72 61 6e  |ptyT;.Verb "tran|
00001700  73 66 65 72 22 0a 20 20  20 20 20 20 20 20 20 20  |sfer".          |
00001710  20 20 20 20 20 20 2a 20  6e 6f 75 6e 20 22 74 6f  |      * noun "to|
00001720  22 20 6e 6f 75 6e 20 20  20 20 20 20 20 20 20 20  |" noun          |
00001730  20 20 20 20 20 20 20 2d  3e 20 54 72 61 6e 73 66  |       -> Transf|
00001740  65 72 3b 0a 56 65 72 62  20 22 64 72 6f 70 22 20  |er;.Verb "drop" |
00001750  22 74 68 72 6f 77 22 20  22 64 69 73 63 61 72 64  |"throw" "discard|
00001760  22 0a 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |".              |
00001770  20 20 2a 20 6d 75 6c 74  69 68 65 6c 64 20 20 20  |  * multiheld   |
00001780  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001790  20 20 20 2d 3e 20 44 72  6f 70 0a 20 20 20 20 20  |   -> Drop.     |
000017a0  20 20 20 20 20 20 20 20  20 20 20 2a 20 6d 75 6c  |           * mul|
000017b0  74 69 65 78 63 65 70 74  20 22 69 6e 22 20 6e 6f  |tiexcept "in" no|
000017c0  75 6e 20 20 20 20 20 20  20 20 20 20 2d 3e 20 49  |un          -> I|
000017d0  6e 73 65 72 74 0a 20 20  20 20 20 20 20 20 20 20  |nsert.          |
000017e0  20 20 20 20 20 20 2a 20  6d 75 6c 74 69 65 78 63  |      * multiexc|
000017f0  65 70 74 20 22 69 6e 74  6f 22 20 6e 6f 75 6e 20  |ept "into" noun |
00001800  20 20 20 20 20 20 20 2d  3e 20 49 6e 73 65 72 74  |       -> Insert|
00001810  0a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
00001820  20 2a 20 6d 75 6c 74 69  65 78 63 65 70 74 20 22  | * multiexcept "|
00001830  6f 6e 22 20 6e 6f 75 6e  20 20 20 20 20 20 20 20  |on" noun        |
00001840  20 20 2d 3e 20 50 75 74  4f 6e 0a 20 20 20 20 20  |  -> PutOn.     |
00001850  20 20 20 20 20 20 20 20  20 20 20 2a 20 6d 75 6c  |           * mul|
00001860  74 69 65 78 63 65 70 74  20 22 6f 6e 74 6f 22 20  |tiexcept "onto" |
00001870  6e 6f 75 6e 20 20 20 20  20 20 20 20 2d 3e 20 50  |noun        -> P|
00001880  75 74 4f 6e 0a 20 20 20  20 20 20 20 20 20 20 20  |utOn.           |
00001890  20 20 20 20 20 2a 20 6d  75 6c 74 69 65 78 63 65  |     * multiexce|
000018a0  70 74 20 22 64 6f 77 6e  22 20 6e 6f 75 6e 20 20  |pt "down" noun  |
000018b0  20 20 20 20 20 20 2d 3e  20 49 6e 73 65 72 74 0a  |      -> Insert.|
000018c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000018d0  2a 20 68 65 6c 64 20 22  61 74 22 20 6e 6f 75 6e  |* held "at" noun|
000018e0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000018f0  20 2d 3e 20 54 68 72 6f  77 41 74 0a 20 20 20 20  | -> ThrowAt.    |
00001900  20 20 20 20 20 20 20 20  20 20 20 20 2a 20 68 65  |            * he|
00001910  6c 64 20 22 61 67 61 69  6e 73 74 22 20 6e 6f 75  |ld "against" nou|
00001920  6e 20 20 20 20 20 20 20  20 20 20 20 20 2d 3e 20  |n            -> |
00001930  54 68 72 6f 77 41 74 3b  0a 56 65 72 62 20 22 67  |ThrowAt;.Verb "g|
00001940  69 76 65 22 20 22 70 61  79 22 20 22 6f 66 66 65  |ive" "pay" "offe|
00001950  72 22 20 22 66 65 65 64  22 0a 20 20 20 20 20 20  |r" "feed".      |
00001960  20 20 20 20 20 20 20 20  20 20 2a 20 63 72 65 61  |          * crea|
00001970  74 75 72 65 20 68 65 6c  64 20 20 20 20 20 20 20  |ture held       |
00001980  20 20 20 20 20 20 20 20  20 20 20 2d 3e 20 47 69  |           -> Gi|
00001990  76 65 52 0a 20 20 20 20  20 20 20 20 20 20 20 20  |veR.            |
000019a0  20 20 20 20 2a 20 68 65  6c 64 20 22 74 6f 22 20  |    * held "to" |
000019b0  63 72 65 61 74 75 72 65  20 20 20 20 20 20 20 20  |creature        |
000019c0  20 20 20 20 20 2d 3e 20  47 69 76 65 0a 20 20 20  |     -> Give.   |
000019d0  20 20 20 20 20 20 20 20  20 20 20 20 20 2a 20 22  |             * "|
000019e0  6f 76 65 72 22 20 68 65  6c 64 20 22 74 6f 22 20  |over" held "to" |
000019f0  63 72 65 61 74 75 72 65  20 20 20 20 20 20 2d 3e  |creature      ->|
00001a00  20 47 69 76 65 3b 0a 56  65 72 62 20 22 73 68 6f  | Give;.Verb "sho|
00001a10  77 22 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |w".             |
00001a20  20 20 20 2a 20 63 72 65  61 74 75 72 65 20 68 65  |   * creature he|
00001a30  6c 64 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |ld              |
00001a40  20 20 20 20 2d 3e 20 53  68 6f 77 52 0a 20 20 20  |    -> ShowR.   |
00001a50  20 20 20 20 20 20 20 20  20 20 20 20 20 2a 20 68  |             * h|
00001a60  65 6c 64 20 22 74 6f 22  20 63 72 65 61 74 75 72  |eld "to" creatur|
00001a70  65 20 20 20 20 20 20 20  20 20 20 20 20 20 2d 3e  |e             ->|
00001a80  20 53 68 6f 77 3b 0a 56  65 72 62 20 22 67 6f 22  | Show;.Verb "go"|
00001a90  20 22 77 61 6c 6b 22 20  22 72 75 6e 22 20 22 6c  | "walk" "run" "l|
00001aa0  65 61 76 65 22 0a 20 20  20 20 20 20 20 20 20 20  |eave".          |
00001ab0  20 20 20 20 20 20 2a 20  20 20 20 20 20 20 20 20  |      *         |
00001ac0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001ad0  20 20 20 20 20 20 20 2d  3e 20 56 61 67 75 65 47  |       -> VagueG|
00001ae0  6f 0a 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |o.              |
00001af0  20 20 2a 20 64 69 72 65  63 74 69 6f 6e 20 20 20  |  * direction   |
00001b00  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001b10  20 20 20 2d 3e 20 47 6f  0a 20 20 20 20 20 20 20  |   -> Go.       |
00001b20  20 20 20 20 20 20 20 20  20 2a 20 6e 6f 75 6e 20  |         * noun |
00001b30  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001b40  20 20 20 20 20 20 20 20  20 20 2d 3e 20 45 6e 74  |          -> Ent|
00001b50  65 72 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |er.             |
00001b60  20 20 20 2a 20 22 69 6e  74 6f 22 20 6e 6f 75 6e  |   * "into" noun|
00001b70  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001b80  20 20 20 20 2d 3e 20 45  6e 74 65 72 0a 20 20 20  |    -> Enter.   |
00001b90  20 20 20 20 20 20 20 20  20 20 20 20 20 2a 20 22  |             * "|
00001ba0  69 6e 22 20 6e 6f 75 6e  20 20 20 20 20 20 20 20  |in" noun        |
00001bb0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2d 3e  |              ->|
00001bc0  20 45 6e 74 65 72 0a 20  20 20 20 20 20 20 20 20  | Enter.         |
00001bd0  20 20 20 20 20 20 20 2a  20 22 69 6e 73 69 64 65  |       * "inside|
00001be0  22 20 6e 6f 75 6e 20 20  20 20 20 20 20 20 20 20  |" noun          |
00001bf0  20 20 20 20 20 20 20 20  2d 3e 20 45 6e 74 65 72  |        -> Enter|
00001c00  0a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
00001c10  20 2a 20 22 74 68 72 6f  75 67 68 22 20 6e 6f 75  | * "through" nou|
00001c20  6e 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |n               |
00001c30  20 20 2d 3e 20 45 6e 74  65 72 3b 0a 56 65 72 62  |  -> Enter;.Verb|
00001c40  20 22 69 6e 76 65 6e 74  6f 72 79 22 20 22 69 6e  | "inventory" "in|
00001c50  76 22 20 22 69 22 0a 20  20 20 20 20 20 20 20 20  |v" "i".         |
00001c60  20 20 20 20 20 20 20 2a  20 20 20 20 20 20 20 20  |       *        |
00001c70  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001c80  20 20 20 20 20 20 20 20  2d 3e 20 49 6e 76 0a 20  |        -> Inv. |
00001c90  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2a  |               *|
00001ca0  20 22 74 61 6c 6c 22 20  20 20 20 20 20 20 20 20  | "tall"         |
00001cb0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001cc0  2d 3e 20 49 6e 76 54 61  6c 6c 0a 20 20 20 20 20  |-> InvTall.     |
00001cd0  20 20 20 20 20 20 20 20  20 20 20 2a 20 22 77 69  |           * "wi|
00001ce0  64 65 22 20 20 20 20 20  20 20 20 20 20 20 20 20  |de"             |
00001cf0  20 20 20 20 20 20 20 20  20 20 20 20 2d 3e 20 49  |            -> I|
00001d00  6e 76 57 69 64 65 3b 0a  56 65 72 62 20 22 6c 6f  |nvWide;.Verb "lo|
00001d10  6f 6b 22 20 22 6c 22 0a  20 20 20 20 20 20 20 20  |ok" "l".        |
00001d20  20 20 20 20 20 20 20 20  2a 20 20 20 20 20 20 20  |        *       |
00001d30  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001d40  20 20 20 20 20 20 20 20  20 2d 3e 20 4c 6f 6f 6b  |         -> Look|
00001d50  0a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
00001d60  20 2a 20 22 61 74 22 20  6e 6f 75 6e 20 20 20 20  | * "at" noun    |
00001d70  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001d80  20 20 2d 3e 20 45 78 61  6d 69 6e 65 0a 20 20 20  |  -> Examine.   |
00001d90  20 20 20 20 20 20 20 20  20 20 20 20 20 2a 20 22  |             * "|
00001da0  69 6e 73 69 64 65 22 20  6e 6f 75 6e 20 20 20 20  |inside" noun    |
00001db0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2d 3e  |              ->|
00001dc0  20 53 65 61 72 63 68 0a  20 20 20 20 20 20 20 20  | Search.        |
00001dd0  20 20 20 20 20 20 20 20  2a 20 22 69 6e 22 20 6e  |        * "in" n|
00001de0  6f 75 6e 20 20 20 20 20  20 20 20 20 20 20 20 20  |oun             |
00001df0  20 20 20 20 20 20 20 20  20 2d 3e 20 53 65 61 72  |         -> Sear|
00001e00  63 68 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |ch.             |
00001e10  20 20 20 2a 20 22 75 6e  64 65 72 22 20 6e 6f 75  |   * "under" nou|
00001e20  6e 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |n               |
00001e30  20 20 20 20 2d 3e 20 4c  6f 6f 6b 55 6e 64 65 72  |    -> LookUnder|
00001e40  0a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
00001e50  20 2a 20 22 74 68 72 6f  75 67 68 22 20 6e 6f 75  | * "through" nou|
00001e60  6e 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |n               |
00001e70  20 20 2d 3e 20 53 65 61  72 63 68 0a 20 20 20 20  |  -> Search.    |
00001e80  20 20 20 20 20 20 20 20  20 20 20 20 2a 20 22 75  |            * "u|
00001e90  70 22 20 73 70 65 63 69  61 6c 20 20 20 20 20 20  |p" special      |
00001ea0  20 20 20 20 20 20 20 20  20 20 20 20 20 2d 3e 20  |             -> |
00001eb0  43 6f 6e 73 75 6c 74 3b  0a 56 65 72 62 20 22 63  |Consult;.Verb "c|
00001ec0  6f 6e 73 75 6c 74 22 20  20 2a 20 6e 6f 75 6e 20  |onsult"  * noun |
00001ed0  22 61 62 6f 75 74 22 20  73 70 65 63 69 61 6c 20  |"about" special |
00001ee0  20 20 20 20 20 20 20 20  20 20 2d 3e 20 43 6f 6e  |          -> Con|
00001ef0  73 75 6c 74 3b 0a 56 65  72 62 20 22 6f 70 65 6e  |sult;.Verb "open|
00001f00  22 20 22 75 6e 77 72 61  70 22 20 22 75 6e 63 6f  |" "unwrap" "unco|
00001f10  76 65 72 22 20 22 75 6e  64 6f 22 0a 20 20 20 20  |ver" "undo".    |
00001f20  20 20 20 20 20 20 20 20  20 20 20 20 2a 20 6e 6f  |            * no|
00001f30  75 6e 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |un              |
00001f40  20 20 20 20 20 20 20 20  20 20 20 20 20 2d 3e 20  |             -> |
00001f50  4f 70 65 6e 0a 20 20 20  20 20 20 20 20 20 20 20  |Open.           |
00001f60  20 20 20 20 20 2a 20 6e  6f 75 6e 20 22 77 69 74  |     * noun "wit|
00001f70  68 22 20 68 65 6c 64 20  20 20 20 20 20 20 20 20  |h" held         |
00001f80  20 20 20 20 20 20 2d 3e  20 55 6e 6c 6f 63 6b 3b  |      -> Unlock;|
00001f90  0a 56 65 72 62 20 22 63  6c 6f 73 65 22 20 22 73  |.Verb "close" "s|
00001fa0  68 75 74 22 20 22 63 6f  76 65 72 22 0a 20 20 20  |hut" "cover".   |
00001fb0  20 20 20 20 20 20 20 20  20 20 20 20 20 2a 20 6e  |             * n|
00001fc0  6f 75 6e 20 20 20 20 20  20 20 20 20 20 20 20 20  |oun             |
00001fd0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2d 3e  |              ->|
00001fe0  20 43 6c 6f 73 65 3b 0a  56 65 72 62 20 22 65 6e  | Close;.Verb "en|
00001ff0  74 65 72 22 20 22 63 72  6f 73 73 22 0a 20 20 20  |ter" "cross".   |
00002000  20 20 20 20 20 20 20 20  20 20 20 20 20 2a 20 20  |             *  |
00002010  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002020  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2d 3e  |              ->|
00002030  20 47 6f 49 6e 0a 20 20  20 20 20 20 20 20 20 20  | GoIn.          |
00002040  20 20 20 20 20 20 2a 20  6e 6f 75 6e 20 20 20 20  |      * noun    |
00002050  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002060  20 20 20 20 20 20 20 2d  3e 20 45 6e 74 65 72 3b  |       -> Enter;|
00002070  0a 56 65 72 62 20 22 73  69 74 22 20 20 20 20 20  |.Verb "sit"     |
00002080  20 2a 20 22 6f 6e 22 20  6e 6f 75 6e 20 20 20 20  | * "on" noun    |
00002090  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000020a0  20 20 2d 3e 20 45 6e 74  65 72 3b 0a 56 65 72 62  |  -> Enter;.Verb|
000020b0  20 22 69 6e 22 20 22 69  6e 73 69 64 65 22 0a 20  | "in" "inside". |
000020c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2a  |               *|
000020d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
000020f0  2d 3e 20 47 6f 49 6e 3b  0a 56 65 72 62 20 22 65  |-> GoIn;.Verb "e|
00002100  78 69 74 22 20 22 6f 75  74 22 20 22 6f 75 74 73  |xit" "out" "outs|
00002110  69 64 65 22 0a 20 20 20  20 20 20 20 20 20 20 20  |ide".           |
00002120  20 20 20 20 20 2a 20 20  20 20 20 20 20 20 20 20  |     *          |
00002130  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002140  20 20 20 20 20 20 2d 3e  20 45 78 69 74 3b 0a 56  |      -> Exit;.V|
00002150  65 72 62 20 22 65 78 61  6d 69 6e 65 22 20 22 78  |erb "examine" "x|
00002160  22 20 22 72 65 61 64 22  20 22 77 61 74 63 68 22  |" "read" "watch"|
00002170  20 22 64 65 73 63 72 69  62 65 22 20 22 63 68 65  | "describe" "che|
00002180  63 6b 22 0a 20 20 20 20  20 20 20 20 20 20 20 20  |ck".            |
00002190  20 20 20 20 2a 20 6e 6f  75 6e 20 20 20 20 20 20  |    * noun      |
000021a0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000021b0  20 20 20 20 20 2d 3e 20  45 78 61 6d 69 6e 65 3b  |     -> Examine;|
000021c0  0a 56 65 72 62 20 22 79  65 73 22 20 22 79 22 0a  |.Verb "yes" "y".|
000021d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000021e0  2a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |*               |
000021f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002200  20 2d 3e 20 59 65 73 3b  0a 56 65 72 62 20 22 6e  | -> Yes;.Verb "n|
00002210  6f 22 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |o".             |
00002220  20 20 20 2a 20 20 20 20  20 20 20 20 20 20 20 20  |   *            |
00002230  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002240  20 20 20 20 2d 3e 20 4e  6f 3b 0a 56 65 72 62 20  |    -> No;.Verb |
00002250  22 73 6f 72 72 79 22 0a  20 20 20 20 20 20 20 20  |"sorry".        |
00002260  20 20 20 20 20 20 20 20  2a 20 20 20 20 20 20 20  |        *       |
00002270  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002280  20 20 20 20 20 20 20 20  20 2d 3e 20 53 6f 72 72  |         -> Sorr|
00002290  79 3b 0a 56 65 72 62 20  22 73 68 69 74 22 20 22  |y;.Verb "shit" "|
000022a0  66 75 63 6b 22 20 22 64  61 6d 6e 22 20 22 73 6f  |fuck" "damn" "so|
000022b0  64 22 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |d".             |
000022c0  20 20 20 2a 20 20 20 20  20 20 20 20 20 20 20 20  |   *            |
000022d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000022e0  20 20 20 20 2d 3e 20 53  74 72 6f 6e 67 0a 20 20  |    -> Strong.  |
000022f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2a 20  |              * |
00002300  73 70 65 63 69 61 6c 20  20 20 20 20 20 20 20 20  |special         |
00002310  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2d  |               -|
00002320  3e 20 53 74 72 6f 6e 67  3b 0a 56 65 72 62 20 22  |> Strong;.Verb "|
00002330  62 6f 74 68 65 72 22 20  22 63 75 72 73 65 73 22  |bother" "curses"|
00002340  20 22 64 72 61 74 22 20  22 64 61 72 6e 22 0a 20  | "drat" "darn". |
00002350  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2a  |               *|
00002360  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00002380  2d 3e 20 4d 69 6c 64 0a  20 20 20 20 20 20 20 20  |-> Mild.        |
00002390  20 20 20 20 20 20 20 20  2a 20 73 70 65 63 69 61  |        * specia|
000023a0  6c 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |l               |
000023b0  20 20 20 20 20 20 20 20  20 2d 3e 20 4d 69 6c 64  |         -> Mild|
000023c0  3b 0a 56 65 72 62 20 22  73 65 61 72 63 68 22 0a  |;.Verb "search".|
000023d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000023e0  2a 20 6e 6f 75 6e 20 20  20 20 20 20 20 20 20 20  |* noun          |
000023f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002400  20 2d 3e 20 53 65 61 72  63 68 3b 0a 56 65 72 62  | -> Search;.Verb|
00002410  20 22 77 61 76 65 22 0a  20 20 20 20 20 20 20 20  | "wave".        |
00002420  20 20 20 20 20 20 20 20  2a 20 20 20 20 20 20 20  |        *       |
00002430  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002440  20 20 20 20 20 20 20 20  20 2d 3e 20 57 61 76 65  |         -> Wave|
00002450  48 61 6e 64 73 0a 20 20  20 20 20 20 20 20 20 20  |Hands.          |
00002460  20 20 20 20 20 20 2a 20  6e 6f 75 6e 20 20 20 20  |      * noun    |
00002470  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002480  20 20 20 20 20 20 20 2d  3e 20 57 61 76 65 3b 0a  |       -> Wave;.|
00002490  56 65 72 62 20 22 73 65  74 22 20 22 61 64 6a 75  |Verb "set" "adju|
000024a0  73 74 22 0a 20 20 20 20  20 20 20 20 20 20 20 20  |st".            |
000024b0  20 20 20 20 2a 20 6e 6f  75 6e 20 20 20 20 20 20  |    * noun      |
000024c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000024d0  20 20 20 20 20 2d 3e 20  53 65 74 0a 20 20 20 20  |     -> Set.    |
000024e0  20 20 20 20 20 20 20 20  20 20 20 20 2a 20 6e 6f  |            * no|
000024f0  75 6e 20 22 74 6f 22 20  73 70 65 63 69 61 6c 20  |un "to" special |
00002500  20 20 20 20 20 20 20 20  20 20 20 20 20 2d 3e 20  |             -> |
00002510  53 65 74 54 6f 3b 0a 56  65 72 62 20 22 70 75 6c  |SetTo;.Verb "pul|
00002520  6c 22 20 22 64 72 61 67  22 0a 20 20 20 20 20 20  |l" "drag".      |
00002530  20 20 20 20 20 20 20 20  20 20 2a 20 6e 6f 75 6e  |          * noun|
00002540  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002550  20 20 20 20 20 20 20 20  20 20 20 2d 3e 20 50 75  |           -> Pu|
00002560  6c 6c 3b 0a 56 65 72 62  20 22 70 75 73 68 22 20  |ll;.Verb "push" |
00002570  22 6d 6f 76 65 22 20 22  73 68 69 66 74 22 20 22  |"move" "shift" "|
00002580  63 6c 65 61 72 22 20 22  70 72 65 73 73 22 0a 20  |clear" "press". |
00002590  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2a  |               *|
000025a0  20 6e 6f 75 6e 20 20 20  20 20 20 20 20 20 20 20  | noun           |
000025b0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000025c0  2d 3e 20 50 75 73 68 0a  20 20 20 20 20 20 20 20  |-> Push.        |
000025d0  20 20 20 20 20 20 20 20  2a 20 6e 6f 75 6e 20 6e  |        * noun n|
000025e0  6f 75 6e 20 20 20 20 20  20 20 20 20 20 20 20 20  |oun             |
000025f0  20 20 20 20 20 20 20 20  20 2d 3e 20 50 75 73 68  |         -> Push|
00002600  44 69 72 0a 20 20 20 20  20 20 20 20 20 20 20 20  |Dir.            |
00002610  20 20 20 20 2a 20 6e 6f  75 6e 20 22 74 6f 22 20  |    * noun "to" |
00002620  6e 6f 75 6e 20 20 20 20  20 20 20 20 20 20 20 20  |noun            |
00002630  20 20 20 20 20 2d 3e 20  54 72 61 6e 73 66 65 72  |     -> Transfer|
00002640  3b 0a 56 65 72 62 20 22  74 75 72 6e 22 20 22 72  |;.Verb "turn" "r|
00002650  6f 74 61 74 65 22 20 22  74 77 69 73 74 22 20 22  |otate" "twist" "|
00002660  75 6e 73 63 72 65 77 22  20 22 73 63 72 65 77 22  |unscrew" "screw"|
00002670  0a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
00002680  20 2a 20 6e 6f 75 6e 20  20 20 20 20 20 20 20 20  | * noun         |
00002690  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000026a0  20 20 2d 3e 20 54 75 72  6e 0a 20 20 20 20 20 20  |  -> Turn.      |
000026b0  20 20 20 20 20 20 20 20  20 20 2a 20 6e 6f 75 6e  |          * noun|
000026c0  20 22 6f 6e 22 20 20 20  20 20 20 20 20 20 20 20  | "on"           |
000026d0  20 20 20 20 20 20 20 20  20 20 20 2d 3e 20 53 77  |           -> Sw|
000026e0  69 74 63 68 6f 6e 0a 20  20 20 20 20 20 20 20 20  |itchon.         |
000026f0  20 20 20 20 20 20 20 2a  20 6e 6f 75 6e 20 22 6f  |       * noun "o|
00002700  66 66 22 20 20 20 20 20  20 20 20 20 20 20 20 20  |ff"             |
00002710  20 20 20 20 20 20 20 20  2d 3e 20 53 77 69 74 63  |        -> Switc|
00002720  68 6f 66 66 0a 20 20 20  20 20 20 20 20 20 20 20  |hoff.           |
00002730  20 20 20 20 20 2a 20 22  6f 6e 22 20 6e 6f 75 6e  |     * "on" noun|
00002740  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002750  20 20 20 20 20 20 2d 3e  20 53 77 69 74 63 68 6f  |      -> Switcho|
00002760  6e 0a 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |n.              |
00002770  20 20 2a 20 22 6f 66 66  22 20 6e 6f 75 6e 20 20  |  * "off" noun  |
00002780  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002790  20 20 20 2d 3e 20 53 77  69 74 63 68 6f 66 66 3b  |   -> Switchoff;|
000027a0  0a 56 65 72 62 20 22 73  77 69 74 63 68 22 0a 20  |.Verb "switch". |
000027b0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2a  |               *|
000027c0  20 6e 6f 75 6e 20 20 20  20 20 20 20 20 20 20 20  | noun           |
000027d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000027e0  2d 3e 20 53 77 69 74 63  68 6f 6e 0a 20 20 20 20  |-> Switchon.    |
000027f0  20 20 20 20 20 20 20 20  20 20 20 20 2a 20 6e 6f  |            * no|
00002800  75 6e 20 22 6f 6e 22 20  20 20 20 20 20 20 20 20  |un "on"         |
00002810  20 20 20 20 20 20 20 20  20 20 20 20 20 2d 3e 20  |             -> |
00002820  53 77 69 74 63 68 6f 6e  0a 20 20 20 20 20 20 20  |Switchon.       |
00002830  20 20 20 20 20 20 20 20  20 2a 20 6e 6f 75 6e 20  |         * noun |
00002840  22 6f 66 66 22 20 20 20  20 20 20 20 20 20 20 20  |"off"           |
00002850  20 20 20 20 20 20 20 20  20 20 2d 3e 20 53 77 69  |          -> Swi|
00002860  74 63 68 6f 66 66 0a 20  20 20 20 20 20 20 20 20  |tchoff.         |
00002870  20 20 20 20 20 20 20 2a  20 22 6f 6e 22 20 6e 6f  |       * "on" no|
00002880  75 6e 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |un              |
00002890  20 20 20 20 20 20 20 20  2d 3e 20 53 77 69 74 63  |        -> Switc|
000028a0  68 6f 6e 0a 20 20 20 20  20 20 20 20 20 20 20 20  |hon.            |
000028b0  20 20 20 20 2a 20 22 6f  66 66 22 20 6e 6f 75 6e  |    * "off" noun|
000028c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000028d0  20 20 20 20 20 2d 3e 20  53 77 69 74 63 68 6f 66  |     -> Switchof|
000028e0  66 3b 0a 56 65 72 62 20  22 6c 6f 63 6b 22 0a 20  |f;.Verb "lock". |
000028f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2a  |               *|
00002900  20 6e 6f 75 6e 20 22 77  69 74 68 22 20 68 65 6c  | noun "with" hel|
00002910  64 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |d               |
00002920  2d 3e 20 4c 6f 63 6b 3b  0a 56 65 72 62 20 22 75  |-> Lock;.Verb "u|
00002930  6e 6c 6f 63 6b 22 0a 20  20 20 20 20 20 20 20 20  |nlock".         |
00002940  20 20 20 20 20 20 20 2a  20 6e 6f 75 6e 20 22 77  |       * noun "w|
00002950  69 74 68 22 20 68 65 6c  64 20 20 20 20 20 20 20  |ith" held       |
00002960  20 20 20 20 20 20 20 20  2d 3e 20 55 6e 6c 6f 63  |        -> Unloc|
00002970  6b 3b 0a 56 65 72 62 20  22 61 74 74 61 63 6b 22  |k;.Verb "attack"|
00002980  20 22 62 72 65 61 6b 22  20 22 73 6d 61 73 68 22  | "break" "smash"|
00002990  20 22 68 69 74 22 20 22  66 69 67 68 74 22 20 22  | "hit" "fight" "|
000029a0  77 72 65 63 6b 22 0a 20  20 20 20 20 22 63 72 61  |wreck".     "cra|
000029b0  63 6b 22 20 22 64 65 73  74 72 6f 79 22 20 22 6d  |ck" "destroy" "m|
000029c0  75 72 64 65 72 22 20 22  6b 69 6c 6c 22 20 22 74  |urder" "kill" "t|
000029d0  6f 72 74 75 72 65 22 0a  20 20 20 20 20 20 20 20  |orture".        |
000029e0  20 20 20 20 20 20 20 20  2a 20 6e 6f 75 6e 20 20  |        * noun  |
000029f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002a00  20 20 20 20 20 20 20 20  20 2d 3e 20 41 74 74 61  |         -> Atta|
00002a10  63 6b 3b 0a 56 65 72 62  20 22 77 61 69 74 22 20  |ck;.Verb "wait" |
00002a20  22 7a 22 0a 20 20 20 20  20 20 20 20 20 20 20 20  |"z".            |
00002a30  20 20 20 20 2a 20 20 20  20 20 20 20 20 20 20 20  |    *           |
00002a40  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002a50  20 20 20 20 20 2d 3e 20  57 61 69 74 3b 0a 56 65  |     -> Wait;.Ve|
00002a60  72 62 20 22 61 6e 73 77  65 72 22 20 22 73 61 79  |rb "answer" "say|
00002a70  22 20 22 73 68 6f 75 74  22 20 22 73 70 65 61 6b  |" "shout" "speak|
00002a80  22 0a 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |".              |
00002a90  20 20 2a 20 73 70 65 63  69 61 6c 20 22 74 6f 22  |  * special "to"|
00002aa0  20 63 72 65 61 74 75 72  65 20 20 20 20 20 20 20  | creature       |
00002ab0  20 20 20 2d 3e 20 41 6e  73 77 65 72 3b 0a 56 65  |   -> Answer;.Ve|
00002ac0  72 62 20 22 61 73 6b 22  0a 20 20 20 20 20 20 20  |rb "ask".       |
00002ad0  20 20 20 20 20 20 20 20  20 2a 20 63 72 65 61 74  |         * creat|
00002ae0  75 72 65 20 22 61 62 6f  75 74 22 20 73 70 65 63  |ure "about" spec|
00002af0  69 61 6c 20 20 20 20 20  20 20 2d 3e 20 41 73 6b  |ial       -> Ask|
00002b00  3b 0a 56 65 72 62 20 22  65 61 74 22 0a 20 20 20  |;.Verb "eat".   |
00002b10  20 20 20 20 20 20 20 20  20 20 20 20 20 2a 20 68  |             * h|
00002b20  65 6c 64 20 20 20 20 20  20 20 20 20 20 20 20 20  |eld             |
00002b30  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2d 3e  |              ->|
00002b40  20 45 61 74 3b 0a 56 65  72 62 20 22 73 6c 65 65  | Eat;.Verb "slee|
00002b50  70 22 20 22 6e 61 70 22  0a 20 20 20 20 20 20 20  |p" "nap".       |
00002b60  20 20 20 20 20 20 20 20  20 2a 20 20 20 20 20 20  |         *      |
00002b70  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002b80  20 20 20 20 20 20 20 20  20 20 2d 3e 20 53 6c 65  |          -> Sle|
00002b90  65 70 3b 0a 56 65 72 62  20 22 70 65 65 6c 22 0a  |ep;.Verb "peel".|
00002ba0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002bb0  2a 20 6e 6f 75 6e 20 20  20 20 20 20 20 20 20 20  |* noun          |
00002bc0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002bd0  20 2d 3e 20 54 61 6b 65  0a 20 20 20 20 20 20 20  | -> Take.       |
00002be0  20 20 20 20 20 20 20 20  20 2a 20 22 6f 66 66 22  |         * "off"|
00002bf0  20 6e 6f 75 6e 20 20 20  20 20 20 20 20 20 20 20  | noun           |
00002c00  20 20 20 20 20 20 20 20  20 20 2d 3e 20 54 61 6b  |          -> Tak|
00002c10  65 3b 0a 56 65 72 62 20  22 73 69 6e 67 22 0a 20  |e;.Verb "sing". |
00002c20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2a  |               *|
00002c30  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00002c50  2d 3e 20 53 69 6e 67 3b  0a 56 65 72 62 20 22 63  |-> Sing;.Verb "c|
00002c60  6c 69 6d 62 22 20 22 73  63 61 6c 65 22 0a 20 20  |limb" "scale".  |
00002c70  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2a 20  |              * |
00002c80  6e 6f 75 6e 20 20 20 20  20 20 20 20 20 20 20 20  |noun            |
00002c90  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2d  |               -|
00002ca0  3e 20 43 6c 69 6d 62 3b  0a 56 65 72 62 20 22 62  |> Climb;.Verb "b|
00002cb0  75 79 22 20 22 70 75 72  63 68 61 73 65 22 0a 20  |uy" "purchase". |
00002cc0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2a  |               *|
00002cd0  20 73 70 65 63 69 61 6c  20 20 20 20 20 20 20 20  | special        |
00002ce0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002cf0  2d 3e 20 42 75 79 3b 0a  56 65 72 62 20 22 73 71  |-> Buy;.Verb "sq|
00002d00  75 65 65 7a 65 22 20 22  73 71 75 61 73 68 22 0a  |ueeze" "squash".|
00002d10  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002d20  2a 20 6e 6f 75 6e 20 20  20 20 20 20 20 20 20 20  |* noun          |
00002d30  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002d40  20 2d 3e 20 53 71 75 65  65 7a 65 3b 0a 56 65 72  | -> Squeeze;.Ver|
00002d50  62 20 22 73 77 69 6d 22  20 22 64 69 76 65 22 0a  |b "swim" "dive".|
00002d60  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002d70  2a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |*               |
00002d80  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002d90  20 2d 3e 20 53 77 69 6d  3b 0a 56 65 72 62 20 22  | -> Swim;.Verb "|
00002da0  73 77 69 6e 67 22 0a 20  20 20 20 20 20 20 20 20  |swing".         |
00002db0  20 20 20 20 20 20 20 2a  20 6e 6f 75 6e 20 20 20  |       * noun   |
00002dc0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002dd0  20 20 20 20 20 20 20 20  2d 3e 20 53 77 69 6e 67  |        -> Swing|
00002de0  0a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
00002df0  20 2a 20 22 6f 6e 22 20  6e 6f 75 6e 20 20 20 20  | * "on" noun    |
00002e00  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002e10  20 20 2d 3e 20 53 77 69  6e 67 3b 0a 56 65 72 62  |  -> Swing;.Verb|
00002e20  20 22 62 6c 6f 77 22 0a  20 20 20 20 20 20 20 20  | "blow".        |
00002e30  20 20 20 20 20 20 20 20  2a 20 68 65 6c 64 20 20  |        * held  |
00002e40  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002e50  20 20 20 20 20 20 20 20  20 2d 3e 20 42 6c 6f 77  |         -> Blow|
00002e60  3b 0a 56 65 72 62 20 22  70 72 61 79 22 0a 20 20  |;.Verb "pray".  |
00002e70  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2a 20  |              * |
00002e80  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002e90  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2d  |               -|
00002ea0  3e 20 50 72 61 79 3b 0a  56 65 72 62 20 22 77 61  |> Pray;.Verb "wa|
00002eb0  6b 65 22 20 22 61 77 61  6b 65 22 20 22 61 77 61  |ke" "awake" "awa|
00002ec0  6b 65 6e 22 0a 20 20 20  20 20 20 20 20 20 20 20  |ken".           |
00002ed0  20 20 20 20 20 2a 20 20  20 20 20 20 20 20 20 20  |     *          |
00002ee0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002ef0  20 20 20 20 20 20 2d 3e  20 57 61 6b 65 0a 20 20  |      -> Wake.  |
00002f00  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2a 20  |              * |
00002f10  22 75 70 22 20 20 20 20  20 20 20 20 20 20 20 20  |"up"            |
00002f20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2d  |               -|
00002f30  3e 20 57 61 6b 65 0a 20  20 20 20 20 20 20 20 20  |> Wake.         |
00002f40  20 20 20 20 20 20 20 2a  20 63 72 65 61 74 75 72  |       * creatur|
00002f50  65 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |e               |
00002f60  20 20 20 20 20 20 20 20  2d 3e 20 57 61 6b 65 4f  |        -> WakeO|
00002f70  74 68 65 72 0a 20 20 20  20 20 20 20 20 20 20 20  |ther.           |
00002f80  20 20 20 20 20 2a 20 22  75 70 22 20 63 72 65 61  |     * "up" crea|
00002f90  74 75 72 65 20 20 20 20  20 20 20 20 20 20 20 20  |ture            |
00002fa0  20 20 20 20 20 20 2d 3e  20 57 61 6b 65 4f 74 68  |      -> WakeOth|
00002fb0  65 72 3b 0a 56 65 72 62  20 22 6b 69 73 73 22 20  |er;.Verb "kiss" |
00002fc0  22 65 6d 62 72 61 63 65  22 20 22 68 75 67 22 0a  |"embrace" "hug".|
00002fd0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002fe0  2a 20 63 72 65 61 74 75  72 65 20 20 20 20 20 20  |* creature      |
00002ff0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003000  20 2d 3e 20 4b 69 73 73  3b 0a 56 65 72 62 20 22  | -> Kiss;.Verb "|
00003010  74 68 69 6e 6b 22 0a 20  20 20 20 20 20 20 20 20  |think".         |
00003020  20 20 20 20 20 20 20 2a  20 20 20 20 20 20 20 20  |       *        |
00003030  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003040  20 20 20 20 20 20 20 20  2d 3e 20 54 68 69 6e 6b  |        -> Think|
00003050  3b 0a 56 65 72 62 20 22  73 6d 65 6c 6c 22 20 22  |;.Verb "smell" "|
00003060  73 6e 69 66 66 22 0a 20  20 20 20 20 20 20 20 20  |sniff".         |
00003070  20 20 20 20 20 20 20 2a  20 20 20 20 20 20 20 20  |       *        |
00003080  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003090  20 20 20 20 20 20 20 20  2d 3e 20 53 6d 65 6c 6c  |        -> Smell|
000030a0  0a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
000030b0  20 2a 20 6e 6f 75 6e 20  20 20 20 20 20 20 20 20  | * noun         |
000030c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000030d0  20 20 2d 3e 20 53 6d 65  6c 6c 3b 0a 56 65 72 62  |  -> Smell;.Verb|
000030e0  20 22 68 65 61 72 22 20  22 6c 69 73 74 65 6e 22  | "hear" "listen"|
000030f0  0a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
00003100  20 2a 20 20 20 20 20 20  20 20 20 20 20 20 20 20  | *              |
00003110  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003120  20 20 2d 3e 20 4c 69 73  74 65 6e 0a 20 20 20 20  |  -> Listen.    |
00003130  20 20 20 20 20 20 20 20  20 20 20 20 2a 20 6e 6f  |            * no|
00003140  75 6e 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |un              |
00003150  20 20 20 20 20 20 20 20  20 20 20 20 20 2d 3e 20  |             -> |
00003160  4c 69 73 74 65 6e 0a 20  20 20 20 20 20 20 20 20  |Listen.         |
00003170  20 20 20 20 20 20 20 2a  20 22 74 6f 22 20 6e 6f  |       * "to" no|
00003180  75 6e 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |un              |
00003190  20 20 20 20 20 20 20 20  2d 3e 20 4c 69 73 74 65  |        -> Liste|
000031a0  6e 3b 0a 56 65 72 62 20  22 74 61 73 74 65 22 0a  |n;.Verb "taste".|
000031b0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000031c0  2a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |*               |
000031d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000031e0  20 2d 3e 20 54 61 73 74  65 3b 0a 56 65 72 62 20  | -> Taste;.Verb |
000031f0  22 74 6f 75 63 68 22 20  22 66 6f 6e 64 6c 65 22  |"touch" "fondle"|
00003200  20 22 66 65 65 6c 22 20  22 67 72 6f 70 65 22 0a  | "feel" "grope".|
00003210  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003220  2a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |*               |
00003230  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003240  20 2d 3e 20 54 6f 75 63  68 0a 20 20 20 20 20 20  | -> Touch.      |
00003250  20 20 20 20 20 20 20 20  20 20 2a 20 6e 6f 75 6e  |          * noun|
00003260  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003270  20 20 20 20 20 20 20 20  20 20 20 2d 3e 20 54 6f  |           -> To|
00003280  75 63 68 54 68 69 6e 67  3b 0a 56 65 72 62 20 22  |uchThing;.Verb "|
00003290  72 75 62 22 20 22 73 68  69 6e 65 22 20 22 70 6f  |rub" "shine" "po|
000032a0  6c 69 73 68 22 20 22 73  77 65 65 70 22 20 22 63  |lish" "sweep" "c|
000032b0  6c 65 61 6e 22 20 22 64  75 73 74 22 20 22 77 69  |lean" "dust" "wi|
000032c0  70 65 22 20 22 73 63 72  75 62 22 0a 20 20 20 20  |pe" "scrub".    |
000032d0  20 20 20 20 20 20 20 20  20 20 20 20 2a 20 6e 6f  |            * no|
000032e0  75 6e 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |un              |
000032f0  20 20 20 20 20 20 20 20  20 20 20 20 20 2d 3e 20  |             -> |
00003300  52 75 62 3b 0a 56 65 72  62 20 22 74 69 65 22 20  |Rub;.Verb "tie" |
00003310  22 61 74 74 61 63 68 22  20 22 66 61 73 74 65 6e  |"attach" "fasten|
00003320  22 20 22 66 69 78 22 0a  20 20 20 20 20 20 20 20  |" "fix".        |
00003330  20 20 20 20 20 20 20 20  2a 20 6e 6f 75 6e 20 20  |        * noun  |
00003340  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003350  20 20 20 20 20 20 20 20  20 2d 3e 20 54 69 65 0a  |         -> Tie.|
00003360  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003370  2a 20 6e 6f 75 6e 20 22  74 6f 22 20 6e 6f 75 6e  |* noun "to" noun|
00003380  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003390  20 2d 3e 20 54 69 65 3b  0a 56 65 72 62 20 22 62  | -> Tie;.Verb "b|
000033a0  75 72 6e 22 20 22 6c 69  67 68 74 22 0a 20 20 20  |urn" "light".   |
000033b0  20 20 20 20 20 20 20 20  20 20 20 20 20 2a 20 6e  |             * n|
000033c0  6f 75 6e 20 20 20 20 20  20 20 20 20 20 20 20 20  |oun             |
000033d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2d 3e  |              ->|
000033e0  20 42 75 72 6e 0a 20 20  20 20 20 20 20 20 20 20  | Burn.          |
000033f0  20 20 20 20 20 20 2a 20  6e 6f 75 6e 20 22 77 69  |      * noun "wi|
00003400  74 68 22 20 68 65 6c 64  20 20 20 20 20 20 20 20  |th" held        |
00003410  20 20 20 20 20 20 20 2d  3e 20 42 75 72 6e 3b 0a  |       -> Burn;.|
00003420  56 65 72 62 20 22 64 72  69 6e 6b 22 20 22 73 77  |Verb "drink" "sw|
00003430  61 6c 6c 6f 77 22 20 22  73 69 70 22 0a 20 20 20  |allow" "sip".   |
00003440  20 20 20 20 20 20 20 20  20 20 20 20 20 2a 20 6e  |             * n|
00003450  6f 75 6e 20 20 20 20 20  20 20 20 20 20 20 20 20  |oun             |
00003460  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2d 3e  |              ->|
00003470  20 44 72 69 6e 6b 3b 0a  56 65 72 62 20 22 66 69  | Drink;.Verb "fi|
00003480  6c 6c 22 0a 20 20 20 20  20 20 20 20 20 20 20 20  |ll".            |
00003490  20 20 20 20 2a 20 6e 6f  75 6e 20 20 20 20 20 20  |    * noun      |
000034a0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000034b0  20 20 20 20 20 2d 3e 20  46 69 6c 6c 3b 0a 56 65  |     -> Fill;.Ve|
000034c0  72 62 20 22 63 75 74 22  20 22 73 6c 69 63 65 22  |rb "cut" "slice"|
000034d0  20 22 70 72 75 6e 65 22  20 22 63 68 6f 70 22 0a  | "prune" "chop".|
000034e0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000034f0  2a 20 6e 6f 75 6e 20 20  20 20 20 20 20 20 20 20  |* noun          |
00003500  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003510  20 2d 3e 20 43 75 74 3b  0a 56 65 72 62 20 22 6a  | -> Cut;.Verb "j|
00003520  75 6d 70 22 20 22 73 6b  69 70 22 20 22 68 6f 70  |ump" "skip" "hop|
00003530  22 0a 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |".              |
00003540  20 20 2a 20 20 20 20 20  20 20 20 20 20 20 20 20  |  *             |
00003550  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003560  20 20 20 2d 3e 20 4a 75  6d 70 0a 20 20 20 20 20  |   -> Jump.     |
00003570  20 20 20 20 20 20 20 20  20 20 20 2a 20 22 6f 76  |           * "ov|
00003580  65 72 22 20 6e 6f 75 6e  20 20 20 20 20 20 20 20  |er" noun        |
00003590  20 20 20 20 20 20 20 20  20 20 20 20 2d 3e 20 4a  |            -> J|
000035a0  75 6d 70 4f 76 65 72 3b  0a 0a 21 20 2d 2d 2d 2d  |umpOver;..! ----|
000035b0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
000035f0  2d 2d 2d 2d 2d 2d 2d 2d  0a 21 20 20 46 69 6e 61  |--------.!  Fina|
00003600  6c 20 74 61 73 6b 3a 20  70 72 6f 76 69 64 65 20  |l task: provide |
00003610  74 72 69 76 69 61 6c 20  72 6f 75 74 69 6e 65 73  |trivial routines|
00003620  20 69 66 20 74 68 65 20  75 73 65 72 20 68 61 73  | if the user has|
00003630  6e 27 74 20 61 6c 72 65  61 64 79 3a 0a 21 20 2d  |n't already:.! -|
00003640  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00003680  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 0a 0a 23 53 74  |-----------..#St|
00003690  75 62 20 54 69 6d 65 50  61 73 73 65 73 20 20 20  |ub TimePasses   |
000036a0  20 20 20 30 3b 0a 23 53  74 75 62 20 41 6d 75 73  |   0;.#Stub Amus|
000036b0  69 6e 67 20 20 20 20 20  20 20 20 20 30 3b 0a 23  |ing         0;.#|
000036c0  53 74 75 62 20 44 65 61  74 68 4d 65 73 73 61 67  |Stub DeathMessag|
000036d0  65 20 20 20 20 30 3b 0a  23 53 74 75 62 20 44 61  |e    0;.#Stub Da|
000036e0  72 6b 54 6f 44 61 72 6b  20 20 20 20 20 20 30 3b  |rkToDark      0;|
000036f0  0a 23 53 74 75 62 20 4e  65 77 52 6f 6f 6d 20 20  |.#Stub NewRoom  |
00003700  20 20 20 20 20 20 20 30  3b 0a 23 53 74 75 62 20  |       0;.#Stub |
00003710  4c 6f 6f 6b 52 6f 75 74  69 6e 65 20 20 20 20 20  |LookRoutine     |
00003720  30 3b 0a 23 53 74 75 62  20 41 66 74 65 72 4c 69  |0;.#Stub AfterLi|
00003730  66 65 20 20 20 20 20 20  20 30 3b 0a 23 53 74 75  |fe       0;.#Stu|
00003740  62 20 47 61 6d 65 50 72  65 52 6f 75 74 69 6e 65  |b GamePreRoutine|
00003750  20 20 30 3b 0a 23 53 74  75 62 20 47 61 6d 65 50  |  0;.#Stub GameP|
00003760  6f 73 74 52 6f 75 74 69  6e 65 20 30 3b 0a 23 53  |ostRoutine 0;.#S|
00003770  74 75 62 20 50 72 69 6e  74 52 61 6e 6b 20 20 20  |tub PrintRank   |
00003780  20 20 20 20 31 3b 0a 23  53 74 75 62 20 50 72 69  |    1;.#Stub Pri|
00003790  6e 74 54 61 73 6b 4e 61  6d 65 20 20 20 31 3b 0a  |ntTaskName   1;.|
000037a0  23 53 74 75 62 20 49 6e  53 63 6f 70 65 20 20 20  |#Stub InScope   |
000037b0  20 20 20 20 20 20 31 3b  0a 23 53 74 75 62 20 55  |      1;.#Stub U|
000037c0  6e 6b 6e 6f 77 6e 56 65  72 62 20 20 20 20 20 31  |nknownVerb     1|
000037d0  3b 0a 23 53 74 75 62 20  50 72 69 6e 74 56 65 72  |;.#Stub PrintVer|
000037e0  62 20 20 20 20 20 20 20  31 3b 0a 23 53 74 75 62  |b       1;.#Stub|
000037f0  20 50 61 72 73 65 72 45  72 72 6f 72 20 20 20 20  | ParserError    |
00003800  20 31 3b 0a 23 53 74 75  62 20 50 61 72 73 65 4e  | 1;.#Stub ParseN|
00003810  75 6d 62 65 72 20 20 20  20 20 32 3b 0a 0a 21 20  |umber     2;..! |
00003820  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00003860  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 0a           |------------.|
0000386d