#include "../local.h"
inherit STD+"grobowiec_std.c";
int
pulapka()
{
TP->catch_msg("Probojesz isc na poludniowy-wschod jednak ze scian wylatuja "
	+"ostrza ciezko cie raniac.\n");
tell_room(ROOM+"krypta3.c",QIMIE(TP,PL_MIA)+" probuje isc na poludniowy-wschod, "
	+"lecz ze scian wylatuja ostrza ciezko "+TP->koncowka("go","ja")+" raniac.\n",({TP}));
TP->heal_hp(-(TP->query_max_hp())/2);
return 1;
}
create_krypta()
{
    set_short("Korytarz w grobowcu");
    set_long("Zapewne jeden z wielu korytarzy w tym kurhanie. Przecinaja "
	+"sie tutaj dwa korytarzyki, jeden biegnacy z polnocneg-zachodu "
	+"na poludniowy-wschod i drugi biegnacy z polnocy. Patrzac "
	+"ku polnocnemu-zachodowi spostrzegasz niewielka komnate, z "
	+"jakims ksztaltem ustawionym na samym jej srodku.\n");
    add_exit(ROOM+"krypta8", "poludniowy-wschod"); 
    add_exit(ROOM+"krypta5", "polnoc"); 
    add_exit(ROOM+"krypta3", "polnocny-zachod","@@pulapka",0); 

}
int
czolganie_sie(string gdzie)
{
notify_fail("Gdzie chcesz sie przeczolgac?\n");
if(gdzie=="sie na nw" || gdzie=="sie na polnocny-zachod" )
	{
	TP->catch_msg("Czolgasz sie na poludniowy-wschod, skutecznie omijajac pulapke.\n");
	tell_room(ROOM+"krypta3.c",QIMIE(TP,PL_MIA)+" przeczolguje sie na poludniowy-wschod.\n",({TP}));
	TP->move_living("M",ROOM+"krypta3.c");
	return 1;
	}
return 0;
}
void
init()
{
::init();
add_action("czolganie_sie","przeczolgaj");
}