#include <std.h> inherit VAULT; void create() { ::create(); set_properties( ([ "no castle" : 1,"light" : 2, "indoors" : 1]) ); set_short("a house with a thatched roof"); set_long( "The small thatch covered house has been standing for many years. " "It is the dwelling of an old, dishonored knight. The house " "is very sparse, devoid of any decorations or furnishings. The knight " "is quite poor and cannot afford any more than a few meager belongings. " "A rough wooden door leads into a room to the south, " "and north leads back to Sun Alley."); set_items( (["thatch" : "It is beginning to suffer from the weather " "and ill-keeping.", "house" : "It is very unimpressive.", "furnishing" : "Nothing.", "decoration" : "Absolutely nothing.", "door" : (: this_object(), "look_at_door" :) ]) ); set_exits( (["south" : "/domains/Praxis/locked", "north" : "/domains/Praxis/sun1"]) ); set_door("door", "/domains/Praxis/locked", "south", "honor key"); present("knight")->force_me("close door"); present("knight")->force_me("lock door with key"); } void reset() { object mon, key; ::reset(); if(!present("knight")) { mon = new("/domains/Praxis/obj/mon/knight"); mon->move(this_object()); new("/domains/Praxis/obj/armour/helm")->move(mon); mon->command("wear helm"); key = new(OBJECT); key->set_name("key"); key->set_id( ({ "key", "honor key" }) ); key->set("short", "a wooden key"); key->set("long", "The wooden key is very coarse, and rough. " "It doesn't look like it would lead to anything of " "importance."); key->set_value(15); key->set_weight(40); key->move(mon); } if(query_reset_number() != 1) { present("knight")->force_me("close door"); present("knight")->force_me("lock door with key"); } } void look_at_door() { if(query_open("door")) write("It is open."); else write("It is closed."); }