/* Plik:         salabr1.c
 * Autor:        Kaes
 * Data:         98
 * Opis:         grobowiec na cmentarzu
*/

#include "/sys/stdproperties.h"
#include "kaes.h"
inherit "/d/Imperium/std/room";
void reset_imperium_room();
int open();

object straznik;
void
create_imperium_room()
{
   add_prop(ROOM_I_LIGHT,1);

   add_prop(ROOM_I_INSIDE,1);

   set_short("Wewnatrz grobowca");

   set_long("@@dlugi_opis");
   add_exit(PATH+"lokacje/salabr2.c","wschod","@@open");
   add_exit(PATH+"lokacje/grob.c","zachod");
   add_item(({"grob","grobowiec"}),
     "Nie widzisz juz nic ciekawego.\n");
   add_item("sale","Duza, podziemna jaskinia. Powstala prawdopodobnie w sposob"+
   "naturalny. Jest tu dosyc zimno, co odczuwasz na wlasnym ciele.\n");
   add_item("drzwi","Duze, kamienne drzwi wbudowane w skaly, leza na wschodzie.\n");
   add_item("podloge","Podloga jest wyszlifowana tak, ze odbija sie w niej "+
       "blask pochodni.\n");
   add_item("sufit","Nisko nad glowa widzisz sufit, z ktorego od czasu "+
     "do czasu zwieszaja sie kropelki wody.\n");
   add_item("pochodnie","Pochodnie oswietlaja cale pomieszczenie. Ich "+
     "swiatlo odbija sie w lsniacych scianach dajac dodatkowe swiatlo.\n");
 add_item(({"kolumny","skalne kolumny"}),"Grube, skalne kolumny, wygladaja jakby "+
 "podtrzymywaly strop.\n");
   add_event("Cisza...\n");
   add_event("Chlap...chlap...\n");
   set_events_on(1);
   reset_imperium_room();
}

string dlugi_opis()
{
 return("\nZnajdujesz sie w duzych rozmiarow, podziemnej jaskini. Jest bardzo "+
    "szeroka i dluga, natomiast strop znajduje sie niewiele nad glowa. Czarne "+
    "sciany polyskuja miejscami srebrzyscie, dodajac calemu miejscu odrobine "+
    "atmosfery tajemniczosci, nierealnosci ale i grozy zarazem. Po twojej prawej "+
    "stronie znajduja sie grube, naturalne kolumny skalne, po ktorych powoli splywa "+
    "woda. Grunt jest dosyc wilgotny, w kilku miejscach polyskuja kaluze.\n");
}

void reset_imperium_room()
{
  if(!straznik)
   {
    straznik=clone_object(PATH+"npc/brat1.c");
    straznik->szykuj();
    straznik->move(this_object());}
}

 int open()
{
 if(!straznik)
  {
  write("Drzwi sa zamkniete. Nie widzisz sposobu zeby je otworzyc.\n");
  return 1;}
 else 
  {
   if(this_player()->query_prop("_07_kaes_odpowiedzial_na_zagadke_"))
   return 0;
   else {
   write("Starzec zastawia ci droge.\n");
   return 1;
   }
  }
}
 
