/*
 * Pokoj przyjec do gildii Tropicieli z Averlandu
*/

#include "ranger.h"
inherit "/d/Imperium/std/room";


void
create_imperium_room()
{
 add_prop(ROOM_I_LIGHT, 2);

 add_prop(ROOM_I_INSIDE, 1);

 set_short("U wyjscia z fortu");
 set_long("@@opis");
 add_exit(PATH+"gildia1.c","zachod","@@mozna_przejsc",1);
 add_exit("/d/Imperium/Kraina/BAGNO/bagno13.c","poludnie",0,0,0);
 
 add_read_item("tablice","@@read_sign");
 clone_object(NPC+"ugor.c")->move(this_object());
}

string opis()
{
   return "Znajdujesz sie przy wyjsciu z fortu, droga na zewnatrz prowadzi "+
       "przez porosniety mchami las...\n";
}

string
read_sign()
{
  write("Podchodzisz do tablicy i odczytujesz co nastepuje:\n");
  say(QCIMIE(this_player(),PL_MIA)+" podchodzi do tablicy i pograza sie "+
      "w lekturze.\n");
  write("Dobry wrog, to martwy wrog!\n");
  return "";
}

int
mozna_przejsc()
{
    if ( this_player()->query_prop("ranger") )
	{
	write("Spokojnie przechodzisz przez wrota.\n");
	say(QCIMIE(this_player(),PL_MIA)+" podaza do wnetrza fortu.\n");
	return 0;
	}
	write("Nagly straznicy skierowuja w ciebie ostrza dzierzonych pik, "+
	    "a ty rezygnujesz z dalszej proby marszu.\n");
	say(QCIMIE(this_player(),PL_MIA)+" probuje wejsc do fortu, "+
	    "lecz straznicy momentalnie go zatrzymuja i odtracaja!\n");

  return 1;
}