/* wynajem szczurow
 * napisane przez Alfena
 */
#include "local.h"
inherit TPATH + "std/twierdza";
void
create_twierdza()
{
	set_long("Znajdujesz sie w malenkiej komnatce pelej zelaznych "+
		"klatek ze szczurami. Panuje tu nieopisany zaduch. "+
		"Delikata won szczurzych odchodow mile pieszcze koniuszki "+
		"wechowe kazdego znawcy, a nieustanny pisk i chroboty, "+
		"wspaniale charmonizuja z eklektycznym wyposazeniem "+
		"tego miejsca. "+query_long()+" Jedyna rzecza "+
		"przyciagajaca uwage jest tabliczka umocowana do "+
		"jednej z klatek.\n");
	set_short("Wynajem Szczurow");
	
	add_item(({"klatki","zelazne klatki"}),"Zelazne klatki trzymaja "+
		"na uwiezi setki wyglodniaych czarnych szczurow. "+
		"Nie zauwazasz zadnego skobla, czy rygla zamykajacego "+
		"klatki.\n");
	add_cmd_item(({"kaltki","klatke","zelazne klatki","zelazna klatke"}),
		"otworz","Niestety nie mozesz znalezc sposobu, by to uczynic.\n");
	
	add_item("tabliczke","Widnieje na niej jakis napis.\n");
	
	add_cmd_item(({"tabliczke","napis","napis na tabliczce"}),
		({"przeczytaj"}), ({"@@tabliczka@@"}));
	reset_twierdza();
	
	add_exit(TPATH + "lokacje/wn8", "polnoc");
}
string
tabliczka()
{
	object ob=present("szczurolap");
	
	if (objectp(ob))
		return ob->tabliczka();
	return "B..... HHH.................DD............DDD.AS.\n"+
		"Reszta napisu jest nie do odczytania z powodu zakrzeplej "+
		"krwi.\n";
}
void
reset_twierdza()
{
	object ob;
	
	if (!present("szczurolap"))
	{
		ob = clone_object(TPATH + "npc/szczurolap");
		ob -> szykuj();
		ob->move_living("M",this_object());
	}
}