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             "You walk through the door and find yourself in your own
  19             bedroom, which was once used by your grandmother. This
  20             room was designed in a renaissance style by a master
  21             decorator. It has a certain sense of extravagance, with
  22             ornate inlaid walls in a variety of complimentary colors
  23             that form exquisite patterns, with gold and marble
  24             highlights. The fully-decorated bed looks very comfortable
  25             - it projects a very light, airy feeling that's perfect
  26             for sleeping and adds to the sense of luxury. On the wall
  27             across from your bed is a large painting. The livingroom
  28             is to the north.",
  29         n_to livingroom,
  30         cant_go
  31             "Since when did you get the ability to walk through
  32             walls? Your livingroom is to the north.",
  33   has   light;
  34
  35 Object  painting "painting" bedroom
  36   with  description
  37             "It's a picture of Aragain Falls, the most breathtaking
  38             and awesome waterfall in the known lands.",
  39         before [;
  40           Insert:
  41             if (second == box)
  42                 print_ret (The) self, " is too big to fit.";
  43         ],
  44         name 'painting' 'paint' 'picture' 'of' 'aragain' 'falls',
  45   has   scenery;
  46
  47 Object  bed "bed" bedroom
  48   with  name 'bed' 'twin',
  49         description
  50             "With a frame of solid wood with a golden brown finish,
  51             it's a finely crafted bed.",
  52         before [;
  53           Take, Pull, Push, PushDir:
  54             print_ret (The) self, " is too heavy for that.";
  55         ],
  56   has   scenery static supporter enterable;
  57
  58 Object  box "dented steel box" bed
  59   with  name 'box' 'safe' 'safety' 'deposit',
  60         description
  61             "It's a safety deposit box. Made of steel, and dented,
  62             the words ~Property Of The Bank of Zork~ are on it.",
  63   has   container openable;
  64
  65 Object  directional "compass" box
  66   with  name 'compass',
  67         description [;
  68             if (location == livingroom || location == sidewalk) {
  69                 print "The compass is pointing west.^";
  70                 rtrue;
  71             }
  72             if (location == frontporch) {
  73                 print "The compass is pointing southeast.^";
  74                 rtrue;
  75             }
  76             else
  77                 print
  78                     "Ordinarily you'd expect a compass to point north
  79                     but this one is spinning wildly in every
  80                     direction.^";
  81         ],
  82         ;