/* Plik:         dom5.c
 * Autor:        Kaes
 * Data:         98
 * Opis:         dom gdziestam
*/

#include "/sys/stdproperties.h"
#include "kaes.h"
#include "/d/Imperium/sys/alarm.h"
inherit "/d/Imperium/std/room";
string opis_pory_roku();
object ludz;

void
create_imperium_room()
{
   add_prop(ROOM_I_LIGHT,1);

   add_prop(ROOM_I_INSIDE,1);

   set_short("Dom w wiosce");

   set_long("@@dlugi_opis");


   add_exit(PATH+"lokacje/wioska4.c","polnoc");

   add_item(({"wioske","bydynki","zabudowania"}),"Musisz wyjsc na zewnatrz zeby wiecej zobaczyc.\n");
   add_item(({"domek","dom","wnetrze","sufit","sciany"}),"Nie widzisz juz nic wiecej.\n");
   add_item(({"ognisko","popiol","zagwie","podwyzszenie"}),
     "Sa tutaj dwa miejsca na ogniska. Sadzac po ilosci popiolu wokol "+
     "czesto uzywane.\n");
   add_item(({"kurz","pajeczyny"}),"Brudno tutaj...\n");
   add_item("symbole","Nie masz pojecia co to za symbole.\n");
   set_alarm(5.0,60.0,"eventsy");
  dodaj_npca(PATH+"npc/slepchil.c",DNI);
}

void eventsy()
 {
   set_event_time(20.0,150.0);
   if(pora_dnia()=="noc"||pora_dnia()=="polnoc")
    {clear_events();
     add_event("Okiennice nagle otwieraja sie z hukiem.\n");
     add_event("Jeden z symboli wydaje sie swiecic.\n");
     add_event("Na zewnatrz slyszysz glosne chrzakanie oraz odglos kopyt.\n");
     add_event("Zaslona w wejsciu poruszyla sie na chwile, jakby ktos ja uniosl, "+
      "po czym szybko opada i zamiera w bezruchu.\n");
     add_event("Gdzie sie podziali wszyscy mieszkancy?\n");
     }
    else
     {clear_events();
      add_event("Po pajeczynie przemyka sie duzy, czarny pajak.\n");
      add_event("Slyszysz szczekanie psow.\n");
      add_event("Wieje silny wiatr.\n");
     }
   set_events_on(1);
}

string dlugi_opis()
{
 return("\nZnajdujesz sie wewnatrz budynku. Pomieszczenie jest calkiem puste, "+
    "wyglada na nie uzywane. Na srodku widzisz okrag otoczony osmolonymi "+
    "kamieniami. Wewnatrz jest jeszcze troche popiolu, jednak niewiele. "+
    "Na scianach widzisz kilka dziwnych symboli, "+
       opis_pory_roku());
}

string
opis_pory_roku()
{
  string opis="";
  if(pora_dnia()=="noc"||pora_dnia()=="polnoc") opis+="jednak trudno ci w nocy je dokladniej ogladnac. "+
    "W katach znajduja sie duze pajeczyny, a cala podloge pokrywa gruba warstwa kurzu.\n";
  else  opis+="lekko juz wyblaklych i miejscami juz calkowicie "+
    "wytartymi. W niektorych miejscach znajduja sie ogromne pajeczyny, a cala podloge "+
    "pokrywa gruba warstwa kurzu.\n";
  return opis;
}