/* A: Mezon */
/* Lokacja w jaksiniach Krainy Wodospadu a8 */

inherit "/d/Imperium/Kraina/RUINY/jaskinie/stdjask";
#include "mezon.h"

create_jaskinie()
{

        add_prop(ROOM_I_INSIDE,1);

        set_short("Ogromna, krysztalowa grota");
        set_long("Jestes w miejscu zupelnie odrebnym od tych, ktore "+
                 "mozna spotkac w innych czesciach "+
                 "tej ponurej jaskini. Jest to ogromna grota, ktorej "+
                 "sklepienie dostrzec mozna wysoko nad soba. "+
                 "Nie jest ona wydrazona w kamieniu jak inne korytarze, "+
                 "lecz w jakims pieknym, odbijajacym roznobarwne luny swiatla "+
                 "krysztale! Znajduje sie tez tutaj male jeziorko, "+
                 "utworzone przez niewielkie zrodelko wodne, bijace "+ 
                 "wprost z polnocnej sciany. Woda wyglada na "+
                 "krystalicznie czysta i swieza, az ma sie ochote "+
                 "sprobowac jej chocby odrobinke.\n");

        add_item(({"jeziorko","wode"}),("Niwielkie, czyste jeziorko. "+
                  "Male, lecz piekne, utworzone "+
                  "przez wode bijaca ze zrodla w polnocnej "+
                  "scianie. Wkolo niego, wyrastaja jakby z ziemi piekne, "+
                  "krysztalowe stalagmity, zas z gory zwisaja jak "+
                  "gigantyczne sople, stalaktyty. Wszystko to wyglada "+
                  "cudownie...\n"));

        add_item(({"sciany","krysztal","krysztaly"}),("Sciany sa sa "+
                  "zbudowane z pieknego, odbijajacego kolorowe luny "+
                  "swiatla krysztalu. Z rozczarowaniem stwierdzasz, "+
                  "ze to tylko zwykla sol...\n"));
       add_item(({"sklepienie","sufit"}),
                  "Sklepienie tej groty rowniez jest z krysztalu. "+
                  "Dostrzegasz w nim kilka otworow, przez ktore wpada "+
                  "swiatlo, na ta srebrna, krysztalowa komnate.\n");
                            
       add_item(("otwory"),
                 "W sklepieniu tej groty dostrzec mozna niewielkie "+
                 "otwory, przez ktore wpada dosc duza ilosc swiatla.\n");
     
        set_event_time(10.0,100.0);
        add_event("Swiatlo wpadajace przez otwory w sklepieniu odbija sie od wody jeziorka tworzac nad nim piekna tecze.\n");
        add_event("Krysztalowy stalaktyt zakolysal sie nad Toba...\n");
        set_events_on(1);

        add_exit(NPATH + "jaskinie/jaska7.c","poludniowy-zachod",0,1,0);
        add_exit(NPATH + "jaskinie/jaska9.c","polnocny-wschod",0,1,0);

}

int
jeziorko(string str)
{
   mixed skad=({"sie z jeziorka","sie wody z jeziorka"});
   
   if (member_array(str,skad)==-1) 
      return notify_fail("Napij sie skad?\n");
   
   write("Zamaczasz usta w chlodnej wodzie, lecz stwierdzasz, "+
         "ze jest ona tak slona, ze nie da sie jej wypic! \n");

   say(QCIMIE(this_player(),PL_MIA) + " nachyla sie nad jeziorkiem chcac " +
      "napic sie wody, lecz zaraz odskakuje na bok otrzasajac sie z " +
      "niesmakiem. Czy ta czysta woda moze byc niedobra?! \n");

   return 1;
}

init()
{
   add_action(jeziorko,"napij");
   ::init();
}