I only found some fragments:
echo off
echo GC: Grammar Compiler version 0.001
echo for use by authorized Sierra programmers only
echo requires MASM assembler
echo -
echo compiling Parser grammar grammar.txt to vocab.900...
masm -ml -s -t -z -w2 grammar.txt,grammar.o > gc.log;
link grammar.o; >> gc.log
exe2bin grammar vocab.900 >> gc.log
del grammar.o >> gc.log
del grammar.exe >> gc.log
echo done.
echo here is the log file gc.log:
more < gc.log
INCLUDE nlsyms.txt
_DATA segment
org 0
;;;
;;; Mark as a VOCAB file
;;;
db 86h,0
;;;
;;; Here comes the Parser NL Grammar
;;;
dw NLS, NLROOT,NLVP, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;;;
;;;******************* VP *******************
;;;
;shoot
dw NLVP, NLROOT,NLCVERB, NULL ,NULL, NULL,NULL, NULL,NULL,NULL
;put board down
dw NLVP, NLROOT,NLCVERB, NLDOBJ,NLNP, NLMOD,NLPREP, NULL,NULL,NULL
;hit board lightly
dw NLVP, NLROOT,NLCVERB, NLDOBJ,NLNP, NLMOD,NLADV, NULL,NULL,NULL
;talk dwarf
dw NLVP, NLROOT,NLCVERB, NLDOBJ,NLNP, NULL,NULL, NULL,NULL,NULL
;talk to dwarf: DO=dwarf
dw NLVP, NLROOT,NLCVERB, NLDOBJ,NLAP, NULL,NULL, NULL,NULL,NULL
;give gold to dwarf: DO=gold IO=dwarf
dw NLVP, NLROOT,NLCVERB, NLDOBJ,NLNP, NLIOBJ,NLAP, NULL,NULL,NULL
;give dwarf the gold: IO=dwarf DO=gold (same as above)
dw NLVP, NLROOT,NLCVERB, NLIOBJ,NLNP, NLDOBJ,NLNP, NULL,NULL,NULL
;burger
dw NLVP, NLDOBJ,NLNP, NULL ,NULL, NULL,NULL, NULL,NULL,NULL
;burger with fries
dw NLVP, NLDOBJ,NLNP, NLIOBJ,NLAP, NULL,NULL, NULL,NULL,NULL
; WITH FRIES or IN THE TRUNK
;dw NLVP, NLIOBJ,NLAP, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;???
;dw NLVP, NLMOD ,NLCVERB, NLROOT,NLVP, NULL,NULL, NULL,NULL,NULL
;;;
;;;******************* NP *******************
;;;
;the book
dw NLNP, NLIGNR,NLART, NLROOT,NLCNOUN, NULL,NULL, NULL,NULL,NULL
;the red book
dw NLNP, NLIGNR,NLART, NLMOD ,NLCADJ, NLROOT,NLCNOUN, NULL,NULL,NULL
;red book
dw NLNP, NLMOD ,NLCADJ, NLROOT,NLCNOUN, NULL,NULL, NULL,NULL,NULL
;red
dw NLNP, NLROOT,NLCADJ, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;book
dw NLNP, NLROOT,NLCNOUN, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;???
;dw NLNP, NLROOT,NLCNOUN, NLMOD,NLASS, NLMOD,NLNP, NULL,NULL,NULL
;???
;dw NLNP, NLIGNR,NLASS, NLROOT,NLNP, NULL,NULL, NULL,NULL,NULL
;;;
;;;******************* AP *******************
;;;
;put rock UNDER BRIDGE
dw NLAP, NLMOD ,NLPREP, NLROOT,NLNP, NULL,NULL, NULL,NULL,NULL
;give book TO DWARF
dw NLAP, NLMOD ,NLASS, NLROOT,NLNP, NULL,NULL, NULL,NULL,NULL
;ask maid TO DO THE BED
dw NLAP, NLMOD ,NLASS, NLROOT,NLAUXV, NLMOD ,NLNP, NULL,NULL,NULL
;ask child TO BE QUIET
dw NLAP, NLMOD ,NLASS, NLROOT,NLAUXV, NLMOD ,NLADJ, NULL,NULL,NULL
;"sleep" in "do fairies sleep" spec: 'do/fairies/sleep'
dw NLAP, NLROOT,NLCVERB, NULL ,NULL, NULL,NULL, NULL,NULL,NULL
;say the body IS IN THE TRUNK
dw NLAP, NLMOD,NLCVERB, NLROOT,NLAP, NULL,NULL, NULL,NULL,NULL
;???
;dw NLAP, NLROOT,NLNP, NULL ,NULL, NULL,NULL, NULL,NULL,NULL
;dw NLAP, NLROOT,NLVP, NULL ,NULL, NULL,NULL, NULL,NULL,NULL
;;;
;;;******************* CNOUN *******************
;;;
;bow and arrows
dw NLCNOUN, NLROOT,NLNOUN, NLIGNR,NLCONJ, NLROOT,NLCNOUN, NULL,NULL,NULL
;prison guard jacket
dw NLCNOUN, NLMOD ,NLNOUN, NLROOT,NLCNOUN, NULL,NULL, NULL,NULL,NULL
;jacket
dw NLCNOUN, NLROOT,NLNOUN, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;;;
;;;******************* CVERB *******************
;;;
;go swim
dw NLCVERB, NLMOD ,NLAUXV, NLROOT,NLCVERB, NULL,NULL, NULL,NULL,NULL
;did you see
dw NLCVERB, NLMOD ,NLAUXV, NLMOD ,NLNOUN, NLROOT,NLCVERB, NULL,NULL,NULL
;put
dw NLCVERB, NLROOT,NLVERB, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;put down
dw NLCVERB, NLROOT,NLVERB, NLMOD ,NLPREP, NULL,NULL, NULL,NULL,NULL
;lie down on
dw NLCVERB, NLROOT,NLVERB, NLMOD ,NLPREP, NLMOD ,NLPREP, NULL,NULL,NULL
;swim quickly
dw NLCVERB, NLROOT,NLVERB, NLMOD ,NLADV, NULL,NULL, NULL,NULL,NULL
;HOW MUCH IS dinner : 'is<much<how/dinner'
dw NLCVERB, NLMOD ,NLADV, NLMOD ,NLADV, NLROOT,NLCVERB, NULL,NULL,NULL
;soundly sleep
;what did you see
dw NLCVERB, NLMOD ,NLADV, NLROOT,NLCVERB, NULL,NULL, NULL,NULL,NULL
;how
dw NLCVERB, NLROOT,NLADV, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;"what time is" in "what time is it" spec: 'is<what<time'
dw NLCVERB, NLMOD ,NLADV, NLMOD ,NLNOUN, NLROOT,NLCVERB, NULL,NULL,NULL
;do fairies sleep
;dw NLCVERB, NLMOD ,NLVERB, NLMOD ,NLNOUN, NLROOT,NLCVERB, NULL,NULL,NULL
;;;
;;;******************* CADJ *******************
;;;
;green
dw NLCADJ, NLROOT,NLADJ, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;dark green
dw NLCADJ, NLMOD ,NLADJ, NLROOT,NLCADJ, NULL,NULL, NULL,NULL,NULL
;;;
;;;******************* VOCAB POINTERS *******************
;;;
dw NLADV, NLVOCAB,ADV, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLVERB, NLVOCAB,VERB, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLVERB, NLVOCAB,AUXV, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLAUXV, NLVOCAB,AUXV, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLNOUN, NLVOCAB,NOUN, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLPRON, NLVOCAB,PRON, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLADJ, NLVOCAB,ADJ, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLART, NLVOCAB,ART, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLPREP, NLVOCAB,POS, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLASS, NLVOCAB,ASS, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLCONJ, NLVOCAB,CONJ, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NULL, NULL,NULL, NULL,NULL, NULL,NULL, NULL,NULL,NULL
_DATA ends
end
INCLUDE nlsyms.txt
_DATA segment
org 0
;;;
;;; Mark as a VOCAB file
;;;
db 86h,0
;;;
;;; Here comes the Parser NL Grammar
;;;
dw NLS, NLROOT,NLVP, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;;;
;;;******************* VP *******************
;;;
;shoot
dw NLVP, NLROOT,NLCVERB, NULL ,NULL, NULL,NULL, NULL,NULL,NULL
;put board down = put<down/board
dw NLVP, NLROOT,NLCVERB, NLDOBJ,NLNP, NLMOD,NLPREP, NULL,NULL,NULL
;color the paper red
dw NLVP, NLROOT,NLCVERB, NLDOBJ,NLNP, NLMOD,NLCADJ, NULL,NULL,NULL
;hit board lightly
dw NLVP, NLROOT,NLCVERB, NLDOBJ,NLNP, NLMOD,NLADV, NULL,NULL,NULL
;talk to dwarf
;put down board = put<down/board
dw NLVP, NLROOT,NLCVERB, NLDOBJ,NLNP, NULL,NULL, NULL,NULL,NULL
;give gold to dwarf = 'give<to/gold/dwarf'
;put rock under bridge = 'put<under/rock/bridge'
dw NLVP, NLROOT,NLCVERB, NLDOBJ,NLNP, NLMOD,NLPREP, NLIOBJ,NLNP,NULL
;give dwarf the gold: IO=dwarf DO=gold (same as above) 'give/gold/dwarf'
dw NLVP, NLROOT,NLCVERB, NLIOBJ,NLNP, NLDOBJ,NLNP, NULL,NULL,NULL
;talk to dwarf about gold: talk<to/dwarf/gold<about
dw NLVP, NLROOT,NLCVERB, NLDOBJ,NLNP, NLIOBJ,NLAP, NULL,NULL,NULL
;talk about gold = 'talk//gold<about'
dw NLVP, NLROOT,NLCVERB, NLIOBJ,NLAP, NULL,NULL, NULL,NULL,NULL
;burger = '/burger'
;john is SORRY
dw NLVP, NLDOBJ,NLNP, NULL ,NULL, NULL,NULL, NULL,NULL,NULL
;burger with fries = '/burger/fries
dw NLVP, NLDOBJ,NLNP, NLIOBJ,NLAP, NULL,NULL, NULL,NULL,NULL
;*** this doesn't work, phrase MUST have a root or SCI bombs ***
; WITH FRIES or IN THE TRUNK
;dw NLVP, NLIOBJ,NLAP, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;TELL THE MAN TO give the gold to the dwarf = 'give<TELL<MAN<TO/gold/dwarf'
dw NLVP, NLMOD ,NLCVERB, NLMOD,NLNP, NLMOD ,NLPREP, NLROOT,NLVP,NULL
;the tall clerk is the killer: 'is<(clerk<tall)/killer'
;john is sorry = is<john/sorry
dw NLVP, NLMOD,NLNP, NLROOT,NLVP, NULL,NULL, NULL,NULL,NULL
;;;
;;;******************* NP *******************
;;;
;the book
dw NLNP, NLIGNR,NLART, NLROOT,NLCNOUN, NULL,NULL, NULL,NULL,NULL
;the red book
dw NLNP, NLIGNR,NLART, NLMOD ,NLCADJ, NLROOT,NLCNOUN, NULL,NULL,NULL
;red book
dw NLNP, NLMOD ,NLCADJ, NLROOT,NLCNOUN, NULL,NULL, NULL,NULL,NULL
;red
dw NLNP, NLROOT,NLCADJ, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;book
dw NLNP, NLROOT,NLCNOUN, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;;;
;;;******************* AP *******************
;;;
;put rock UNDER BRIDGE - OBSOLETE CLAUSE
;dw NLAP, NLMOD ,NLPREP, NLROOT,NLNP, NULL,NULL, NULL,NULL,NULL
;give book TO DWARF
;chop tree WITH AX
dw NLAP, NLMOD ,NLASS, NLROOT,NLNP, NULL,NULL, NULL,NULL,NULL
;chop tree USING AX
dw NLAP, NLMOD ,NLAUXV, NLROOT,NLNP, NULL,NULL, NULL,NULL,NULL
;ask maid TO DO THE BED
dw NLAP, NLMOD ,NLASS, NLROOT,NLAUXV, NLMOD ,NLNP, NULL,NULL,NULL
;ask child TO BE QUIET
dw NLAP, NLMOD ,NLASS, NLROOT,NLAUXV, NLMOD ,NLADJ, NULL,NULL,NULL
;"sleep" in "do fairies sleep" spec: 'do/fairies/sleep'
dw NLAP, NLROOT,NLCVERB, NULL ,NULL, NULL,NULL, NULL,NULL,NULL
;say the body IS IN THE TRUNK
dw NLAP, NLMOD,NLCVERB, NLROOT,NLAP, NULL,NULL, NULL,NULL,NULL
;ask ABOUT SYMBOL OF MITHRA = ask//symbol<about<symbol<of
;("of" is a positional PREPosition)
dw NLAP, NLMOD ,NLASS, NLROOT,NLNP, NLMOD,NLPREP, NLMOD,NLNP,NULL
;???
;dw NLAP, NLROOT,NLNP, NULL ,NULL, NULL,NULL, NULL,NULL,NULL
;dw NLAP, NLROOT,NLVP, NULL ,NULL, NULL,NULL, NULL,NULL,NULL
;;;
;;;******************* CNOUN *******************
;;;
;bow and arrows
;door of the crypt
dw NLCNOUN, NLROOT,NLNOUN, NLIGNR,NLCONJ, NLROOT,NLNP, NULL,NULL,NULL
;prison guard jacket
dw NLCNOUN, NLMOD ,NLNOUN, NLROOT,NLCNOUN, NULL,NULL, NULL,NULL,NULL
;jacket
dw NLCNOUN, NLROOT,NLNOUN, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;;;
;;;******************* CVERB *******************
;;;
;go swim
dw NLCVERB, NLMOD ,NLAUXV, NLROOT,NLCVERB, NULL,NULL, NULL,NULL,NULL
;did you see?
;do zombies sleep?
dw NLCVERB, NLMOD ,NLAUXV, NLMOD ,NLNOUN, NLROOT,NLCVERB, NULL,NULL,NULL
;john IS sorry
dw NLCVERB, NLROOT,NLAUXV, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;go to swim
dw NLCVERB, NLMOD,NLAUXV, NLMOD,NLPREP, NLROOT,NLVERB, NULL,NULL,NULL
;go down to swim
dw NLCVERB, NLMOD,NLAUXV, NLMOD,NLPREP, NLMOD,NLPREP, NLROOT,NLVERB,NULL
;put
dw NLCVERB, NLROOT,NLVERB, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;put down
dw NLCVERB, NLROOT,NLVERB, NLMOD ,NLPREP, NULL,NULL, NULL,NULL,NULL
;lie down on
dw NLCVERB, NLROOT,NLVERB, NLMOD ,NLPREP, NLMOD ,NLPREP, NULL,NULL,NULL
;COLOR BRIGHT RED the paper
dw NLCVERB, NLROOT,NLVERB, NLMOD ,NLCADJ, NULL,NULL, NULL,NULL,NULL
;swim quickly
dw NLCVERB, NLROOT,NLVERB, NLMOD ,NLADV, NULL,NULL, NULL,NULL,NULL
;HOW MUCH IS dinner : 'is<much<how/dinner'
dw NLCVERB, NLMOD ,NLADV, NLMOD ,NLADV, NLROOT,NLCVERB, NULL,NULL,NULL
;soundly sleep
;what did you see
dw NLCVERB, NLMOD ,NLADV, NLROOT,NLCVERB, NULL,NULL, NULL,NULL,NULL
;how
dw NLCVERB, NLROOT,NLADV, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;"what time is" in "what time is it" spec: 'is<what<time'
dw NLCVERB, NLMOD ,NLADV, NLMOD ,NLNOUN, NLROOT,NLCVERB, NULL,NULL,NULL
;look and feel
dw NLCVERB, NLROOT,NLVERB, NLIGNR,NLCONJ, NLROOT,NLVERB, NULL,NULL,NULL
;look, listen and feel
dw NLCVERB, NLROOT,NLVERB, NLROOT,NLVERB, NLIGNR,NLCONJ, NLROOT,NLVERB,NULL
;;;
;;;******************* CADJ *******************
;;;
;green
dw NLCADJ, NLROOT,NLADJ, NULL,NULL, NULL,NULL, NULL,NULL,NULL
;dark green
dw NLCADJ, NLMOD ,NLADJ, NLROOT,NLCADJ, NULL,NULL, NULL,NULL,NULL
;;;
;;;******************* VOCAB POINTERS *******************
;;;
dw NLADV, NLVOCAB,ADV, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLVERB, NLVOCAB,VERB, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLVERB, NLVOCAB,AUXV, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLAUXV, NLVOCAB,AUXV, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLNOUN, NLVOCAB,NOUN, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLPRON, NLVOCAB,PRON, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLADJ, NLVOCAB,ADJ, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLART, NLVOCAB,ART, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLPREP, NLVOCAB,POS, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLASS, NLVOCAB,ASS, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NLCONJ, NLVOCAB,CONJ, NULL,NULL, NULL,NULL, NULL,NULL,NULL
dw NULL, NULL,NULL, NULL,NULL, NULL,NULL, NULL,NULL,NULL
_DATA ends
end
(S (ROOT VP))
;;;
;;;******************* VP *******************
;;;
;shoot
(VP (ROOT CVERB))
;put board down = put<down/board
(VP (ROOT CVERB) (DOBJ NP) (MOD POS))
;color the paper red
(VP (ROOT CVERB) (DOBJ NP) (MOD CADJ))
;hit board lightly
(VP (ROOT CVERB) (DOBJ NP) (MOD ADV))
;talk to dwarf
;put down board = put<down/board
(VP (ROOT CVERB) (DOBJ NP))
;give gold to dwarf = 'give<to/gold/dwarf'
;put rock under bridge = 'put<under/rock/bridge'
(VP (ROOT CVERB) (DOBJ NP) (MOD POS) (IOBJ NP))
;give dwarf the gold: IO=dwarf DO=gold (same as above)'give/gold/dwarf'
(VP (ROOT CVERB) (IOBJ NP) (DOBJ NP))
;talk to dwarf about gold: talk<to/dwarf/gold<about
(VP (ROOT CVERB) (DOBJ NP) (IOBJ AP))
;talk about gold = 'talk//gold<about'
(VP (ROOT CVERB) (IOBJ AP))
;burger = '/burger'
;john is SORRY
(VP (DOBJ NP))
;burger with fries = '/burger/fries
(VP (DOBJ NP) (IOBJ AP))
;*** this doesn't work phrase MUST have a root or SCI bombs ***
; WITH FRIES or IN THE TRUNK
;(VP (IOBJ AP))
;TELL THE MAN TO give the gold to the dwarf = 'give<TELL<MAN<TO/gold/dwarf'
(VP (MOD CVERB) (MOD NP) (MOD POS) (ROOT VP))
;the tall clerk is the killer: 'is<(clerk<tall)/killer'
;john is sorry = is<john/sorry
(VP (MOD NP) (ROOT VP))
;bargain with man about map
(VP (ROOT CVERB) (IOBJ AP) (DOBJ AP))
(VP (ROOT CVERB) (DOBJ AP) (IOBJ AP))
;;;
;;;******************* NP *******************
;;;
;the book
(NP (IGNR ART) (ROOT CNOUN))
;the red book
(NP (IGNR ART) (MOD CADJ) (ROOT CNOUN))
;red book
(NP (MOD CADJ) (ROOT CNOUN))
;red
(NP (ROOT CADJ))
;book
(NP (ROOT CNOUN))
;;;
;;;******************* AP *******************
;;;
;put rock UNDER BRIDGE - OBSOLETE CLAUSE
;(AP (MOD POS) (ROOT NP))
;give book TO DWARF
;chop tree WITH AX
(AP (MOD ASS) (ROOT NP))
;chop tree USING AX
(AP (MOD AUXV) (ROOT NP))
;ask maid TO DO THE BED
(AP (MOD ASS) (ROOT AUXV) (MOD NP))
;ask child TO BE QUIET
(AP (MOD ASS) (ROOT AUXV) (MOD ADJ))
;"sleep" in "do fairies sleep" spec: 'do/fairies/sleep'
(AP (ROOT CVERB))
;say the body IS IN THE TRUNK
(AP (MOD CVERB) (ROOT AP))
;ask ABOUT SYMBOL OF MITHRA = ask//symbol<about<symbol<of
;("of" is a positional preposition)
(AP (MOD ASS) (ROOT NP) (MOD POS) (MOD NP))
;???
;(AP (ROOT NP))
;(AP (ROOT VP))
;;;
;;;******************* CNOUN *******************
;;;
;bow and arrows
;door of the crypt
(CNOUN (ROOT NOUN) (IGNR CONJ) (ROOT NP))
;prison guard jacket
(CNOUN (MOD NOUN) (ROOT CNOUN))
;jacket
(CNOUN (ROOT NOUN))
;;;
;;;******************* CVERB *******************
;;;
;go swim
(CVERB (MOD AUXV) (ROOT CVERB))
;did you see?
;do zombies sleep?
;(CVERB (MOD AUXV) (MOD NOUN) (ROOT CVERB))
(CVERB (MOD AUXV) (MOD NP) (ROOT CVERB))
;USE SWORD TO CUT the tree = cut<use<sword<to/tree
(CVERB (MOD AUXV) (MOD NP) (MOD POS) (ROOT CVERB))
;john IS sorry
(CVERB (ROOT AUXV))
;go to swim
(CVERB (MOD AUXV) (MOD POS) (ROOT VERB))
;go down to swim
(CVERB (MOD AUXV) (MOD POS) (MOD POS) (ROOT VERB))
;put
(CVERB (ROOT VERB))
;put down
(CVERB (ROOT VERB) (MOD POS))
;lie down on
(CVERB (ROOT VERB) (MOD POS) (MOD POS))
(CVERB (ROOT VERB) (MOD ADV) (MOD POS))
;COLOR BRIGHT RED the paper
(CVERB (ROOT VERB) (MOD CADJ))
;swim quickly
(CVERB (ROOT VERB) (MOD ADV))
;HOW MUCH IS dinner : 'is<much<how/dinner'
(CVERB (MOD ADV) (MOD ADV) (ROOT CVERB))
;soundly sleep
;what did you see
(CVERB (MOD ADV) (ROOT CVERB))
;how
(CVERB (ROOT ADV))
;"what time is" in "what time is it" spec: 'is<what<time'
(CVERB (MOD ADV) (MOD NOUN) (ROOT CVERB))
;look and feel
(CVERB (ROOT VERB) (IGNR CONJ) (ROOT VERB))
;look listen and feel
(CVERB (ROOT VERB) (ROOT VERB) (IGNR CONJ) (ROOT VERB))
;;;THIS IS A TEST FOR "I AM SORRY" --Pablo for Brian
;(CVERB (MOD NP) (ROOT CVERB))
;;;
;;;******************* CADJ *******************
;;;
;green
(CADJ (ROOT ADJ))
;dark green
(CADJ (MOD ADJ) (ROOT CADJ))
;;;
;;;******************* (VOCAB POINTERS *******************
;;;
(ADV (VOCAB KADV))
(VERB (VOCAB KVERB))
(VERB (VOCAB KAUXV))
(AUXV (VOCAB KAUXV))
(NOUN (VOCAB KNOUN))
(PRON (VOCAB KPRON))
(ADJ (VOCAB KADJ))
(ART (VOCAB KART))
(POS (VOCAB KPOS))
(ASS (VOCAB KASS))
(CONJ (VOCAB KCONJ))
NULL equ 0
;;;
;;; the following should be in sync
;;; NLSYMS.H
;;;
MINNLTOKEN equ 300
;NLRP equ 301
;NLLP equ 302
NLVERB equ 303
NLNOUN equ 304
NLART equ 305
NLADJ equ 306
NLPREP equ 307
NLPRON equ 308
NLCONJ equ 309
NLAUXV equ 310
NLADV equ 311
NLASS equ 312
NLCNOUN equ 313
NLCADJ equ 314
NLCVERB equ 315
NLVP equ 316
NLNP equ 317
NLAP equ 318
NLS equ 319
NLEOL equ 320
NLROOT equ 321
NLDOBJ equ 322
NLIOBJ equ 323
NLMOD equ 324
NLIGNR equ 325
NLVOCAB equ 326
NLSPEC equ 327
NLSPEC2 equ 328
NLPHR equ 329
NLPHR2 equ 330
NLMORE equ 331
NLUNIT equ 332
NLPNCT equ 333
NLEMPT equ 334
NLOR equ 335
NLOR2 equ 336
NLATOM equ 337
NLOPT equ 338
NLWORD equ 339
NLPUT equ 340
NLNUM equ 341
EOGRAMMAR equ 342
MAXNLTOKEN equ 343
;;;
;;; the following should be in sync
;;; VOCAB.H
;;;
VERB equ 800h ;2048
ADV equ 400h ;1024
AUXV equ 200h ;0512
NOUN equ 100h ;0256
PRON equ 080h ;0128
ADJ equ 040h ;0064
ART equ 020h ;0032
POS equ 010h ;0016
ASS equ 008h ;0008
CONJ equ 004h ;0004
ORSAID equ 0f0h ;240
ANDSAID equ 0f1h ;241
NEXTPART equ 0f2h ;242
LEFTPAREN equ 0f3h ;243
RIGHTPAREN equ 0f4h ;244
OPTBEGIN equ 0f5h ;245
OPTEND equ 0f6h ;246
NUMBER equ 0f7h ;247
MODIFIES equ 0f8h ;248
RUNON equ 0f9h ;249
METAEND equ 0ffh ;255
;;;
;;; the following should be in sync
;;; NLSDGRMR.H
;;;
METASHIFT equ 100h
NLRNON equ RUNON * METASHIFT
NLLESS equ MODIFIES * METASHIFT
NLSLSH equ NEXTPART * METASHIFT
NLLP equ LEFTPAREN * METASHIFT
NLRP equ RIGHTPAREN * METASHIFT
NLLB equ OPTBEGIN * METASHIFT
NLRB equ OPTEND * METASHIFT
NLCOMA equ ORSAID * METASHIFT
NLAND equ ANDSAID * METASHIFT
NLEOSPEC equ METAEND * METASHIFT
NLEND equ METAEND * METASHIFT