#pragma strict_types

inherit "/std/room";

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


void
create_room()
{
  set_short("Pracownia Gima");
  set_long("Znajdujesz sie w niewielkim pomieszczeniu ktore pelni " +
	   "funkcje pracowni Maga Gima. Przy scianie widzisz kominek. " +
	   "Przed nim znajduje sie stolik , fotel i taboret. Naprzeciw " +
	   "kominka znajduje sie niewielkie okno przed ktorym stoi " +
	   "barek i klatka dla papugi. Pokoj znajduje sie w wielkim " +
	   "nieladzie.\n");
	     
  add_prop(ROOM_I_INSIDE);

  add_exit("korytarz1.c", "zachod");

  add_item(({"kominek" , "palenisko"}),
	   "Jest to prosty ceglany kominek .przed nim zazwyczaj " +
	   "odpoczywa czarodziej Gim.\n");
  add_item(({"stolik" , "stol"}),
	   "Jest to maly, kwadratowy stol . Znajduja sie na nim " +
	   "notatki czarodzieja Gima.\n");
  add_item(({"fotel" }),
	   "Jest to duzy brazowy fotel na ktorym zazwyczaj siedzi " +
	   "czarodziej Gim.\n"); 
  add_item(({"taboret" , "krzeslo"}),
	   "Jest to niewielki drewniany taboret.\n");
  add_item(({"barek"}),
	   "Jest to debowy barek w ktorym zapewne znajduja sie " +
	   "jakies trunki.\n");		                                      
  add_item(({"klatka"}),
	   "Klatka jest wykonana z metalu i jest ona " +
	   "przeznaczona dla papugi o imieniu Ferdynand.\n");
}

int
siadz_w_fotelu(string swf)
{
  notify_fail("Gdzie chcesz siasc? Moze w fotelu?\n");
  
  if( swf == "w fotelu")
    {
      switch(this_player()->query_prop(SIEDZACY))
        {
	case 1:
	  {
	    write("Przeciez juz siedzisz!\n");
	    break;
	  }
	default:
	  {
	    if(!this_player()->query_wiz_level())
	      {
		write(" Probujesz usiasc w fotelu, niestety "+
		      "jakas sila cie odpycha.\n");
	      }
	    if( zajete1 == 0)
	      {
		saybb(QCIMIE(this_player(), PL_MIA) +
		      " siada wygodnie w fotelu.\n");
		write("Rozsiadasz sie wygodnie w fotelu i czujesz jak " +
		      "opuszczaja cie wszelkie troski i zmeczenie.\n");
		this_player()->add_prop(LIVE_S_EXTRA_SHORT,
					" siedzac" +
					this_player()->koncowka("y","a")
					+ " w fotelu");
                this_player()->add_prop(SIEDZACY);
		this_player()->add_prop(FOTEL);
		
		zajete1=1;
	      }
	    else write("Fotel jest juz zajety przez kogos.\n");
	    
	  }
	  
	  return 1;
        }
    }
}
int
wstan()
{
  if(this_player()->query_prop(SIEDZACY)==1)
    {
      if(this_player()->query_prop(FOTEL)==1)
	{
	  saybb(QCIMIE(this_player(), PL_MIA) +
		" wstaje niechetnie z fotela.\n");
	  write("Wstajesz niechetnie z fotela.\n");
	  this_player()->remove_prop(LIVE_S_EXTRA_SHORT);
	  this_player()->remove_prop(SIEDZACY);
	  this_player()->remove_prop(FOTEL);
	  
	  zajete1=0;
	  
	  return 1;
	}
      else if(this_player()->query_prop(KRZESLO)==1)
	{
	  saybb(QCIMIE(this_player(), PL_MIA) +
		" wstaje powoli z krzesla.\n");
	  write("Wstajesz powoli z krzesla.\n");
	  this_player()->remove_prop(LIVE_S_EXTRA_SHORT);
	  this_player()->remove_prop(SIEDZACY);
	  zajete2=0;
	  return 1;
	}
    }
  else
    {
      write("Przeciez nigdzie nie siedzisz!\n");
      return 1;
    }
}

int
usiadz_na_krzesle(string unk)
{
  notify_fail("Gdzie chcesz usiasc? Moze na krzesle?\n");
  if(unk=="na krzesle")
    {
        switch(this_player()->query_prop(SIEDZACY))
        {
           case 1:
            {
                write("Przeciez juz siedzisz!\n");
                break;
            }
            default:
            {
	    if(zajete2==0)
	    {
                saybb(QCIMIE(this_player(), PL_MIA) + " siada ostroznie na krzesle.\n");
                write("Siadasz ostroznie na krzesle pelen podziwu dla"+
		      "tego dziela sztuki.\n");
                this_player()->add_prop(LIVE_S_EXTRA_SHORT," siedzac" +
                    this_player()->koncowka("y","a") + " na krzesle");
                this_player()->add_prop(SIEDZACY,1);
                this_player()->add_prop(KRZESLO,1);
		zajete2=1;
	    }
	    else
	    {
	    write("Krzeslo jest zajete przez kogos.\n");
	    }
            }
            return 1;
        }
    }
}

int
nie_wyjdziesz()
{
    if(this_player()->query_prop(SIEDZACY)==1)
    {
        write("Moze najpierw wstaniesz z krzesla?\n");
        return 1;
    }
    else
    {
        return 0;
    }
}
void
init()
{
    ::init();
    add_action("siadz_w_fotelu", "siadz");
    add_action("usiadz_na_krzesle", "usiadz");
    add_action("wstan", "wstan");
 }