inherit "/d/Imperium/std/room.c";

#include "darkmts.h"

object jaszczur,skrz1,skrz2;

int danger;
int wziete = 1;

string
klopoty()
{
 if(!wziete)
 {
     notify_fail("Co chcesz zabrac?\n");
     return 0;
 }    

 skrz1 = clone_object (OPATH + "eskrzyn1.c");
 skrz2 = clone_object (OPATH + "eskrzyn2.c");

  
  skrz1->move(this_player());  
  skrz2->move(this_player());

  if (!present(jaszczur,this_object())) 
  {
  jaszczur = clone_object (NPATH + "jaszczur.c");
  jaszczur->move(this_object());
  write("Z wody wynurza sie ogromny jaszczur, pelznac w twoja strone.\n");
  say("Z wody wynurza sie ogromny jaszczur, pelznac w kierunku "
      + QCIMIE(this_player(),PL_DOP)+".\n");
  
  }
  say(QCIMIE(this_player(),PL_MIA) + " wyciaga cos z wglebienia w cokole.\n");
  write ("Zabierasz skrzynki z wglebienia.\n");
  this_player()->add_prop("_player_i_wzial_skrzynki",1);
  wziete = 0;
  return "";
}

int jaszcz()
{
 if (jaszczur)
 {
  write ("Ogromny gad nie pozwala ci przejsc, musisz go jakos unieszkodliwic.\n");
  return 1;
 }
 return 0;
}

void
create_imperium_room()
{
 add_prop(ROOM_I_LIGHT,1);
 
 add_prop(ROOM_I_INSIDE,1);
 
 set_short("W jaskini");
 set_long("  Znajdujesz sie w rozleglej jaskini. Twoja uwage przykuwa od razu "
        + "emanujaca jasnym, zielonym swiatlem sadzawka. Na jej srodku znajduje sie "
        + "wykuty w czarnym kamieniu cokol, a w nim niewielkie wglebienia. "
        + "Woda w sadzawce rzuca drzace refleksy po scianach i co pewien czas "
        + "burzy sie wydajac cichy syk. Wyjscie prowadzace na gore znajduje sie "
        + "w samym rogu groty, pod nim lezy kilka szkieletow w dziwnych pozach, "
        + "to ci ktorym nie udalo sie zejsc bezpiecznie.\n");
 
 add_exit(PATH + "wnetrze1.c","gora","@@jaszcz");
 add_exit(PATH + "labirynt.c","poludnie","@@jaszcz"); 
 add_item("sadzawke", "Woda ma nienaturalny kolor, a z dna saczy sie jaskrawe "
                   + "swiatlo. Wydaje ci sie, ze jakis cien przemknal w glebi, "
                   + "poruszajac martwa tafla.\n");
 add_item(({"skrzynki","cokol","wglebienia"}),"@@cokol");
      add_item(({"szkielety","skielet"}),
      "Smierc wisi tu w powietrzu. Zastanawia cie - dlaczego "
                     + "niektore ciala maja poodrywane konczyny...\n");

 add_cmd_item(({"skrzynke","skrzynki"}),({"zabierz","wyjmij","wez"}),"@@klopoty");

 danger = 0; 
} 

string
cokol()
{
    if(!wziete) return "Wglebienie w cokole jest puste.\n";
    return "We wglebieniach czarnego cokolu znajduja "
                       + "sie dwie male skrzynki. Widok siegajacej po nie "
                       + "zastyglej reki szkieletu pobudza twoja "
                       + "ostroznosc.\n";
}

void
reset_imperium_room()
{
    wziete = 1;
}