linklpa.h

   1 ! ==============================================================================
   2 !   LINKLPA:  Link declarations of common properties and attributes.
   3 !
   4 !   Supplied for use with Inform 6 -- Release 6.12.4pre -- Serial number 200528
   5 !
   6 !   Copyright Graham Nelson 1993-2004 and David Griffith 2012-2020
   7 !
   8 !   This file is free software: you can redistribute it and/or modify
   9 !   it under the terms of the GNU Affero General Public License as
  10 !   published by the Free Software Foundation, either version 3 of the
  11 !   License, or (at your option) any later version.
  12 !
  13 !   This file is distributed in the hope that it will be useful, but
  14 !   WITHOUT ANY WARRANTY; without even the implied warranty of
  15 !   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  16 !   Affero General Public License for more details.
  17 !
  18 !   You should have received a copy of the GNU Affero General Public
  19 !   License along with this program. If not, see
  20 !   https://gnu.org/licenses/
  21 !
  22 !   This file is automatically Included in your game file by "Parser".
  23 ! ==============================================================================
  24
  25 System_file;
  26
  27 ! ------------------------------------------------------------------------------
  28 !   Some VM-specific constants.
  29 !   (WORDSIZE and TARGET_XXX are defined by the compiler.)
  30 ! ------------------------------------------------------------------------------
  31
  32 #Ifdef TARGET_ZCODE;
  33 Constant NULL         = $ffff;
  34 Constant WORD_HIGHBIT = $8000;
  35 #Ifnot; ! TARGET_GLULX
  36 Constant NULL         = $ffffffff;
  37 Constant WORD_HIGHBIT = $80000000;
  38 #Endif; ! TARGET_
  39
  40 ! ------------------------------------------------------------------------------
  41 !   The common attributes and properties.
  42 ! ------------------------------------------------------------------------------
  43
  44 Attribute animate;
  45 Attribute absent;       Attribute non_floating alias absent;
  46 Attribute clothing;
  47 Attribute concealed;
  48 Attribute container;
  49 Attribute door;
  50 Attribute edible;
  51 Attribute enterable;
  52 Attribute general;
  53 Attribute light;
  54 Attribute lockable;
  55 Attribute locked;
  56 Attribute moved;
  57 Attribute on;
  58 Attribute open;
  59 Attribute openable;
  60 Attribute proper;
  61 Attribute scenery;
  62 Attribute scored;
  63 Attribute static;
  64 Attribute supporter;
  65 Attribute switchable;
  66 Attribute talkable;
  67 Attribute transparent;
  68 Attribute visited;
  69 Attribute workflag;
  70 Attribute worn;
  71
  72 Attribute male;
  73 Attribute female;
  74 Attribute neuter;
  75 Attribute pluralname;
  76
  77 ! ------------------------------------------------------------------------------
  78
  79 Property additive before NULL;
  80 Property additive after  NULL;
  81 Property additive life   NULL;
  82
  83 Property n_to;
  84 Property s_to;
  85 Property e_to;
  86 Property w_to;
  87 Property ne_to;
  88 Property nw_to;
  89 Property se_to;
  90 Property sw_to;
  91 Property u_to;
  92 Property d_to;
  93 Property in_to;
  94 Property out_to;
  95
  96 Property door_to;
  97 Property with_key;
  98 Property door_dir;
  99 Property invent;
 100 Property plural;
 101 Property add_to_scope;
 102 Property list_together;
 103 Property react_before;
 104 Property react_after;
 105 Property grammar;
 106 Property additive orders;
 107
 108 Property initial;
 109 Property when_open;
 110 Property when_closed;
 111 Property when_on;
 112 Property when_off;
 113 Property description;
 114 Property additive describe NULL;
 115 Property article "a";
 116
 117 Property cant_go;
 118
 119 Property found_in;          ! For fiddly reasons this can't alias
 120
 121 Property time_left;
 122 Property number;
 123 Property additive time_out NULL;
 124 Property daemon;
 125 Property additive each_turn NULL;
 126
 127 Property capacity 100;
 128
 129 Property short_name 0;
 130 Property short_name_indef 0;
 131 Property parse_name 0;
 132
 133 Property articles;
 134 Property inside_description;
 135
 136 ! ==============================================================================