/* Plik:         las2.c
 * Autor:        Kaes
 * Data:         30.11.91
 * Opis:         Las- cd.
*/

#include "/sys/stdproperties.h"
#include "kaes.h"

inherit "/d/Imperium/std/las";

string opis_pory_roku;

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

   add_prop(ROOM_I_INSIDE,0);

   set_short("Zachodnia czesc lasu");

   set_long("@@dlugi_opis");

   add_exit(PATH+"lokacje/las1.c","wschod");
   add_exit(PATH+"lokacje/las4.c","poludnie");

   add_item(({"drzewa","las","konary"}),
      "Stoisz w starym, gestym lesie otaczajacym cie z kazdej strony. Jedno "+
      "z drzew jest ogromne, wrecz przytlaczajace.\n");
   add_item(({"drzewo","ogromne drzewo","duze drzewo"}),
      "Drzewo ma kilka metrow srednicy, jego galezie rozkladaja sie w kazda "+
      "strone swiata.\n");
   add_item(({"sciezke","drozke","przecinke"}),
      "Sciezka prowadzi przez waska przecinke wycieta przez las.\n");
   add_item("korzenie",
      "Korzenie tego drzewa wystaja z ziemi gdzie okiem siegnac.\n");
   set_alarm(5.0,60.0,"eventsy");
}

void eventsy()
{
   set_event_time(20.0,150.0);
   if(pora_dnia()=="noc"||pora_dnia()=="polnoc")
    {clear_events();
     add_event("Galezie w lesie poruszaja sie pod naglym podmuchem wiatru.\n");
     add_event("Ogromne drzewo jeczy przez chwile jak stary czlowiek.\n");
     add_event("Gdzies niedaleko, slyszysz skrzypienie starych drzew.\n");
     add_event("Cos szybko przelatuje ci kolo glowy.\n");
    }
    else
     {clear_events();
      add_event("Zwinna wiewiorka biega po galeziach duzego drzewa z orzechem "+
        "w lapkach.\n");
      add_event("Zza drzew wysuwa sie ciekawy swiata dzik, po czym znika w lesie.\n");
      add_event("Podmuch wiatru rozsuwa na moment korony drzew, pozwalajac "+
        "sloncu ogrzac niektore miejsca.\n");
      add_event("Niedaleko ciebie spada stara galaz.\n");
     }
   set_events_on(1);
}

string
opis_pory_roku()
{
  string opis="";
  if(pora_dnia()=="noc"||pora_dnia()=="polnoc") opis+="Kolo sciezki rosnie ogromne drzewo, ktorego "+
    "korzenie wyrastajace ponad ziemie przypominaja stado wscieklych wezy. "+
    "Mgla nie pozwala ci zobaczyc jak jest wysokie, jednak mozesz sie domyslic "+
    "patrzac na pien. Wszedzie panuje gesta mgla, rozwiewajaca sie miejscami "+
    "na chwile pod wplywem nocnego, chlodnego wiatru.\n";
  else
    opis+="Niedaleko sciezki rosnie ogromne drzewo, "+
    "prawdopodobnie najstarsze w lesie. Jego galezie siegaja wysoko w niebo, "+
    "oslaniajac okolice przed prazacym sloncem. Korzenie, wystajace z ziemi "+
    "w licznych miejscach, przecinaja cala sciezke ginac w wysokiej trawie "+
    "w lesie.\n";
  return opis;
}

string dlugi_opis()
{
  return("Stoisz w niewielkim aczkolwiek gestym lesie. Patrzac wzdluz sciezki, "+
    "w kazdym kierunku widzisz tylko drzewa. "
       + opis_pory_roku());
}