/* Plik: pokoj_setha.c
 * Autor: Kaes
 * Data: 7.11.97
 * Last update: 7.11.97
 * Opis: Pokoj Setha 
*/

inherit "/d/Imperium/Nuln/std/room.c";
#include "kaes.h"
#include "/sys/stdproperties.h"
object npcseth;

int przeszukany = 0;

create_imperium_room()
{
 add_prop(ROOM_I_LIGHT,1);
 add_prop(ROOM_I_INSIDE,1);
 set_short("Pokoj Setha");
 set_long("@@dlugi_opis");
 add_exit(PATH+"loch_e.c","zachod");
 add_item(({"sale","komnate","pomieszczenie"}),"Nie widzisz nic ponadto, co "+
    "zauwazyles do tej pory.\n");
 add_item(({"sciany","sciane"}), "Do scian prztroczonych jest wiele "+
    "pochodni oswietlajacych cale pomieszczenie.\n");
 add_item("pochodnie", "W sali znajduje sie kilka palacych sie pochodni.\n");
 add_item(({"poslanie","brudne poslanie","zmietoszone poslanie"}),
   "Poslanie jest brudne, zmietoszone i widzisz jakies robale chadzace po nim.\n");
 add_item("sufit"," Nie jest zbyt ciekawy.\n");
 add_item(({"kat pokoju","kat"}), "W kacie lezy brudne poslanie.\n");
 add_item(({"kawalki jedzenia","jedzenie"}),
     "Wiekszosc tego jedzenia nie nadaje sie do konsumpcji.\n");
 add_item(({"stosik","stos"}),"Po blizszych ogledzinach z obrzydzeniem "+
     "widzisz, ze ten maly stosik sklada sie z martwych szczurow.\n");
 add_item("podloge","Podloga jest poplamiona krwia... i jeszcze czyms innym.\n");
 add_item(({"krew","plamy krwi"}), "Ciekawe czy to krew ludzka...?\n");
 add_item(({"ciecz","lsniaca ciecz"}),"Nie masz najmniejszego pojecia "+
   "co to moze byc.\n");
 add_cmd_item(({"stosik","stos","szczury"}),({"podnies","porusz"}),"@@stos");
 add_cmd_item("poslanie",({"podnies","porusz"}),"@@poslanie");
 add_cmd_item(({"jedzenie","kawalki jedzenia"}),({"podnies","zabierz"}),"@@zarcie");
 add_cmd_item(({"pokoj","komnate","pomieszczenie","sale"}),"przeszukaj","@@szukanie");
 set_event_time(10.0,100.0);
 add_event("Na ziemi pojawia sie nowa plama krwi, tak jakby wyplynela "+ 
   "wprost spod podlogi.\n");
 add_event("Czujesz podmuch chlodnego wiatru na twarzy.\n");
 add_event("Cos przebiega ci pod nogami.\n");
 set_events_on(1);
 reset_imperium_room();
}
string stos()
{ write("Nie jest to cos, co chcialbys ruszac.\n"); 
 return"";
}

string poslanie()
{
 write("Gdy podnosisz poslanie widzisz mnostwo karaluchow uciekajacych w "+
   "poplochu.\n");
 say(QCTNAME(this_player())+" sprawdza ostroznie poslanie.\n");
 return"";
}

string zarcie()
{ 
 write("Probujesz wziac kawalek jedzenia po czym odrzucasz go ze wstretem.\n");
 say(QCTNAME(this_player())+" bierze do reki kawalek jedzenia, po czym "+
  "odrzuca go daleko.\n");
 return"";
}

reset_imperium_room()
{
 if(!npcseth)
  {
   npcseth=clone_object(PATH+"seth.c");
   npcseth->szykuj();
   npcseth->move(this_object());
   }
    przeszukany = 0;
}

string dlugi_opis()
{
 return("Znajdujesz sie w duzej, jasno oswietlonej komnacie. Na scianach "+
  "widzisz pochodnie, ktore oprocz swiatla daja tez mile cieplo. W kacie pokoju "+
  "jest stare poslanie, zmietoszone i brudne. Wszedzie walaja sie kawalki "+
       "jedzenia. Pod jedna ze scian znajduje sie maly, szary stosik. Podloga "+
  "w niektorych miejscach jest splamiona krwia i jakas lsniaca ciecza. "+
  "Pomieszczenie nie jest wyposazone w nic innego.\n");
}

string szukanie()
{
   if (!npcseth)
   {
       if(przeszukany)
       {
       write("Przeszukujesz cala komnate, lecz nie znajdujesz nic godnego " +
           "uwagi.\n");
       say(QCTNAME(this_player())+" przeszukuje komnate.\n");
       return"";
       }      
   
      clone_object(PATH + "notes.c")->move(this_player());
      write("Przeszukujesz uwaznie cala komnate. Gdy juz zrezygnowany "+
       "masz zamiar zaprzestac poszukiwan, nagle w twoje rece wpada maly notes.\n");
      say(QCTNAME(this_player())+" przeszukuje komnate.\n");
      this_player()->add_prop("kaesquest_0_2_przeszukal_pokoj_setha",1);
      przeszukany = 1;
      return"";
    }
   else 
    {
     write("Probujesz przeszukac komnate, jednak Seth nie pozwala ci na to.\n");
     say(QCTNAME(this_player())+" nie zwazajac na Setha probuje przeszukac pokoj."+
      " Jednak on nie pozwala mu na to.\n");
      return"";
    }
}