inherit "/d/Imperium/Nuln/std/room.c";
#include "szturmix.h"
inherit "/d/Imperium/Nuln/obj/bramy.c";

object br;  

void 
create_imperium_room() 
{
    ::create_imperium_room();
    
    br = clone_object(OBJPATH+"bramas_wej.c");
    br -> move(TO);

    set_alarm(1.0, 30.0, "otwarta", br);

    set_long("fdsf");
    add_exit("trakts2", "poludnie");
    add_prop(ROOM_I_INSIDE, 0);


    set_short("Brama Middenheim Poludniowa");


    add_exit(br->query_other_room(), br->query_pass_command()[0],
      "@@brama_zam",1, "@@brama_zam");


} 


int brama_zam()
{
  return !br->query_open();
}


int brama_otw()
{
  return !brama_zam();
}