
#include <std.h>
#include <saahr.h>

inherit VAULT;

void door_setup();

void create() {
  ::create();
  set_properties(([
    "light":2,
    "indoors":1,
    "town":1
  ]));
  set_short("inside a house");
  set_long(
    ""
  );
  set_items(([
  ]));
  set_exits(([
    "out":VPROOMS"town9_8"
  ]));
  set_door("door", query_exit("out"), "out", "key9_8");
  door_setup();
}

void reset() {
  ::reset();
  if (!present("nymph"))
    new(MOBS"nymph")->move(this_object());
  door_setup();
}

void door_setup() {
  object outside=load_object(query_exit("out"));
  object *both=({this_object()});
  int o=0, l;
  if (query_night()) {
    l=1;
  }
  else {
    if (random(100) < 25) o=1;
    l=0;
  }
  if (outside) both+=({outside});
  both->set_open("door", o);
  both->set_locked("door", l);
}
