/*
 * Brama poludniowa miasta Nuln.
 * Written (25 July 1996) by Madej
 *
 * Korekta by Silvy luty '97
 *
 * Uzupelnienie by Aglarond luty '97
 * 
 */

inherit "/d/Imperium/std/room";
#include "silvy.h"
#include <stdproperties.h>
#include "/sys/money.h"

int inwentarz;
int i;
object gwar1,gwar2,gwar3;

int
sprawdzian()
{
 if((!gwar1)&&(!gwar2)&&(!gwar3)) return 0;
  inwentarz = sizeof(all_inventory(TP));

  for(i = 0; i < inwentarz; i++)
    if (((all_inventory(TP)[i])->heap_value()) >= 720)
    {
      write("Straznik zagradza ci droge i sprawdza twoja sakiewke. Po " +
	    "chwili usmiecha sie i przepuszcza cie przez brame.\n");
      return 0;
    }
  write("Straznik zagradza ci droge i sprawdza twoja sakiewke. Po chwili " +
	"stwierdza: 'Nie mozesz wejsc do miasta. Zebrakow nie wpuszczamy. " +
	"Musisz miec przy sobie co najmniej 5 zlotych monet, zeby wejsc'.\n");
  return 1;
}

void 
create_imperium_room()
{
 set_short("Straznica przy poludniowej bramie");
 set_long("Otacza cie chlod wiekowych murow Poludniwej " +
     "Baszty Srebrnego Mlota, miejsca od wiekow strzezonego " +
     "przez rycerzy zakonu walczacego w imie swietego Sigmara. " +
     "Brama ta jest jedna z najstarszych budowli w miescie i, " +
     "jak mowi legenda, przez nia wlasnie opuscil miasto Sigmar " +
     "Mlotodzirzca, udajac sie ku Gorom Szarym w swa ostatnia " +
     "podroz. Wokol widzisz kamienne posagi dawnych bohaterow, " +
     "patrzacych na ciebie swymi zimnymi, kamiennymi oczyma. " +
     "Przejscie w ktorym stoisz jest tak szerokie, ze spokojnie " +
     "moga sie na nim mijac dwa wozy, lub czterech konnych. " +
     "Wysoko w gorze widzisz fragmenty mechanizmu, ktory ma za " +
     "zadanie zasypac lawina glazow wejscie do miasta " +
     "w momencie zagrozenia.\n"); 

 add_exit(NPATH +"lokacje/bramas1.c","polnoc",sprawdzian,1);
 add_exit(NPATH +"lokacje/bramas.c","poludnie",0,1);

 add_item(({"posagi","posagi bohaterow","oczy","kamienne oczy"}),
     "W zimnych oczach kamiennych bohaterow nie dostrzegasz " +
     "nic prucz nieskonczonej madrosci wiekow, wykutej w kamieniu.\n");
 add_item(({"mechanizm","fragmenty","fragmenty mechanizmu"}),
     "Wybudowany w dawnych wiekach mechanizm do dzis zapewnia " +
     "Nuln miano miasta niemal niemozliwego do zdobycia sila.\n");

 add_prop(ROOM_I_INSIDE, 1);
 add_prop(ROOM_I_LIGHT, 1); 

    gwar1=clone_object(NPATH + "npc/guard_s.c");
    gwar2=clone_object(NPATH + "npc/guard_s.c");
    gwar3=clone_object(NPATH + "npc/guard_s.c");
gwar1->move(TO);
gwar2->move(TO);
gwar3->move(TO);
}