/* Wieza2.c # Wewnatrz wiezy #
 *
 * Karraluch
 *    071297
 */

inherit "/d/Imperium/std/room.c";
#include "darkmts.h"
object drzwi;
int ow;

void
create_imperium_room()
{
 add_prop(ROOM_I_LIGHT,1);
 add_prop(ROOM_I_INSIDE,1);
 
 set_short("W wiezy");
 set_long("@@opis_lokacji");
 
 add_exit(PATHG + "wieza1.c", "polnoc");
 add_exit(PATH+"korytar1.c","wschod","@@wieza",0,1);
 add_item(({"karlowate drzewko","drzewko","drzewo"}),"@@drzewko");
 add_item(({"freski","sciany","kolorowe freski"}),"Pokryte kurzem obrazy "
          + "przedstawiaja zycie jakiejs nieznanej ci spolecznosci. Male, "
          + "brzydkie istoty tocza pojedynki, handluja, urzadzaja polowania.\n");
 add_item(({"sufit","otwor","otwor w suficie"}),"Niezbyt wysoko, lecz niedostepnie "
                  + "umieszczony otwor zdaje sie spelniac swoja podstawowa "
                  + "funkcje, to znaczy oswietlac komnate.\n");
 add_item("owoce","@@owoceopis");
 add_item("listki","@@listki");
 add_item("drzwi","Niewielkie, lecz solidnie okute drzwi sa chyba zamkniete.\n");
 add_cmd_item("drzwi","otworz","Z trudem, ale jestes w stanie uchylic drzwi " +
     "na moment. Moze uda ci sie przecisnac na wschod.\n");
 add_cmd_item(({"owoc","owoce"}),({"zerwij","wez"}),"@@owoce");

 set_alarm(1.0,5000.0,"reset_owockow");
}  

void
reset_owockow()
{
    ow = random(10);
}    

string opis_lokacji()
{
 return "  Znajdujesz sie w przestronnej sali, wylozonej lsniacym marmurem. "
      + "Swiatlo wpada tu przez maly otwor w suficie. Przekroj w poziomie tej "
      + "komnaty przypominalby cos na ksztalt pekatej wazy. Gladkie, stykajace "
      + "sie pod lagodnym katem sciany, ozdobione sa kolorowymi freskami. "
      + "Na srodku, z pomiedzy spekanych plyt podlogi wyrasta karlowate "
      + "drzewko. Widzisz tu drzwi prowadzace do pomieszczen we wchodniej "
      + "czesci wiezy, lecz wydaja sie one byc zamkniete.\n";
}

string drzewko()
{
 
 if (pora_roku() == "zima")
 {
  return " Skarlowaciale drzewko o grubym, poskrecanym konarze pokryte jest "
       + "dziwnymi, niebieskimi owocami. Wokol leza pokryte szronem listki.\n";
 }
 if (pora_roku() != "zima")
 {
  return " Wyroslo tu dziwne, male drzewko o grubym, poskrecanym konarze. "
       + "Pokrywaja je niewielkie, szare listki.\n";
 }
}
string 
listki()
{
    return" Listki maja dziwny, szary kolor.\n";
}

string owoce()
{ 
 if (pora_roku() == "zima")
 {
  if(!ow) return"Slucham?\n";
  clone_object(OPATH + "nowoc.c")->move(this_player());
  return "Bierzesz do reki maly, sino-niebieski owoc.\n";
  ow -= 1; 
 }
 
 if (pora_roku() != "zima")
  return "Slucham?\n";
}

string owoceopis()
{ 
 if (pora_roku() == "zima")
 {
  if(!ow) return("Nie zauwazasz niczego takiego.\n");
  return " Na drzewie widzisz dziwne, sino-niebieskie owoce.\n";
 }
 
 if (pora_roku() != "zima")
  return "Nie zauwazasz niczego takiego.\n";
}

int wieza()
{
 write("Z wysilkiem otwierasz drzwi, ktore szybko zaczynaja sie zamykac. "+
   "W ostatniej chwili przebiegasz do nastepnego pomieszczenia. Drzwi zamykaja "+
   "sie za toba.\n\n");
 say(QCIMIE(this_player(),PL_MIA)+" z wysilkiem otwiera drzwi i przeciska "+
    "sie przez nie na wschod. Drzwi zamykaja sie za "+this_player()->koncowka("nim.\n","nia.\n"));
 return 0;
} 
