/* Wrota podstawowe wiodace gdzies tam
 * napisane przez Alfena
 */
#include "local.h"
#include <pl.h>
inherit "/std/door";
void
create_brama()
{
	set_pass_command("polnoc");
}
void
create_door()
{
	ustaw_nazwe(({ "brama", "bramy", "bramie", "brame", "brama",
            "bramie" }), ({ "bramy", "bram", "bramom", "bramy", "bramami",
            "bramach" }), PL_ZENSKI);
	dodaj_przym("stalowy", "stalowi");
	
	create_brama();
	
	set_door_desc("Skrzydla "+
        	short(PL_DOP)+" zostaly wukute z metalu przypominajacego "+
		"zelazo, jednakze nie znac po nich nawet sladu uplywu czasu. "+
		"Dziwne wzory i ryty, pokrywajace ten metal lsnia wlasnym, "+
		"czerwonkawym blaskiem.\n");
	set_open(0);
	
	set_fail_pass(capitalize(short(PL_MIA))+" jest zamknieta.\n");
	set_open_command("otworz");
	set_open_mess(({"z trudem otwiera "+
		short(PL_BIE)+".\n","Ze zgrzytem i rumorem "+
		"ktos otworzyl "+
		short(PL_BIE)+".\n","Z wielkim trudem otworzyles "+
		short(PL_BIE)+".\n"}));
	set_fail_open(({capitalize(short(PL_MIA))+" jest juz otwarta.\n",
		capitalize(short(PL_MIA))+" nawet nie drgnela.\n"}));
	set_close_command("zamknij");
	set_close_mess(({"z trudem zamyka "+
	short(PL_BIE)+".\n","Ze zgrzytem i rumorem "+
		"ktos zamknal "+
		short(PL_BIE)+".\n","Z wielkim trudem zamknales "+
		short(PL_BIE)+".\n"}));
	set_fail_close(capitalize(short(PL_MIA))+" jest juz zamknieta.\n");
	set_locked(0);
	set_lock_name("");
	set_lock_desc("");
	set_lock_mess(({"","",""}));
	set_fail_lock(({"",""}));
	set_fail_unlock("");
	set_unlock_command("");
	set_unlock_mess(({"","",""}));
	set_str(50);
	
	add_item(({"wzory","ryty"}),"Wzory i ryty bardzo przypominaja za"+
		"ginione runy lub tez pismo, jak uwazaja niektorzy, "+
		"starych Slannow.\n");
	add_cmd_item(({"rytow","wzorow","runow"}),({"dotknij"}),
		"Ryty sa w dotyku chlodne "+
		"i nie przejawiaja zadnych magicznych wlasciwaosci.\n");
	
	
	set_open_desc("Otwarta "+
		short(PL_MIA)+" prowadzaca na "+
		query_pass_command()[0]+".\n");
	set_closed_desc("Zamknieta "+
		short(PL_MIA)+" prowadzaca na "+
		query_pass_command()[0]+".\n");
	set_pass_mess("na "+query_pass_command()[0]
		+" pod lukowym sklepieniem "+
		short(PL_DOP)+".\n");
}