lpmud/mudlib/
lpmud/mudlib/doc/
lpmud/mudlib/doc/LPC/
lpmud/mudlib/log/
lpmud/mudlib/players/
lpmud/mudlib/room/maze1/
lpmud/mudlib/room/sub/
#include "../std.h"

string rope;

#undef EXTRA_INIT
#define EXTRA_INIT\
    add_action("go_up"); add_verb("up");

#undef EXTRA_LONG
#define EXTRA_LONG\
    if (call_other("room/mine/tunnel3", "query_rope"))\
	write("There is a rope hanging down through the hole.\n");

TWO_EXIT("room/mine/tunnel10", "west",
	 "room/mine/tunnel14", "east",
	 "Hole in ceiling",
	 "There is a big hole in the ceiling.\n", 0)

go_up() 
{
    if (!call_other("room/mine/tunnel3","query_rope")) {
        write("You can't go stright up with some kind of support.\n");
	return 1;
    }
    call_other(this_player(), "move_player", "down#room/mine/tunnel8");
    return 1;
}

tie(str)
{
    if (str != "ring" && str != "rings")
        return 0;
    rope = 1;
    return 1;
}

id(str) {
    return str == "ring" || str == "rings";
}

untie(str) {
    rope = 0;
    return 1;
}