#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() { int i; if(random(10)>5) i=3; else i=2; remove_call_out("next"); if(environment(TP)==TO) TP->move_player("falls#"+PATH+"pit"+i); }