/* Plik:         grob.c
 * Autor:        Kaes
 * Data:         98
 * Opis:         grobowiec na cmentarzu
*/

#include "/sys/stdproperties.h"
#include "kaes.h"
#include "/d/Imperium/sys/alarm.h"
inherit "/d/Imperium/std/room";

object drzwi;
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/salabr1.c","wschod");
   add_exit(PATH+"lokacje/drzwi2.c","poludnie");
   add_cmd_item(({"zwloki","trupa","szkielet","druga trumne","cialo"}),"przeszukaj",
    "@@pierscien");
   add_item(({"grob","grobowiec"}),
     "Nie widzisz juz nic ciekawego.\n");
   add_item("dziure","Ciemna dziura.\n");
   add_item("trumny",
     "Widzisz trzy trumny. Jedna z nich jest calkiem rozwalona, w jej srodku "+
     "widzisz zmumifikowane cialo.\n");
   add_item(({"pierwsza trumne","trzecia trumne"}),
     "Zamknieta trumna lezy na ziemi.\n");
   add_item(({"cialo","zmumifikowane cialo","druga trumne"}),
     "W trumnie jest to szkielet pokryty skora i z siwymi wlosami na czaszce. "+
     "Jego puste oczodoly maja w sobie cos dziwnego, jednak trudno ci powiedziec "+
     "co to takiego. Ubrany jest w ciemno-czerwona, przegnila szate. U reki "+
     "brak mu dwoch palcow.\n");
   add_item("pochodnie","Na scianie plonie pochodnia dajac slabe zrodlo swiatla.\n");
     add_event("Z jednej trumny wydostaje sie czerwona mgielka.\n");
     add_event("Zapada nagla cisza, z rzadka przerywana dziwnymi odglosami.\n");
     add_event("Na zewnatrz slyszysz glosne chrzakanie oraz odglos kopyt.\n");
     add_event("Pochodnia przygasa na chwile.\n");
   set_events_on(1);
   reset_imperium_room();
   dodaj_npca(PATH+"npc/stwor.c",NOCE);
}

string dlugi_opis()
{
 return("\nZnajdujesz sie wewnatrz grobowca. W srodku jest on niewielki, "+
   "ograniczony krzywymi scianami. Na jednej z nich plonie pochodnia dajac "+
   "slabe oswietlenie. Pod sciana widzisz dwie lezace trumny, zamkniete, "+
   "nie naruszone. Naprzeciwko nich, oparta o sciane stoi trzecia trumna, "+
   "calkowicie zniszczona i podziurawiona. Widzisz w niej zmumifikowane "+
   "zwloki, ledwo opierajace sie niszczycielskiej sile jaka jest czas. "+
   "Na wschod widzisz jakas dziure w scianie.\n");
}

string pierscien()
{ 
    write("Nic nie znajdujesz.\n");
    say(QCIMIE(this_player(), PL_MIA)+" przeszukuje zwloki.\n");
    return"";
}

void reset_imperium_room()
{
 if(!drzwi){
 drzwi=clone_object(PATH+"lokacje/drzwi2.c");
 drzwi->move(this_object());}
}