#include "../local.h"
inherit STD+"grobowiec_std.c";
int strzala=4+random(10);
int
pulapka()
{
if(strzala<1)
	return 0;
if(TP->query_hp()<450)
	{
	TP->catch_msg("Ruszasz razno na polnocny-wschod, jednak po chwili zaczynasz "
		+"zwalniac...\nZaraz zaraz cos jest nie tak.\nOdwaracasz sie, a "
		+"strzala laduje w twoim oku. To juz jest koniec.\n");
	tell_room(TO,QCIMIE(TP,PL_MIA)+" rusza razno na polnocny-wschod, jednak "
		+"po chwili zaczyna zwalniac...\nRozglada sie uwaznie, by "
		+"po chwili odwrocic sie.\nStrzala laduje w "+TP->koncowka("jego","jej","bla")
		+"oku.\n",({TP}));
	TP->set_hp(0);
	TP->do_die();
	strzala-=1;
	return 1;
	}
if(TP->query_stat(1)>200)
	{
	TP->catch_msg("Ruszasz na polnocny-wschod, jednak po chwili twoje fachowe "
		+"ucho slyszy cos podejrzanego.\nOdruchowo odchylasz sie, a strzala "
		+"przecina powietrze tuz obok ciebie.\n");
	tell_room(TO,QCIMIE(TP,PL_MIA)+" rusza razno na polnocny-wschod, jednak "
		+"po chwili zaczyna sie czujnie rozgladac.\nOdruchowo odchyla sie, a "
		+"strzala przecina powietrze tuz obok "+TP->koncowka("niego","niej","tegoczegos")
		+".\n",({TP}));
	TP->set_fatigue(TP->query_fatigue()-25);
	TP->add_panic(20+random(30));
	TP->move_living("M",ROOM+"krypta13");
	strzala-=1;
	return 1;
	}
	TP->catch_msg("Ruszasz na polnocny-wschod, jednak ni stad ni zowad czujesz potworny "
		+"bol w plecach. Trafila cie strzala.\n");
	tell_room(TO,QCIMIE(TP,PL_MIA)+" rusza razno na polnocny-wschod. Po chwili zatrzymuje sie "
		+"i zaczyna glosno jeczec. Trafila "+TP->koncowka("go","ja","je")
		+"strzala.\n",({TP}));
	TP->heal_hp(-TP->query_stat(2)*3);
	TP->move_living("M",ROOM+"krypta13");
	strzala-=1;
	return 1;
}

create_krypta()
{
    set_short("Korytarz w grobowcu");
    set_long("Znajdujesz sie w jednym, z wielu korytarzy tego grobowca. "
	+"Od scian bije zimno, a z gory kapia krople wody. Rozgladajac "
	+"sie wokol zauwazasz jedynie szczatki istot, o wszelkich "
	+"rasach. Na polnocnym-wschodzie i poludniowym-zachodzie "
	+"zauwazasz komnaty, bedace zapewne miejscami, w ktorych "
	+"skladano bardziej znaczace postaci.\n");
    add_exit(ROOM+"krypta13", "polnocny-wschod","@@pulapka",0); 
    add_exit(ROOM+"krypta14", "poludniowy-wschod"); 
    add_exit(ROOM+"krypta11", "polnocny-zachod"); 
}