inherit "/d/Imperium/Zakon/zamek/zamek_std.c"; 

#include "lakshmi.h"
#include "/d/Imperium/Zakon/engine/ryc_zak.h"
#include "/d/Imperium/Zakon/engine/prawa.h"
 
reset_imperium_room()
{
 	setuid();
    seteuid(getuid()); 
}

create_imperium_room()
{
	add_prop(ROOM_I_INSIDE, 1);
	set_short("Sypialnia braci sluzebnych");
 	set_long(" Jestes w przestronnym, surowo urzadzonym pokoju. Wzdluz scian"
 		+" stoja waskie, twarde prycze, przykryte kocami. "+
 		"Panuje tu atmosfera spokoju i odpoczynku, mimo, ze jest troche "+
 		"duszno. Swiatlo daja "+
 		"w nocy nieliczne, stojace na"
 		+" przyczepionych do scian kandelabrach swiece, w dzien zas wpadajace"
 		+" przez waskie okno promienie slonca. Pomieszczenie to sluzy za"
 		+" sypialnie braciom sluzebnym.\n");

 	add_item(({"okno"}), "W pokoju jest tylko jedno okno. Jest ono szerokie, "
 		+"jednak u gory zweza sie, konczac ostrym czubkiem. Okno nie jest"
 		+" zasloniete zadnymi zaslonami.\n");
 	add_item(({"lozka","prycze"}),"Waskie prycze sluza braciom sluzebnym do "+
 	    "odpoczynku. Nie sa zbyt wyszukane, ani specjalnie wygodne.\n");
 	add_item(({"koce"}),"Szare koce przykrywaja drewniane prycze.\n");
 	add_item(({"kandelabry","swiece"}),
 	   "Wiszace na scianach kandelabry maja za zadanie rozpraszac mroki nocy.\n");
 	   	
 	add_exit(NPATH + "pietro4.c","poludnie",0,1,0);
 	reset_imperium_room();	

    clone_object(PATH + "engine/szafa")->move(this_object());
}

int
startuj(string str)
{
	if (str!="tutaj")
		{
			notify_fail("Gdzie chcesz od tej pory spac?\n");
			return 0;
		}
	if (!czy_brat())
		{
			notify_fail("Nie masz prawa tutaj spac. Musisz zostac bratem sluzebnym.\n");
			return 0;
		}
	if (czy_rycerz())
		{
			write("Jestes pewny, ze chcesz tutaj spac? Jest to dozwolone, ale "
				+"pamietaj ze plamisz honor rycerza sypiajac z bracmi "
				+"sluzebnymi.\n");
		}
	if (TP->set_default_start_location(MASTER_OB(this_object())))
		{
			write("OK.\n");
			return 1;
		}
	notify_fail("Sala jest przepelniona. Popros Wielkiego Mistrza lub innego "
		+"czlonka Kapituly Zakonnej o uregulowanie sprawy twojego noclegu.\n");
	return 0;
}


int
zaczynaj(string str)
{
	if (str!="w nuln")
		return 0;
	TP->set_default_start_location("/d/Imperium/Nuln/sklepy/karczma1");
	write("Od tej pory bedziesz sie budzic w karczmie w Nuln.\n");
	return 1;
}


init()
{
	::init();
	add_action("startuj","spij");
	add_action("zaczynaj","zaczynaj");
}
