inherit "/d/Imperium/Altdorf/Bramy/brama.c";
#include "../altdorf.h"
object br;
void
create_imperium_room()
{
::create_imperium_room();
   br = clone_object("/d/Imperium/Altdorf/Bramy/wr_n_wej.c");
   br -> move(TO);
   
    set_alarm(1.0, 200.0, "otwarta", br);
    
set_short("Przed polnocna brama Altdorfu");
set_long("Stoisz przy wielkiej bramie w miescie Altdorf. Jestes na " +
         "zewnatrz miejskich murow. W srodku czeka cie ciepla strawa " +
         "i jakies miekkie lozko w gospodzie, tutaj tylko wiatr wiejacy " +
         "dosc poteznie oraz dzikie zwierzeta w przymiejskim lesie. Ktos " +
         "opowiadal ci wiele dobrego o stolicy imperium. Podobno maja tu " +
         "najwiecej swietych artefaktow, a wiara w praworzadnych bogow " +
         "jest jeszcze nie skazona przez chaos.\n");
set_guard();
add_exit("/d/Imperium/szturmix/middenheim/lokacje/trakts7.c","polnoc");
add_exit(br->query_other_room(), br->query_pass_command()[0],
         "@@brama_zam", 1, "@@brama_zam");
}
void otworz_zamknij()
{
  if (br->query_open())
        zamknij_brame(br);
  else
    otworz_brame(br);
}
int brama_zam()
{
 return !br->query_open();
}
int brama_otw()
{
  return !brama_zam();
}