#include "../local.h"
inherit STD+"grobowiec_std.c";
int strzala=8;
int
pulapka()
{
if(strzala<1)
	return 0;
if(TP->query_hp()<450)
	{
	TP->catch_msg("Ruszasz razno na poludniowy-zachod, 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 poludniowy-zachod, jednak "
		+"po chwili zaczyna zwalniac...\nRozglada sie uwaznie, by "
		+"po chwili odwrocic sie.\nStrzala laduje w "+TP->koncowka("jego","jej","bla")
		+"oku.\n",({TP}));
	strzala-=1;
	TP->set_hp(0);
	TP->do_die();
	return 1;
	}
if(TP->query_stat(1)>200)
	{
	TP->catch_msg("Ruszasz na poludniowy-zachod, 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 poludniowy-zachod, 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+"krypta12");
	strzala-=1;
	return 1;
	}
	TP->catch_msg("Ruszasz na poludniowy-zachod, jednak ni stad ni zowad czujesz potworny "
		+"bol w plecach. Trafila cie strzala.\n");
	tell_room(TO,QCIMIE(TP,PL_MIA)+" rusza razno na poludniowy-zachod. 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+"krypta12");
	strzala-=1;
	return 1;
}

create_krypta()
{
    set_short("Wielka komnata");
    set_long("Znajdujesz sie w wielkiej komnacie, bedacej miejscem spoczynku "
	+"dziesiatek osob. Jedni, gorzej postawieni moga ogladac swoje szczatki "
	+"na podlozu, inni bogatsi pochowani w ziemi. Najbogatszego "
	+"mozesz zauwazuc na srodku komnaty w trumnie.\n");
    clone_object(OBJ+"sarkofag5")->move(TO);
    add_exit(ROOM+"krypta12", "poludniowy-zachod","@@pulapka",0); 

}
