        add_item ( ({"sciany","sciane"}),
        "Zbudowane z kamiennych blokow sciany. Czas wyryl juz na nich wlasciwe "+
        "pietno, i widac tu i owdzie pokazne pekniecia. "+
        "Oprocz tego zauwazasz, ze na pewnym odcinku korytarza sciany po obu "+
        "stronach posiadaja piec poziomych rzedow kolistych otworow. Rzedy sa "+
        "jakies poltorej stopy jeden nad drugim, a otwory miedzy soba "+
        "sa oddalone o pol stopy. Coz to moze byc... \n"); 
        
        add_item ( ({"podloge","posadzke"}),
        "Wylozona kamiennymi plytami posadzka. Plyta przed toba wyroznia sie "+
        "szczegolnie, zauwazasz ze moze to byc jakas zapadnia! \n");
        
        add_item ( "otwory",
        "Umieszczone w poziomych rzedach otwory o srednicy cala. Niestety, "+
        "nie widac co w nich jest i do czego moga sluzyc. \n");

	add_item ( ({"korzenie","korzen"}),
	"Zwisajace z gory, grube korzenie jakiegos wiekowego drzewa. Jak udalo im sie "+
	"nadkruszyc skalne sklepienie ? Wygladaja na dosc solidne.... \n");

}

int
chwyc(string str)
{
  mixed gdzie=({"za korzen"});
 
  if (this_object()->query_prop(OBJ_I_LIGHT)==0)
  return notify_fail("Z zainteresowaniem rozgladasz sie na boki, lecz "+
  "nie jestes w stanie zobaczyc cokolwiek w tych ciemnosciach. \n");

  if (member_array(str,gdzie)==-1)
  return notify_fail("Za co chcesz zlapac? \n");
 
  if (TP->query_prop(CZY_TRZYMA))
  return notify_fail("Trzymasz sie juz kurczowo jednego z zwisajacych korzeni. \n");
                 
  write("Lapiesz sie za zwisajacy korzen i silnym szarpnieciem sprawdzasz jego wytrzymalosc. "+
  "Z gory leci nieco piachu, lecz korzen wydaje sie trzymac mocno. \n");
  say(QCIMIE(TP,PL_MIA)+" lapie sie za jeden ze zwisajacy korzeni, i szarpnieciem sprawdza jego "+
  "wytrzymalosc. Z gory posypalo sie nieco piachu. Ciekawe ... \n");


  TP->add_prop(LIVE_S_SOULEXTRA,"Trzyma sie kurczowo zwisajacego z gory korzenia");
  TP->add_prop(CZY_TRZYMA, 1);

  return 1;
}

int
skacz(string str)
{
  mixed jak=({"nad zapadnia","nad pulapka"});                      
  
  if (this_object()->query_prop(OBJ_I_LIGHT)==0)
  return notify_fail("Przymierzasz sie do skoku, lecz jest tu chyba "+
  "za ciemno, zeby wiedziec w ktore strone skakac. \n");

  if (member_array(str,jak)==-1)
  return notify_fail("Nad czym chcesz przeskoczyc? \n");
 
  if (!(TP->query_prop(CZY_TRZYMA)))
  return notify_fail("Niestety nie wiesz jak dluga jest ta zapadnia, gdyz "+
  "jej drugi koniec ginie w mroku. Moze powinnienes czyms sie wspomoc przy tym skoku. \n");
  
  write("Cofasz sie o krok do tylu i odbijajac sie silnie, zawisasz na korzeniu, "+
  "lecac na nim nisko nad ziemia! Udalo ci sie przeskoczyc na druga strone! Uf.. \n");
  say(QCIMIE(TP,PL_MIA)+" cofa sie o krok do tylu i odbijajac sie silnie "+
  "zawisa na korzeniu, lecac wprost w ciemnosc na drugiej stronie! Po chwili z mroku "+
  "wylania sie z powrotem juz sam korzen. \n");

  TP->add_prop(LIVE_S_SOULEXTRA,"Rozciera obolale dlonie"); 
  TP->move_living("M", NPATH + "kurhan1/krypta03.c", 0, 0);
  TP->remove_prop(CZY_TRZYMA);
  return 1;
  
}  

int
go()
{
  if (TP->query_prop(CZY_TRZYMA))
  {
  write("Puszczasz sie korzenia. \n");
  say(QCIMIE(TP,PL_MIA)+" puszcza sie korzenia. \n");
  TP->add_prop(LIVE_S_SOULEXTRA, 0);
  TP->remove_prop(CZY_TRZYMA);
  } 
  return 0;
}
int
bij()
{
 go();

  if (this_object()->query_prop(OBJ_I_LIGHT)==0)
  {
  write("Ruszasz razno na polnoc, gdy w pewnym momencie cos szczeknelo ci "+
  "pod nogami i cos wbilo sie w twoje cialo! \n");
  say("Slyszysz oddalajace sie kroki, a za chwile szczek i okrzyk bolu! \n");
  }
  else
  {
  write("Ruszasz razno na polnoc, gdy w pewnym momencie cos szczeknelo ci "+
  "pod nogami i ze sciany wysunely sie metalowe ostrza, wbijajac "+
  "sie w twoje cialo. Coz za bol! \n");
  say(QCIMIE(TP,PL_MIA)+" rusza razno na polnoc, lecz w pewnym momencie "+
  "cos szczeknelo i ze sciany wysunely sie metalowe ostrza, i slyszysz "+
  "odglos przebijanego ciala! \n");
  }
 
  TP->hit_me(20000, 1, 20);
  if (TP->query_hp()==0)
  TP->do_die();

  return 1;
}
