// Brama wschodnia
// Napisane przez Alfena.

#include "alfen.h"
inherit "/d/Imperium/Nuln/obj/bramy.c";
#include "silvy.h"

object br;


void create_imperium_room() 
{
  ::create_imperium_room();

  br = clone_object(APATH + "obj/wr_e_wyj.c");
  br -> move(TO);

  set_guard();

  set_alarm(1.0, 30.0, "otwarta", br);

  set_short("Straznica przy wschodniej bramie");

  set_long("Otacza cie chlod wiekowych murow Wschodniej bramy. "+
     "Po bokach umieszczone sa male wneki umozliwiajace skuteczny"+
     " ostrzal hipotetycznego przeciwnika. Na polnocy zauwazasz"+
     " niewielkie drzwiczki. Gdy spogladasz w gore, dostrzegasz"+
     " konce uniesionej, zelaznej kraty. Do twoich nozdrzy dochodzi"+
     " zapach ludzkiego potu, zmieszanego z innymi zapachami"+
     " niewiadomego pochodzenia. Po obu stronach murow mozna "+
     " sie dopatrzec fragmetow jakiegos dziwnego mechanizmu.\n");

  add_exit(NPATH +"lokacje/kranc4.c","zachod", "@@sprawdzian", 1);
  add_exit(br->query_other_room(), br->query_pass_command()[0], 
    "@@brama_zam", 1, "@@brama_zam");

  add_item(({"mechanizm","fragmenty","fragmenty mechanizmu",
     "dziwny mechanizm"}),
     "Wybudowany w dawnych wiekach mechanizm do dzis zapewnia " +
     "Nuln miano miasta niemal niemozliwego do zdobycia sila."+
     " Niedaleko tych wszystkich kolek zauwazasz przymocowany "+
     "do muru mosiezny dzwonek.\n");
  
  add_item(({"mosiezny dzwonek","dzwonek"}),
     "Dzwonek zostal umocowany do muru przy pomocy kutej katnicy."+
     " Posrod ozdobnych rytow dostrzegasz napis:\n"+
     " Dzwonic tylko w potrzebie. Naduzycie bedzie karane.\n");
     
  add_item ("krate", "Dostrzegasz tylko konce zelaznej kraty."+
  	" Nie wydaja sie byc bardzo ostre, lecz biada temu"+
	" kto dalby sie zaskoczyc podczas opadania bramy.\n");

  add_item (({"male drzwiczki", "drzwiczki"}), "Male drzwiczki wygladaja"+
	" na zamkniete. Byc moze prowadza one do wnetrza straznicy.\n");
}


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();
}
