inherit "/d/Imperium/Nuln/std/room";

#include <stdproperties.h>
#include <macros.h>
#include <pl.h>

int wrota=0;

int
query_wrota()
{
  return wrota;
}

int
otworz( string str )
{

  if(!str)
    {
      if (!this_player()->query_prop("szatniarz"))
	{
	  write("Za bardzo sie boisz,zeby to zrobic.\n");
	  return 1;
	}

      write("Otwierasz wrota!\n");
      say(QCIMIE(this_player(),PL_MIA)+" otwiera wrota!\n");

      wrota=0;
      
      return 1;
    }
}

int
zamknij( string str )
{
  
  if (!str)
    {
      if (!this_player()->query_prop("szatniarz"))
	{
	  write("Za bardzo sie boisz,zeby to zrobic\.n");
	  return 1;
      }

      write("Zamykasz wrota!\n");
      say(QCIMIE(this_player(),PL_MIA)+" zamyka wrota! Bedzie przepychanka!\n");
      
      wrota=1;
      
      return 1;
    }
}

int
wyj()
{
  if( wrota==1 )
    {
      write("Wrota sa zamkniete!\n");
      return 1;
    }

  return 0;
}

void
create_imperium_room()
{
  set_short("Smierdzaca szatnia.");
  set_long("@@dlugi");
  add_prop(ROOM_I_INSIDE, 0);
  add_prop(ROOM_I_LIGHT, 1);
  
  add_exit("/d/Imperium/Nuln/sklepy/bar_1", "poludniowy-wschod", "@@wyj",
	 1,0);

  set_event_time(10.0, 100.0);
  add_event("Uczniowie zaczynaja sie rozpierdalac po szatni!\n");
  add_event("Slyszysz dzikie ryki uczniow: Da-wac kurtki!\n");
  set_events_on(1);
}

void
init()
{
  add_action("zamknij", "zamknij");
  add_action("otworz","otworz");
  ::init();
}

string
dlugi()
{
  return("Jestes w malej szatni,zrobionej z jakichs gownianych drutow. " +
	 "Jest tu pelno uczniow, ktorzy caly czas sie rozpychaja. Na "+
	 "wieszakach wisza kurtki.\n"); 
}