ldmud-3.4.1/doc/
ldmud-3.4.1/doc/efun.de/
ldmud-3.4.1/doc/efun/
ldmud-3.4.1/doc/man/
ldmud-3.4.1/doc/other/
ldmud-3.4.1/mud/
ldmud-3.4.1/mud/heaven7/
ldmud-3.4.1/mud/lp-245/
ldmud-3.4.1/mud/lp-245/banish/
ldmud-3.4.1/mud/lp-245/doc/
ldmud-3.4.1/mud/lp-245/doc/examples/
ldmud-3.4.1/mud/lp-245/doc/sefun/
ldmud-3.4.1/mud/lp-245/log/
ldmud-3.4.1/mud/lp-245/obj/Go/
ldmud-3.4.1/mud/lp-245/players/lars/
ldmud-3.4.1/mud/lp-245/room/death/
ldmud-3.4.1/mud/lp-245/room/maze1/
ldmud-3.4.1/mud/lp-245/room/sub/
ldmud-3.4.1/mud/lp-245/secure/
ldmud-3.4.1/mud/morgengrauen/
ldmud-3.4.1/mud/morgengrauen/lib/
ldmud-3.4.1/mud/sticklib/
ldmud-3.4.1/mud/sticklib/src/
ldmud-3.4.1/mudlib/uni-crasher/
ldmud-3.4.1/pkg/
ldmud-3.4.1/pkg/debugger/
ldmud-3.4.1/pkg/diff/
ldmud-3.4.1/pkg/misc/
ldmud-3.4.1/src/autoconf/
ldmud-3.4.1/src/hosts/
ldmud-3.4.1/src/hosts/GnuWin32/
ldmud-3.4.1/src/hosts/amiga/
ldmud-3.4.1/src/hosts/win32/
ldmud-3.4.1/src/ptmalloc/
ldmud-3.4.1/src/util/
ldmud-3.4.1/src/util/erq/
ldmud-3.4.1/src/util/indent/hosts/next/
ldmud-3.4.1/src/util/xerq/
ldmud-3.4.1/src/util/xerq/lpc/
ldmud-3.4.1/src/util/xerq/lpc/www/
ldmud-3.4.1/test/t-030925/
ldmud-3.4.1/test/t-040413/
ldmud-3.4.1/test/t-041124/
#include "../std.h"

object rat;

#undef EXTRA_RESET
#define EXTRA_RESET extra_reset();

#undef EXTRA_MOVE1
#define EXTRA_MOVE1\
    if ("room/sub/door_trap"->query_west_door() == 0) {\
	write("The door is closed.\n");\
	return 1;\
    }

void extra_reset() {
    object black_stone;
    if (!rat || !living(rat)) {
	rat = clone_object("obj/monster");
	rat->set_name("rat");
	rat->set_alias("black rat");
	rat->set_level(3);
	rat->set_short("An ugly black rat");
	rat->set_wc(5);
	rat->set_agressive(1);
	move_object(rat, this_object());
	black_stone = clone_object("obj/treasure");
	black_stone->set_id("stone");
	black_stone->set_alias("black stone");
	black_stone->set_short("A black stone");
	black_stone->set_value(60);
	move_object(black_stone, rat);
    }
}

ONE_EXIT("room/sub/door_trap", "east",
	 "Black room",
	 "This is the black room.\n", 0)