inherit "/d/Imperium/std/library_std";

#include "lakshmi.h"
#include "library.h"

void
create_imperium_room()
{
  restore_object(LIBRARY_DIR+"saveob");
  set_short("Biblioteka");
  set_long("Znajdujesz sie w olbrzymim pomieszczeniu wypelnionym " +
  "poustawianymi jedna przy drugiej dlugimi szafami pelnymi ksiazek. " +
  "Po sali kreci sie kilku bibliotekarzy, ktorzy pomagaja " +
  "wypozyczajacym w znalezieniu szukanych ksiazek oraz odbieraja " +
  "zwracane egzemplarze. Na scianie wisi duza tablica z wypisanymi " +
  "zasadami obowiazujacymi korzystajacych z biblioteki.\n");

  add_item(({"szafe", "szafy", "polke", "polki", "ksiazki"}), 
    "Wysokie az do sufitu szafy sa wykonane z solidnego drewna, jednak " +
    "wydaje sie, jakby w kazdej chwili mialy runac pod ciezarem " +
    "zgromadzonych w nich ksiazek. Szafy ciagna sie rownymi rzedami przez " +
    "cala dlugosc sali. Komus niezorientowanemu trudno byloby znalezc " +
    "tutaj interesujaca go ksiazke. Dlatego pomoca sluza bibliotekarze.\n");
  add_item(({"bibliotekarza", "bibliotekarzy"}), 
    "Bibliotekarze krzataja sie po calym pomieszczeniu zajeci " +
    "inwentaryzacja ksiazek i obslugiwaniem wypozyczajacych.\n");
  add_item("tablice","Moze lepiej ja przeczytac?\n");
  add_cmd_item(({"tablice", "zasady"}), "przeczytaj", 
    "Witamy w Bibliotece Zakonu Rycerzy Sigmara Mlotodzierzcy.\n" +
    "Prawo do korzystania z ksiegozbioru maja wszystkie zainteresowane " +
    "osoby, co gwarantuje im dekret Wielkiej Elektorki " +
    "o upowszechnianiu literatury.\n" +
    "W bibliotece nalezy zachowac spokoj. Obowiazuje calkowity zakaz " +
    "palenia. Z ksiegozbioru wolno korzystac wylacznie na terenie " +
    "biblioteki, a wynoszenie woluminow poza brame biblioteki jest " +
    "zabronione.\n" +
    "Aby zorientowac sie, jakie ksiazki mozna wypozyczyc, nalezy " +
    "wykonac komende <spis>. Komendy <wypozycz> i <zwroc> nie wymagaja " +
    "komentarza. Kazdy z korzystajacych z biblioteki moze rowniez " +
    "napisac wlasna ksiazke (z pomoca komendy <napisz>) i przedstawic " +
    "ja administracji biblioteki. Jezeli ksiazka zostanie uznana za " +
    "wartosciowa, zostanie opublikowana i udostepniona w zbiorach " +
    "tutejszej biblioteki.\n");

/* Tutaj znajduja sie wyjscia. wyjdz() nie pozwala graczowi wyjsc bez zwrotu
    wypozyczonych ksiazek  */    

  add_exit(NPATH + "droga7.c", "wschod", "@@wyjdz");
  add_exit(PATH + "library/tajna/biblioteka.c", "poludnie", "@@tajna", 0, 1);

/* Pokoj administratora biblioteki */
  add_exit(LIBRARY_DIR + "admin.c","zachod","@@wcheck",1);

  add_prop(ROOM_I_LIGHT, 5);
  add_prop(ROOM_I_INSIDE, 1);

  set_event_time(20.0, 130.0);
  add_event("Przez sale przechodzi niski czlowiek w bialej szacie.\n");
  add_event("Do jednej z szafek podchodzi mag i przeglada umieszczone " +
            "w niej ksiazki.\n");
  add_event("Po sali rozchodzi sie odglos niewielkiej maszyny drukarskiej.\n");
  add_event("Jedna z lamp oswietlajacych biblioteke zaczyna powoli " +
  	    "przygasac.\n");
  add_event("Przez sale przechodzi stary wozny z niewielkim pojemnikiem, " +
  	    "z ktorego uzupelnia oliwe w lampach.\n");
  add_event("Z glebi sali dobiega cie glosny zgrzyt odsuwanego krzesla.\n");
  add_event("Niezmacona cisze tego miejsca rozdziera przerazliwy zgrzyt " +
  	    "gilotyny tnacej papier.\n");
  add_event("Jeden z bibliotekarzy ucisza halasliwego goscia na koncu " +
  	    "sali.\n");
  set_events_on(1);
  set_katalog_biblioteki(LIBRARY_DIR);
  set_katalog_usunietych(LIBRARY_DIR+"usuniete/");
  set_zarzadca(ZARZADCA);
  set_nazwa_dop("Biblioteki Zakonu Sigmara Mlotodzierzcy");
}

void 
init()
{
  ::init(); 
  init_library();
}

int tajna()
{
	int i=PRAWA->sprawdz_prawa(BIBLIOTEKA_TAJNA,TP);
	if (!i) write("Nie widzisz zadnego wyjscia prowadzacego na poludnie.\n");
	return !i;
}