#pragma strict_types
inherit "/d/Faerun/std/room";
#include <stdproperties.h>
#include <macros.h>
#include "definicje.h"
public int no_command();
void
create_room()
{
    set_short("Zachodnia czesc gospody");
    set_long("Znajdujesz sie w zachodniej czesci Gospody Candlekeep. "+
    "Na wschodzie widac bar oraz stoliki. Widzisz tutaj schody prowadzace "+
    "na gore zapewne do pokoi sypialnych. Na srodku stoi wielka wygodna "+
    "kanapa, a na przeciwko niej umieszczono kominek, w ktorym wesolo "+
    "tancza ogniki. Na scianach wisza rozne obrazy, oraz trofea. Widzac "+
    "to pomieszczenie kazdy ma ochote sobie usiasc i chociaz przez chwile "+
    "pomarzyc, badz porozmawiac przy cieple kominka.\n");
    add_prop(ROOM_I_INSIDE,1);
    add_exit("gospoda","wschod");
    add_exit("korytarz","gora");
    set_event_time(60,this_object());
    add_event("Plomienie w kominku strzelaja.\n");
    add_event("Z kominka unosi sie zapach palonego drewna.\n");
    add_event("Dochodza cie jakies krzyki ze wschodu.\n");
    add_event("Czujesz cieplo bijace z kominka.\n");
    clone_object(NPC_PATH+"kobieta");
}
void
init()
{
    ::init();
    add_action("sit_down","usiadz");
    add_action("stand_up","wstan");  
    add_action("do_all_commands", "", 1);    
}
public int
do_all_commands(string str)
{
    string verb;
    string *nie_dozwolone;
    nie_dozwolone=({"n","polnoc","s","poludnie","w","zachod","e","wschod","nw",
        "polnocny-zachod","sw","poludniowy-zachod","se","poludniowy-wschod",
        "polnocny-wschod","ne","teleport",
        "u","gora","d","dol","goto","home"});
    verb = query_verb();
    if (this_player()->query_prop(SIEDZACY)==1)
    {
    if (member_array(verb,nie_dozwolone)==-1)
        return 0;
    else 
        return no_command();
    }
    return 0; 
}
public int
no_command()
{
    write("Moze bys tak najpierw wstal.\n");
    return 1;
}
int
sit_down(string str)
{
    object who,*list;
    string check;
  
    if (!str)
        return 0;

    if (sscanf(str,"na %s",check)==1)
        str = check;
    
    
    notify_fail("Gdzie chcesz usiasc, moze na kanapie?\n");
    if(str!="kanapie")return 0;
    if(this_player()->query_prop(SIEDZACY)==1)
    {
    write("Ale ty juz siedzisz.\n");
    return 1;
    }
    this_player()->add_prop(SIEDZACY,1);
    this_player()->add_prop(LIVE_S_EXTRA_SHORT," siedzac"+
    this_player()->koncowka("y","a")+" na kanapie");
    write("Rozsiadasz sie wygodnie na kanapie.\n");
    say(QCTNAME(this_player())+" siada na kanapie.\n");
    return 1;
}
int
stand_up(string str)
{
    object who,*list;
    string check;

    notify_fail("Nie siedzisz nigdzie.\n");
    if (this_player()->query_prop(SIEDZACY)==0)
        return 0;

    this_player()->change_prop(SIEDZACY,0);
    this_player()->change_prop(LIVE_S_EXTRA_SHORT,"");
    write("Wstajesz z kanapy.\n");
    say(QCTNAME(this_player())+" wstaje z kanapy.\n");
    return 1;
}