src/objects/kitchen.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  kitchen "Kitchen"
  17   with  description
  18             "You are in the kitchen and in front of the window that
  19             looks out on to your neighbor's back yard. It's a small
  20             simple kitchen, but adequately lit by natural light from
  21             the outside. The walls are painted a buttery yellow and
  22             broken up by celery green curtains on the windows, which
  23             move slightly in a small breeze you cannot feel. The floor
  24             is highly polished, having received a fresh coat
  25             yesterday afternoon. The livingroom is to the east.",
  26         n_to window,
  27         cant_go "You walk smack into one of those buttery yellow
  28                 walls I described.",
  29         e_to livingroom,
  30         before [;
  31           Go:
  32             if (chair in player) {
  33                 print_ret "The chair is too awkward to do that while
  34                           you're carrying it.";
  35             }
  36         ],
  37   has   light;
  38
  39 Object  wall "wall" kitchen
  40   with  name 'yellow' 'wall' 'walls',
  41         description [;
  42             if (location == kitchen)
  43                 print
  44                     "The walls are painted a buttery yellow and
  45                     broken up by celery green curtains on the windows,
  46                     which move slightly in a small breeze you cannot
  47                     feel.^";
  48             else
  49                 print "You see nothing special about the walls.^";
  50         ],
  51         found_in kitchen livingroom bedroom neighborkitchen neighborlivingroom,
  52   has   scenery;
  53
  54 Object  chair "chair" kitchen
  55   with  name 'chair' 'backrest' 'seat',
  56         description
  57             "It seems to be your average kitchen chair: Four chrome
  58             legs and a backrest with a yellow seat that matches the
  59             walls.",
  60         before [;
  61           Take:
  62             move chair to player;
  63             print_ret "As awkward as it is, you take the chair.";
  64         ],
  65   has   scenery supporter enterable;
  66
  67 Object  table "table" kitchen
  68   with  name 'table' 'kitchen table' 'formica',
  69         description
  70             "It looks like something right out of the 1950s: Green
  71             formica and chrome legs.",
  72         before [;
  73           Take, Pull, Push, PushDir, Turn:
  74             print_ret (The) self, " is too heavy for that.";
  75         ],
  76   has   scenery supporter enterable;
  77
  78 Object  newspaper "newspaper" table
  79   with  name 'newspaper' 'paper',
  80         description
  81             "It's your favorite newspaper: U.S. News And Grue Report,
  82             which also airs on TV.";
  83
  84 Object  window "window" kitchen
  85   with  name 'window' 'windows',
  86         description
  87             "Framed by celery green curtains it seems almost large
  88             enough to climb through.",
  89         short_name [;
  90             if (location == kitchen)
  91                 print "window to your neighbor's back yard";
  92             else
  93                 print "window to your kitchen";
  94             return true;
  95         ],
  96         found_in kitchen backyard,
  97         door_dir [;
  98             if (location == kitchen)
  99                 return n_to;
 100             else
 101                 return s_to;
 102         ],
 103         door_to [;
 104             if (location == kitchen)
 105                 return backyard;
 106             else
 107                 return kitchen;
 108         ],
 109         before [;
 110           Search:
 111             if (curtains has open) {
 112                 print "You see your neighbor's backyard.^";
 113                 return true;
 114             }
 115             else {
 116                 print "The curtains are closed, and you can't see
 117                       through them.^";
 118                 return true;
 119             }
 120           Open:
 121             if (window hasnt visited) {
 122                 score = score + 1;
 123                 give window visited;
 124             }
 125           Climb:
 126             if (window hasnt visited) {
 127                 score = score + 1;
 128                 give window visited;
 129             }
 130             PlayerTo(backyard);
 131         ],
 132   has   scenery door openable;
 133
 134 Object  curtains "curtains" kitchen
 135   with  name 'curtain' 'curtains' 'green curtains' 'celery' 'celery green'
 136         'celery green curtains',
 137         description "Celery green in color, you see nothing special
 138                     about the curtains.",
 139         before [;
 140           Take, Pull, Push, PushDir:
 141             print_ret "Don't you think they look nice where they are?";
 142         ],
 143   has   scenery open openable pluralname;
 144
 145 Object  legs "legs" kitchen
 146   with  name 'leg' 'legs',
 147         found_in kitchen neighborkitchen,
 148   has   scenery;