#include "wampiry.h"
inherit "/d/Imperium/std/room";
object wamp;
void
create_imperium_room()
{
set_event_time(100.0, 100.0);
add_event("Slyszysz dziwne wycie...\n");
 add_prop(ROOM_I_LIGHT, 1);
 add_prop(ROOM_I_INSIDE, 1);
 set_short("Bramy do Zamku");
 set_long("@@opis");
 add_exit(WPATH+"zamek2.c","polnoc","@@mozna_przejsc",1);
 add_exit("/d/Imperium/Sylvania/las1.c","brama",0 ,1);
 set_alarm(0.0, 600.0, reset_imperium_room);
}
void
reset_imperium_room()
{
  if(!objectp(wamp))
  {
    wamp = clone_object(NPC+"gabriel");
    wamp->move(this_object());
  }
}
string opis()
{
   return "Znajdujesz sie przed wejsciem do ogromnego, posepnego zamku.\n";
}
int
mozna_przejsc()
{
    if ( this_player()->query_prop("wampir") )
        {
         write("Przechodzisz spokojnie obok Szambelana.\n");
        say(QCIMIE(this_player(),PL_MIA)+" skinieniem dloni usuwa na bok Szambelana "
           + "i podaza w glab zamku.\n");
         
          return 0;
        }
    else if (objectp(wamp))
    {
      write("Szambelan syczy : Odejdz glupcze zanim stracisz zycie...\n");
      say(QCIMIE(this_player(),PL_MIA)+" Nagle nieruchomieje jakby zobaczyl ducha...\n");
      return 1;
    }
    else if (!objectp(wamp))
    {
      write("Widzisz ze nikt nie pilnuje bramy i wchodzisz sobie smialo do srodka.\n");
      say(QCIMIE(this_player(), PL_MIA) + " podaza w glab zamku.\n");
      return 0;
    
    }
}