src/objects/bedroom.inf

   1 ! Copyright (C) 2019 Jason Self <j@jxself.org>
   2 !
   3 ! This file is free software: you may copy, redistribute gand/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. On
  19             the wall is a painting. The 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         name 'painting' 'paint',
  31         Before [;
  32           Take:
  33             print_ret "It looks so nice, perhaps it's better to leave
  34                       it where it is.";
  35         ],
  36   has   scenery;
  37
  38 Object  bed "twin-sized bed" bedroom
  39   with  name 'bed' 'twin',
  40         description
  41             "With a frame of solid wood with a golden brown finish,
  42             it's a finely crafted bed.",
  43         before [;
  44           Take, Pull, Push, PushDir:
  45             print_ret (The) self, " is too heavy for that.";
  46         ],
  47   has   static supporter enterable;
  48
  49 Object  box "dented steel box" bed
  50   with  name 'box' 'safe' 'safety' 'deposit',
  51         description
  52             "It's a safety deposit box. Made of steel, and dented,
  53             the words ~Property Of The Bank of Zork~ are on it.",
  54   has   container openable;
  55
  56 Object  directional "compass" box
  57   with  name 'compass',
  58         description [;
  59             if (location == bedroom || location == kitchen ||
  60             location == backyard || location == neighborkitchen ||
  61             location == neighborlivingroom)
  62                 print
  63                     "Ordinarily you'd expect a compass to point north
  64                     but this one is spinning wildly in every
  65                     direction.^";
  66             if (location == livingroom || location == sidewalk)
  67                 print "The compass is pointing west.^";
  68             if (location == frontporch)
  69                 print "The compass is pointing southeast.^";
  70         ],
  71         ;