! Copyright (C) 2019, 2020 Jason Self <j@jxself.org>
!
! This file is free software: you may copy, redistribute and/or
! modify it under the terms of the GNU Affero General Public License
! as published by the Free Software Foundation, either version 3 of
! the License, or (at your option) any later version.
!
! This file is distributed in the hope that it will be useful, but
! WITHOUT ANY WARRANTY; without even the implied warranty of
! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
! Affero General Public License for more details.
!
! You should have received a copy of the GNU Affero General Public
! License along with this file. If not, see https://gnu.org/licenses/

Object  neighborkitchen "Kitchen"
  with  description 
            "You are in your neighbor's kitchen. It's a large 
             contemporary kitchen with an open design and many flat 
             surfaces. The color palette is very bright and in 
             perfect harmony with the kitchen. It's timeless and 
             beautiful. The walls look like they've been used to 
             store things, with some faint outlines remaining that 
             gives a lived-in look. It could have been a luxury 
             cooking environment, though by now everything has been 
             removed. Only the kitchen island and fireplace remain in 
             stark contrast to the bare kitchen. The livingroom is to 
             the east. The door to the back yard is to the west.",
        e_to neighborlivingroom,
        w_to backyard,
  has   light;

Object  island "kitchen island" neighborkitchen
  with  name 'kitchen' 'island' 'table' 'wood' 'wooden' 'top' 'wood',
        description 
            "It has metal legs firmly embedded into the floor, and a 
            wooden top. Strangely, all of the drawers have been 
            removed.",
        before [;
          Take, Pull, Push, PushDir, Turn:
            print_ret "The kitchen island is firmly planted in the floor.";
        ],
  has   scenery supporter enterable;

Object  brick "brick" neighborkitchen
  with  name 'brick' 'bricks' 'mortar',
        description 
            "You find nothing special about the bricks that make up 
            the fireplace.",
  has   scenery;

Object  fireplace "fireplace" neighborkitchen
  with  name 'fireplace' 'fire' 'place' 'mouth',
        description [;
            print 
                "A stain is splayed against the brick fireplace, 
                making its curved mouth appear like a black, toothless 
                scream. A confection of ashes occupy the fireplace";
            if (poker in self)
                print 
                    ", and a poker hangs out which looks like it 
                    could make an effective weapon";
            print ".";
            new_line;
        ],
  has   scenery container transparent open;

Object  poker "poker" fireplace
  with  name 'poker',
        description 
            "This poker may have once been used to expedite the 
            flame's envelopment, as well as the house's many stories 
            and secrets.",
        before [;
          Take, Pull, Push, PushDir, Remove:
            give poker ~concealed;
            if (poker hasnt visited) {
                score = score + 1;
                give poker visited;
                }
            if (player in neighborlivingroom) {
                if (bluebutton has on)
                    machine.shoot();
            }
        ],
  has   concealed;

Object  ashes "ashes" fireplace
  with  name 'ash' 'ashes',
        description "It looks like a pile of ash.",
        before [;
          Take, Pull, Push, PushDir:
            print_ret "The ashes are so fine they fall between your fingers.";
        ],
  has   concealed pluralname;

Object  stain "stain" fireplace
  with  name 'stain',
  has   scenery;

Object  mouth "mouth of the fireplace" fireplace
  with  name 'mouth',
  has   scenery;

Object  letter "letter" island
  with  name 'letter',
        description 
            "The letter reads: ~Thank you for evaluating this 
            prototype of the Frobozz Magic Teleporter. Please refer to 
            the enclosed manual to learn how to program destinations 
            in to your teleporter. Pressing the red button recalls the 
            last-used destination and teleports you there. Pressing 
            the blue button engages Defense Mode, which instantly 
            whisks intruders away. Use it to provide defense for any 
            location! Please send feedback about this prototype to 
            your local FrobozzCo International sales person. Warning: 
            Side effects can include disorientation, loss of memory, 
            lightheadedness, loss of appetite, nausea, vomiting, 
            weakness, and death.~";