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+"bramaz_wej.c");
    br -> move(TO);

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

    set_long("Pod zachodnia brama Middenheim");

    add_prop(ROOM_I_INSIDE, 0);
    add_exit(LOK+"traktw2", "zachod");
    add_exit(LOK+"pod1", "polnoc");
    set_short("Pod brama");


    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();
}