Inform - Support - Source

Back to List

Inventory
Complete

Backward
Forward

Plain
Coloured
Gaudy

This code
in plain text

Browsing parserm.h

NounWord (lines 3373-3395)

3373  !  NounWord (which takes no arguments) returns:
3374  !
3375  !   0  if the next word is unrecognised or does not carry the "noun" bit in
3376  !      its dictionary entry,
3377  !   1  if a word meaning "me",
3378  !   the index in the pronoun table (plus 2) of the value field of a pronoun,
3379  !      if the word is a pronoun,
3380  !   the address in the dictionary if it is a recognised noun.
3381  !
3382  !  The "current word" marker moves on one.
3383  ! ----------------------------------------------------------------------------
3384   
3385  [ NounWord i j s;
3386     i=NextWord();
3387     if (i==0) rfalse;
3388     if (i==ME1__WD or ME2__WD or ME3__WD) return 1;
3389     s = LanguagePronouns-->0;
3390     for (j=1 : j<=s : j=j+3)
3391         if (i == LanguagePronouns-->j)
3392             return j+2;
3393     if ((i->#dict_par1)&128 == 0) rfalse;
3394     return i;
3395  ];


Last updated 27 February 2004. This site is no longer supported; information may be out of date.
Maintained as a historical archive by the Interactive Fiction Technology Foundation. Copyright 1993-2018 IFTF, CC-BY-SA unless otherwise noted.
This page was originally managed by Graham Nelson (graham@gnelson.demon.co.uk) assisted by C Knight.