inherit "/d/Imperium/std/room.c";
#include "/sys/stdproperties.h"
#define TP this_player()
  

create_imperium_room()
{
    set_long("@@long_desc");
    set_short("Pokoj na wiezy");
}

string
long_desc()
 {
   return "Znajdujesz sie w niewielkim pokoju na szczycie wysokiej wiezy. "+
      "Jest to pracownia czarodzieja Mithandira. Okna sa szczelnie "+
	  "zasloniete, aby zaden promien swiatla nie rozpraszal mistrza w "+
	  "jego pracy. Wystroj pokoju jest niezwykle skromny, oprocz "+
	  "drewnianego, pustego stolu i prostego krzesla nie ma tu zadnych "+
	  "sprzetow ani obic. Co wiecej, ze zdziwieniem dostrzegasz, ze z "+
	  "pokoju tego nie ma zadnych wyjsc! Szybko pojmujesz, ze jego "+
	  "uzytkownik nie potrzebuje i nie uzywa normalnych przejsc, a "+
	  "przyjmowani przez niego goscie nie powinni moc swobodnie "+
	  "poruszac sie po wiezy.\n";
 }
 
int
destruct(string str)
{
	if (TP->query_real_name()=="tanis")
	{
		TP->remove_object();
		return 1;
	}
	if (TP->query_real_name()=="greensun")
	{
		TP->remove_object();
		return 1;
	}

}


init()
{
	add_action(destruct, "Destruct");
	::init();
}