/* Plik:         cmentar1.c
 * Autor:        Kaes
 * Data:         29.11.91
 * Opis:         Cmentarz na poludnie od wioski slepych
*/

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

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

   add_prop(ROOM_I_INSIDE,0);

   set_short("Wejscie na maly cmentarz");

   set_long("\nZnajdujesz sie przy wejsciu na maly cmentarz. Stoisz pomiedzy "+
      "kupkami kamieni, prawdopodobnie sa to pozostalosci po starej, "+
      "cmentarnej bramie. " +
       "@@opis_pory_roku@@");

   add_exit(PATH+"lokacje/cmentar2.c","poludniowy-wschod");
   add_exit(PATH+"lokacje/wioska3.c","polnoc");
   add_exit(PATH+"lokacje/przejscie.c","wschod");
   
   add_item(({"cmentarz","groby","nagrobki"}),
      " Niektore groby wygladaja na bardzo stare, jednak niektore sprawiaja "+
      "wrazenie calkiem nowych. Kawalek dalej znajduje sie calkiem spory "+
      "grobowiec.\n");
   add_item(({"kamienie","kupke kamieni","brame","stara brame","cmentarna brame"}),
      "Widzisz tylko pozostalosci po czyms, co bylo cmentarna brama. Wszystkie "+
      "kamienie sa gladkie, granatowe, poprzecinane zoltymi zylkami.\n");
   add_item(({"grobowiec"}),
      "Jego wyglad jest na tyle nietypowy, ze nie jestes calkiem pewien "+
      "czy to jest grobowiec. Nie widzisz zadnych drzwi, badz innych otworow "+
      "przez ktore moglbys sie przedostac. Jego tworca albo byl slepy albo... "+
      "niespelna rozumu.\n");
   add_item("mgle",
      "Nie widzisz nic ciekawego.\n");
   set_alarm(5.0,60.0,"eventsy");
}

void eventsy()
{

   set_event_time(20.0,60.0);

   if(pora_dnia()=="noc"||pora_dnia()=="polnoc")
    {
     clear_events();
     add_event("W oddali slyszysz dlugie, przeciagle wycie.\n");
     add_event("Poprzez opary mgly, widzisz duze, czerwone oczy, ktore szybko "+
       "znikaja w mlecznej dali.\n");
     add_event("Gdy mgla rozrzedza sie na chwilke, widzisz przesuwajacy sie cien. "+
       "Bezszelestnie, powoli, az rozwiewa sie rownie nagle, jak sie pojawil.\n");
     add_event("Na jednym z grobow poruszyla sie ziemia... a moze ci sie wydawalo?\n");
     }
    else 
     {
      clear_events();
      add_event("Nad glowa slyszysz zlowrobne krakanie.\n");
      add_event("Kolo glowy przelatuja ci nasiona jakiejs rosliny.\n");
      add_event("Jeden z kamieni obsunal sie na ziemie.\n");
     }
   set_events_on(1);
}


string
opis_pory_roku()
{
  string opis="";
  if(pora_dnia()=="noc"||pora_dnia()=="polnoc") opis+=" Widzisz ponadto kilkanascie grobow, sa to glownie "+
   "male kurhany z ziemi, jednak przez mgle widzisz zarysy czegos wiekszego, "+
   "prawdopodobnie jest to jakis grobowiec. Noc jest bezksiezycowa i nad "+
   "cala okolica unosi sie mgla, wiec nie jestes w stanie zobaczyc wiele wiecej.\n";
  else  opis+=" Caly cmentarz polozony jest przy poludniowym koncu doliny, "+
   "i jest niewielkich rozmiarow. Znajduje sie tu kilkanascie grobow, "+
   "wiekszosc z nich usypana jest z ziemi. Wyjatkiem jest kilka grobow usypanych "+
   "z kamieni, i zajmujacy centralne miejsce grobowiec. Z tego miejsca jednak "+
   "nie ma do niego dojscia. Niebo jest bezchmurne, slonce swieci ogrzewajac "+
   "cie swoimi promieniami.\n";
  return opis;
}