src/objects/intro/bedroom.inf

   1 ! Copyright (C) 2019 Jason Self <j@jxself.org>
   2 !
   3 ! This file is free software: you may copy, redistribute and/or
   4 ! modify it under the terms of the GNU Affero General Public License
   5 ! as published by the Free Software Foundation, either version 3 of
   6 ! the License, or (at your option) any later version.
   7 !
   8 ! This file is distributed in the hope that it will be useful, but
   9 ! WITHOUT ANY WARRANTY; without even the implied warranty of
  10 ! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  11 ! Affero General Public License for more details.
  12 !
  13 ! You should have received a copy of the GNU Affero General Public
  14 ! License along with this file. If not, see https://gnu.org/licenses/
  15
  16 Object  bedroom "Bedroom"
  17   with  description
  18             "The green-beige walls are reminiscent of a hospital. The
  19             livingroom is to the north.",
  20         n_to livingroom,
  21         cant_go
  22             "Since when did you get the ability to walk through
  23             walls? Your livingroom is to the north.",
  24   has   light;
  25
  26 Object  painting "painting" bedroom
  27   with  description
  28             "It's a picture of Aragain Falls, the most breathtaking
  29             and awesome waterfall in the known lands.",
  30         before [;
  31           Insert:
  32             if (second == box)
  33             print_ret (The) self, " is too big to fit.";
  34         ],
  35         name 'painting' 'paint' 'picture' 'of' 'aragain' 'falls';
  36
  37 Object  bed "twin-sized bed" bedroom
  38   with  name 'bed' 'twin',
  39         description
  40             "With a frame of solid wood with a golden brown finish,
  41             it's a finely crafted bed.",
  42         before [;
  43           Take, Pull, Push, PushDir:
  44             print_ret (The) self, " is too heavy for that.";
  45         ],
  46   has   static supporter enterable;
  47
  48 Object  box "dented steel box" bed
  49   with  name 'box' 'safe' 'safety' 'deposit',
  50         description
  51             "It's a safety deposit box. Made of steel, and dented,
  52             the words ~Property Of The Bank of Zork~ are on it.",
  53   has   container openable;
  54
  55 Object  directional "compass" box
  56   with  name 'compass',
  57         description [;
  58             if (location == bedroom || location == kitchen ||
  59             location == backyard || location == neighborkitchen ||
  60             location == neighborlivingroom)
  61                 print
  62                     "Ordinarily you'd expect a compass to point north
  63                     but this one is spinning wildly in every
  64                     direction.^";
  65             if (location == livingroom || location == sidewalk)
  66                 print "The compass is pointing west.^";
  67             if (location == frontporch)
  68                 print "The compass is pointing southeast.^";
  69         ],
  70         ;