##########################################################################
#
#
# Little girl in the big world. An Interactive Fiction story file.
# Designed to be compiled and run with StoryFactory.
#
# Written and declared public domain by Peter Wendrich 2003.
#
#
##########################################################################
#
# Living room
#
##########################################################################


object objectLivingRoom {
  name: living room
  location: objectWorld

  run {
    /dup &look /eqif
      the living room ^ ^
      /self _look_child
    /then
    /drop /fret
  }
}


object objectTV {
  name: tv
  location: objectLivingRoom

  run {
    /dup &examine /eqif
      a small color tv with teletext and stereo sound decoding . ^
      /drop /tret
    /then
    /dup &look /eqif
      a tv can be seen .
      /drop /tret
    /then
    /dup &turnon /eqif
      Alice's mother doesn't want Alice to watch tv all day . so maybe leave it off for now .
      /drop /tret
    /then
    /drop /fret
  }
}