#include "path.h"
inherit "room/room";

reset(arg) {
  if(arg) return;

  set_light(1);
  set_inside(1);
  short_desc="a pit";
}

long() {
  write("You are falling down a deep pit.\n");
  call_out("next",1);
}

init() {
  ::init();
  call_out("next",1);
}

next() {
  string str;

  remove_call_out("next");
  str=PATH+"bottom";
  if(HOBJ) return write("What are you doing here again!?\n");
  move_object(clone_object(HOBJ_FNAME),TP);
  if(environment(TP)==TO) TP->move_player("hits the ground#"+str);
  if(HOBJ) HOBJ->moved();
  str->hit();
}