inherit "/d/Imperium/std/room";
#include "/sys/ss_types.h"

#include <macros.h>
#include <stdproperties.h>



string przejscie();
string przejscie_item();
int przejscie_open = 0;

object drzwi_sw;

void
create_imperium_room()
{
    set_short("Polnocno-wschodnia wieza");
    set_long("Po przejsciu przez stalowe drzwi dostrzegasz ze mimo calej reszty zamku "+
             "ta wieza zachowala sie wyjatkowo dobrze zastanwiasz sie nad przyczynami tego. "+
             "Z gory czuc lekki przeciag, ktory jakby znikal gdzies tuz pod kaflami podlogi...\n");
             
             add_item("podloge", "Podloga wylozona jest marmurowymi kaflami. Czujesz jakby lekki ciag powietrza w dol.\n");

    add_item((({"przejscie", "ukryte przejscie"})),
      "@@przejscie_item");

    set_event_time(70.0,70.0);
    
    add_event("Czujesz jakas mroczna sile unoszaca sie w powietrzu.\n",0);
    add_event("Slyszysz nawolywanie potepionych.\n",0);
    add_event("Slyszysz mrozacy krew w zylach krzyk.\n",0);
    
     set_events_on(1);

    drzwi_sw=clone_object("/d/Imperium/Sylvania/lokacje/drakenhof/drzwi2.c");
    drzwi_sw->move(this_object());

    add_exit("wieza2","gora", 0, 1);
    add_exit("zamek11", "poludniowy-zachod", 0, 1);




}


void
reset_imperium_room()
{
    if(!drzwi_sw)
    {
        drzwi_sw=clone_object("/d/Imperium/Sylvania/lokacje/drakenhof/drzwi2.c");
        drzwi_sw->move(this_object());
    }
    
    ::reset_room();
    przejscie_open = 0;
    this_object()->remove_exit("dol");

}

string
przejscie()
{
    if (przejscie_open)
    return "Widzisz przejscie prowadzace na dol.\n";
    //else
}

string
przejscie_item()
{

    if (przejscie_open)
    {
	return "Widzisz przejscie prowadzace na dol.\n";
    }
}


string
search_fun(object player, string str)
{
    if (str == "podloge")
    {
	if (player->query_skill(SS_AWARENESS) > 40 && (!przejscie_open))
	{
	    przejscie_open = 1;
	    this_object()->add_exit("podziemie1","dol", 0, 1);
	    return "Usuwajac troche kafelkow odkrywasz przejscie prowadzace w dol.\n";
	}
	if (przejscie_open)
	    return "Usuniete kafle marmuru tworza przejscie w glab podziemi.\n";
	//else
	return "Nie znajdujesz niczego ciekawego.\n";
    }
    return "Szukasz w wiatru w polu.\n";
}
