linklpa.h

   1 ! ==============================================================================
   2 !   LINKLPA:  Link declarations of common properties and attributes.
   3 !
   4 !   Supplied for use with Inform 6 -- Release 6.12.1 -- Serial number 160605
   5 !
   6 !   Copyright Graham Nelson 1993-2004 and David Griffith 2012-2016
   7 !
   8 !   This code is licensed under either the traditional Inform license as
   9 !   described by the DM4 or the Artistic License version 2.0.  See the
  10 !   file COPYING in the distribution archive or at
  11 !   https://github.com/DavidGriffith/inform6lib/
  12 !
  13 !   This file is automatically Included in your game file by "Parser".
  14 ! ==============================================================================
  15
  16 System_file;
  17
  18 ! ------------------------------------------------------------------------------
  19 !   Some VM-specific constants.
  20 !   (WORDSIZE and TARGET_XXX are defined by the compiler.)
  21 ! ------------------------------------------------------------------------------
  22
  23 #Ifdef TARGET_ZCODE;
  24 Constant NULL         = $ffff;
  25 Constant WORD_HIGHBIT = $8000;
  26 #Ifnot; ! TARGET_GLULX
  27 Constant NULL         = $ffffffff;
  28 Constant WORD_HIGHBIT = $80000000;
  29 #Endif; ! TARGET_
  30
  31 ! ------------------------------------------------------------------------------
  32 !   The common attributes and properties.
  33 ! ------------------------------------------------------------------------------
  34
  35 Attribute animate;
  36 #Ifdef USE_MODULES;
  37     #Iffalse (animate == 0);
  38     Message error "Please move your Attribute declarations after the Include ~Parser~ line:
  39                    otherwise it will be impossible to USE_MODULES";
  40     #Endif;
  41 #Endif;
  42
  43 Attribute absent;       Attribute non_floating alias absent;
  44 Attribute clothing;
  45 Attribute concealed;
  46 Attribute container;
  47 Attribute door;
  48 Attribute edible;
  49 Attribute enterable;
  50 Attribute general;
  51 Attribute light;
  52 Attribute lockable;
  53 Attribute locked;
  54 Attribute moved;
  55 Attribute on;
  56 Attribute open;
  57 Attribute openable;
  58 Attribute proper;
  59 Attribute scenery;
  60 Attribute scored;
  61 Attribute static;
  62 Attribute supporter;
  63 Attribute switchable;
  64 Attribute talkable;
  65 Attribute transparent;
  66 Attribute visited;
  67 Attribute workflag;
  68 Attribute worn;
  69
  70 Attribute male;
  71 Attribute female;
  72 Attribute neuter;
  73 Attribute pluralname;
  74
  75 ! ------------------------------------------------------------------------------
  76
  77 Property additive before NULL;
  78 Property additive after  NULL;
  79 Property additive life   NULL;
  80
  81 Property n_to;
  82 Property s_to;
  83 Property e_to;
  84 Property w_to;
  85 Property ne_to;
  86 Property nw_to;
  87 Property se_to;
  88 Property sw_to;
  89 Property u_to;
  90 Property d_to;
  91 Property in_to;
  92 Property out_to;
  93
  94 #Ifdef USE_MODULES;
  95     #Iffalse (7 >= n_to);
  96     Message error "Please move your Property declarations after the Include ~Parser~ line:
  97                    otherwise it will be impossible to USE_MODULES";
  98     #Endif;
  99 #Endif;
 100
 101 Property door_to;
 102 Property with_key;
 103 Property door_dir;
 104 Property invent;
 105 Property plural;
 106 Property add_to_scope;
 107 Property list_together;
 108 Property react_before;
 109 Property react_after;
 110 Property grammar;
 111 Property additive orders;
 112
 113 Property initial;
 114 Property when_open;
 115 Property when_closed;
 116 Property when_on;
 117 Property when_off;
 118 Property description;
 119 Property additive describe NULL;
 120 Property article "a";
 121
 122 Property cant_go;
 123
 124 Property found_in;          ! For fiddly reasons this can't alias
 125
 126 Property time_left;
 127 Property number;
 128 Property additive time_out NULL;
 129 Property daemon;
 130 Property additive each_turn NULL;
 131
 132 Property capacity 100;
 133
 134 Property short_name 0;
 135 Property short_name_indef 0;
 136 Property parse_name 0;
 137
 138 Property articles;
 139 Property inside_description;
 140
 141 ! ==============================================================================