-- $Id: oakleigh.alan,v 1.4 2006/10/28 09:58:13 mike Exp $
--
-- Build with:
--	alan -info -include ../unpacked/lib oakleigh.alan

IMPORT 'std.i'.

------------------------------------------------------------------------------

THE dining_room Isa LOCATION
  NAME 'Dining Room'
  DESCRIPTION
  "This is well lit room with pale yellow walls.  The floor is bare polished boards - once elegant, now rather scruffy.  A large wooden table stands against the east wall."
  EXIT north TO kitchen
    DOES "You go north, into the kitchen."
  END EXIT.

  EXIT south, east, west TO dining_room
    CHECK "There is only a wall in that direction."
  END EXIT.
END THE dining_room.

THE table Isa OBJECT AT dining_room
  NAME wooden table NAME wooden
  DESCRIPTION ""
END THE table.

------------------------------------------------------------------------------

THE kitchen Isa LOCATION
  NAME 'Kitchen'
  DESCRIPTION
  "This is the kitchen."

  EXIT south TO dining_room
    DOES "You return to the dining room, south."
  END EXIT.

  EXIT north TO extension
  END EXIT.

  EXIT east TO utility_room END EXIT.

  EXIT west TO kitchen
    CHECK "There is only a wall in that direction."
  END EXIT.
END THE kitchen.

------------------------------------------------------------------------------

THE extension Isa LOCATION
  Name 'Kitchen Extension'
  DESCRIPTION
  "The extension to the kitchen is newer than the rest of the house.  It has pale yellow walls and is lit by oily lamps which are close to fading."

  EXIT south TO kitchen 
  END EXIT.
  EXIT west TO patio 
  END EXIT.
END THE extension.

------------------------------------------------------------------------------

THE patio Isa LOCATION
  Name 'Patio'
  DESCRIPTION
  "This is the southernmost part of a beautiful garden.  It contains many flower beds and a strawberry patch which doesn't bear anything."
  EXIT east TO extension
  END EXIT.
END the patio.

------------------------------------------------------------------------------

THE utility_room Isa LOCATION
  Name 'Utility Room'
  DESCRIPTION
  "The utility room is small. There is also a strange trapdoor in the ground.  There is something important hidden here."
  EXIT down TO cellar
  END EXIT.
  EXIT west TO kitchen
  END EXIT.
END the utility_room.

THE washing_machine Isa OBJECT AT utility_room
  NAME washing machine
  CONTAINER
  DESCRIPTION "There is an old-fashioned washing machine here."
  IS openable.
  IS closeable.
  NOT takeable.
END THE washing_machine.

THE clothing Isa OBJECT AT utility_room
END THE clothing.

THE robe Isa OBJECT IN washing_machine
  NAME magnificent robe
END THE robe.

------------------------------------------------------------------------------

THE cellar Isa LOCATION
  Name 'Cellar'
  DESCRIPTION
  "Inside the cellar there is a rusty metal detector and a sign on a wooden post saying 'Leave valuables here'."
  EXIT up TO utility_room END EXIT.
  EXIT north TO cave END EXIT.
END the cellar.

------------------------------------------------------------------------------

THE cave Isa LOCATION
  Name 'Cave'
  DESCRIPTION
  "This is a dirty cave."
  EXIT south TO cellar END EXIT.
END the cave.

THE pot Isa OBJECT AT cave
  NAME metal pot
  CONTAINER
END THE pot.

THE blanket Isa OBJECT IN pot
END THE blanket.

THE note Isa OBJECT IN pot
  IS readable.
  Verb read Does Only "It says 'GO AWAY'" End Verb.
  Verb examine Does Only "There's writing on it." End Verb.
END THE note.

------------------------------------------------------------------------------

Start At cave.