/* sklep,
 * napisane przez Alfena
 */

#include "local.h"

inherit TPATH + "std/twierdza";

void
create_twierdza()
{
	set_short("Mily Maly Sklepik");
	set_long("Znajdujesz sie w malej komnatce, ktorej posadzka "+
		"zostala czesciowo zaslonieta przez resztki rozpadajacego "+
		"sie dywanu. "+query_long()+" Do wiekszosci "+
		"scian przymocowano drewniane polki. Na jednej z nich "+
		"wisi przybita zardzewialym gwozdziem metalowa plytka. "+
		"Sklep wyglada na schludny, oczywiscie o ile nie liczyc "+
		" zielonkawego sluzu okazyjnie skapujacego na podloge.\n");
	
	add_exit(LPATH + "magazyn", "zachod", "@@wiz_check@@", 1);
	
	add_item( ({ "instrukcje", "plytke", "metalowa plytke" }), 
		"Na metalowej plytce zostaly zapewne napisane jakies "+
		" wskazowki "+
		"dla klientow.\n");
	add_item(({"dywan", "resztki dywanu"}),
		"Koneser zapewne dojrzalby w tej plontaninie nici i "+
		"robali, jakies godne uwagi szczegoly.\n");
	add_item( "polki", "Polki sa puste, o ile nie liczyc robaczkow "+
		"okazyjnie wedrujacych od jednego konca do drugiego.\n");
	
	add_cmd_item( ({ "instrukcje", "plytke", "metalowa plytke",
		"wskazowki" }), "zerwij", "Moze to dziwne, ale plytka jest "+
		"zadziwiajaco dobrze przytwierdzona do polki.\n");
	add_cmd_item( ({ "instrukcje", "plytke", "metalowa plytke",
		"wskazowki" }), "przeczytaj",
		"@@tabliczka@@");
	reset_twierdza();
	
	add_exit(TPATH + "lokacje/wn5", "wschod");
}


string
tabliczka()
{
	object ob=present("sklepikarz");
	
	if (objectp(ob))
		return ob->standard_shop_sign();
	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("sklepikarz"))
	{
		ob = clone_object(TPATH + "npc/sklepikarz");
		ob -> szykuj();
		ob->move_living("M",this_object());
	}
}
