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

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

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/wioska3.c","wschod");

   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(({"lozka","koce"}),"Wszystkie lozka ulozone sa pod sciana tak, "+
     "by byl do nich swobodny dostep.\n");
   set_alarm(5.0,30.0,"eventsy");
}

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("Zagwie na chwile rozpalaja sie mocniej.\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");
     add_event("Zagwie na chwile przygasaja.\n");
     }
    else
     {clear_events();
      add_event("Ogien wesolo trzaska posrodku.\n");
      add_event("Slyszysz szczekanie psow.\n");
      add_event("Dym na chwile gestnieje w pokoju, jednak szybko ucieka przez okna.\n");
      add_event("Do srodka wchodzi powoli mezczyzna, wyciaga powoli rece "+
       "przed siebie, po czym wychodzi szybko.\n");
     }
   set_events_on(1);
}

string dlugi_opis()
{
 return("\nZnajdujesz sie wewnatrz domu. Rozgladajac sie, widzisz, ze pomieszczenia "+
   "jest przedzielone na dwie rowne czesci. W kazdej z nich znajduje sie niewielkie "+
   "miejsce na ognisko oraz pare lozek. "+
       opis_pory_roku());
}

string
opis_pory_roku()
{
  string opis="";
  if(pora_dnia()=="noc"||pora_dnia()=="polnoc") opis+="W jednym miejscu zagwie jeszcze plona, jednak bardzo slabo. "+
    "Niektore lozka sa przykryte ladnie ulozonymi kocami, inne natomiast "+
    "to same deski bez zadnego kawalka przykrycia na nich. Sciany w niektorych "+
    "miejscach sa lekko ciemniejsze, jednak nie widzisz czemu. Momentami wydaje ci "+
    "sie, ze wszedobylska mgla wypelnia rowniez ten pokoj, jedna jest to wrazenie "+
    "na tyle ulotne, ze nie mozesz byc pewny.\n";
  else  opis+="Jedno ognisko plonie dosyc mocno, natomiast "+
    "drugie jest przygaszone i sie ledwo zarzy. Wszystkie lozka sa przykryte "+
    "ladnie ulozonymi kocami, a cale pomieszczenie jest wypelnione silnymi "+
    "promieniami slonca.\n";
  return opis;
}