! Part I. Preliminaries (lines 20-65)
Back to List
Browsing English.h
020 ! Part I. Preliminaries
021 ! ------------------------------------------------------------------------------
022
023 Constant EnglishNaturalLanguage; ! Needed to keep old pronouns mechanism
024
025 Class CompassDirection
026 with number 0, article "the",
027 description [;
028 if (location provides compass_look && location.compass_look(self)) rtrue;
029 if (self.compass_look()) rtrue;
030 L__M(##Look, 7, self);
031 ],
032 compass_look false,
033 has scenery;
034
035 Object Compass "compass" has concealed;
036
037 #Ifndef WITHOUT_DIRECTIONS;
038 CompassDirection -> n_obj "north"
039 with door_dir n_to, name 'n//' 'north';
040 CompassDirection -> s_obj "south"
041 with door_dir s_to, name 's//' 'south';
042 CompassDirection -> e_obj "east"
043 with door_dir e_to, name 'e//' 'east';
044 CompassDirection -> w_obj "west"
045 with door_dir w_to, name 'w//' 'west';
046 CompassDirection -> ne_obj "northeast"
047 with door_dir ne_to, name 'ne' 'northeast';
048 CompassDirection -> nw_obj "northwest"
049 with door_dir nw_to, name 'nw' 'northwest';
050 CompassDirection -> se_obj "southeast"
051 with door_dir se_to, name 'se' 'southeast';
052 CompassDirection -> sw_obj "southwest"
053 with door_dir sw_to, name 'sw' 'southwest';
054 CompassDirection -> u_obj "up above"
055 with door_dir u_to, name 'u//' 'up' 'ceiling' 'above' 'sky';
056 CompassDirection -> d_obj "ground"
057 with door_dir d_to, name 'd//' 'down' 'floor' 'below' 'ground';
058 #endif; ! WITHOUT_DIRECTIONS
059
060 CompassDirection -> in_obj "inside"
061 with door_dir in_to, name 'in' 'inside';
062 CompassDirection -> out_obj "outside"
063 with door_dir out_to, name 'out' 'outside';
064
065 ! ------------------------------------------------------------------------------
Last updated 27 February 2004. The librarian in charge of this page is Graham Nelson (graham@gnelson.demon.co.uk) assisted by C Knight. Please email any comments, suggestions or corrections to cedenqs@inform-fiction.org.