/* Plik:         sad.c
 * Autor:        Kaes
 * Data:         29.11.91
 * Opis:         Sad owocowy
 * Zrobic:       Jablka - zrywanie
*/

#include "/sys/stdproperties.h"
#include "kaes.h"
#include "/d/Imperium/sys/alarm.h"
inherit "/d/Imperium/std/laka";
string opis_pory_roku();
object ludz;
void
create_laka_room()
{
   add_prop(ROOM_I_LIGHT,1);

   add_prop(ROOM_I_INSIDE,0);

   set_short("Sad owocowy");

   set_long("@@dlugi_opis");
   

   add_exit(PATH+"lokacje/sciezka1.c","wschod",0);
   add_exit(PATH+"lokacje/skaly1.c","poludniowy-zachod",0);

   add_item(({"drzewo","drzewa","sad","jablonie"}),
     "@@drzewa");
   add_item(({"laki","lake"}),
      "Z miejsca gdzie stoisz, nie widzisz tam nic ciekawego.\n");
   add_item(({"sciezke","drozke"}),
      "Sciezka jest mocno zablocona, prowadzi przez sad.\n");
   add_item(({"jablka","owoce"}),
      "Widzisz owoce zarowno duze, dojrzale jak i male, zielone, wyuszone.\n");
   set_alarm(5.0,60.0,"eventsy");
    dodaj_npca(PATH+"npc/slepchil.c",DNI);
    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("Gdzies, w oddali, poprzez mgle widzisz przez chwile jakies swiatlo.\n");
     add_event("Jedno z drzew wydaje sie przysuwac w twoim kierunku.\n");
     add_event("Do twoich uszu dociera nieludzki krzyk...\n");
     add_event("Slyszysz trzask galezi.\n");
     }
    else
     {clear_events();
      add_event("Po ziemi przesuwa sie cien duzego ptaka.\n");
      add_event("Na ziemie spada jablko.\n");
      add_event("Czujesz na plecach powiew cieplego wiatru.\n");
      add_event("Slyszysz piekny spiew ptakow.\n");
     }
   set_events_on(1);
}

string dlugi_opis()
{
  return("\nZnajdujesz sie w malym sadzie owocowym. Na malych, "+
    "przygarbionych drzewkach widzisz jablka, niektore sa calkiem nisko. "+
       opis_pory_roku());
}
     
string
drzewa()
{  
  string opdrzew;
  int i;
   opdrzew="";
   i=random(3);
   if(pora_dnia()=="noc"||pora_dnia()=="polnoc")
    {
     if(i==0) opdrzew+="Widzisz drzewo, ktore chociaz male przywodzi ci na mysl "+
       "ogromna bestie. Powyginane, dlugie galezie zakonczone malymi galazkami "+
       "przypominaja dlugie, wygiete pazury wyciagniete aby rozszarpac twoja "+
       "szyje.\n";
     if(i==1) opdrzew+="Jedno z drzew, najwyzsze w okolicy, smukle, wyglada jak "+
       "tajemniczy kaplan, skrywajacy swa twarz za kapturem. Rece trzyma zlozone "+
       "na piersi i masz uczucie, jakby obserwowal cie uwaznie. Na szczescie "+
       "to tylko drzewo...\n";
     if(i==2) opdrzew+="Drzewo z rozrzuconymi galeziami w kazda strone, poruszanymi "+
       "od czasu do czasu wiatrem, wyglada jak gigantyczna osmiornica, machajaca "+
       "swoimi mackami w poszukiwaniu ofiary.\n";
    }
  else 
    {
     if(i==0) opdrzew+="Drzewo ktore przykuwa twoja uwage, wyglada jak silny, "+
      "wysoki czlowiek wznoszacy ramie z mieczem w gore. Przypomina ci "+
      "jednego z bohaterow ze starych legend.\n";
     if(i==1) opdrzew+="Dwa drzewa, splatane galezie, przytulone do siebie "+
      "jak para kochankow szepczaca sobie wyznania do uszu. Piekny widok.\n";
     if(i==2) opdrzew+="Mnostwo drzew, duze, male, niektore uginajace sie pod "+
      "ciezarem owocow, niektore suche, bez zycia.\n";
    }
   return opdrzew;
}

string
opis_pory_roku()
{
  string opis="";
  if(pora_dnia()=="noc"||pora_dnia()=="polnoc") opis+="Kilka drzew wyglada dosyc fantastycznie, "+
   "powykrecane ksztalty przywodza ci na mysl figury jak z najgorszych "+
   "koszmarow. Ziemia jest tutaj wilgotna, zablocona sciezka prowadzi "+
   "miedzy drzewami w zachodnia czesc doliny. W druga strone na lake "+
   "lezaca przed wioska.\n";
  else  opis+="Niektore drzewa sa fantazyjnie powyginane, przywodza ci "+
   "na mysl postacie z legend, bajek, opowiesci. Ziemia jest dosyc "+
   "wilgotna, sciezka prowadzi przez sad do zachodniej czesci doliny, badz "+
   "tez na lake lezaca na wzniesieniu przed wioska.\n";
  return opis;
}