#pragma strict_types
inherit "/d/Faerun/std/room";
inherit "lib/pub";
#include <stdproperties.h>
#include <macros.h>
public int no_command();
public int no_command2();
#include "definicje.h"
void
create_room()
{       
 set_short("Browar 'Pod Pijanym Lososiem'");
 set_long("Przebywas w malym, zadymionym pomieszczeniu pelniacym zapewne " +
 "fukncje miejscowej pijalni. Stoliki pozalewane tanimi trunkami, " +
 "pomazane sadza okna i beczki pelniace funkcje krzesel upewniaja " +
 "Cie w przekonaniu, ze to miejsce odwiedza tylko biedniejsza czesc " +
 "miejscowego spoleczenstwa. " +
 "Nad barem przybito mala tabliczke.\n");

    add_item("bar", "Zwykly, drewniany bar przy ktorym "+
        "podawane sa napoje.\n");
 
 add_prop(ROOM_I_INSIDE,1);
 add_cmd_item(({"tabliczke","menu"}),({"czytaj","przeczytaj"}),
   "@@menu");

    add_drink("likier", "likier", "kieliszek wysmienitego w smaku likieru",
                "slodkiego likieru", ({ ({ "slodki", "smaczny" }), ({ "slodcy",
                "smaczni" }) }), 12, 100, 0, 450, PL_NIJAKI_NOS);
    add_drink("wodka","wodke", "kieliszek czystej i bardzo mocnej gorzalki",
      "gorzkiej mocnej wodki", ({ ({"gorzki", "mocny"}), ({"gorzcy", "mocni"})}),
       25, 150, 0, 900, PL_ZENSKI);          
     add_drink("piwa","piwo","kufel rozwodnionego piwa",
        "rozwodnionego piwa", ({ ({"cieply", "rozwodniony"}),
        ({"ciepli", "rozwodnieni"}) }), 4, 500, 10, 44, PL_NIJAKI_NOS);

    add_exit("ulica1","poludnie");

    clone_object(NPC_PATH+"karczmarz1")->move(this_object());
    clone_object(NPC_PATH+"klient")->move(this_object());

}
void
init()
{
    ::init();
    init_pub();
    add_action("sit_down","usiadz");
    add_action("stand_up","wstan");  
    add_action("do_all_commands", "", 1);    
}
string
menu()
{
    say(QCIMIE(this_player(),PL_MIA)+ " sprawdza zawartosc menu.\n");
    return
    "\t\tMENU:\n"+
    " Likier:\t\t20 miedziakow\n"+
    " Czerwone, wytrawne wino:\t\t45 miedziakow\n"+
    " Miejscowe piwo:\t\t22 miedziaki\n"+
    " Wodka:\t\t135 miedziaki\n"+
    "\n";
}
public int
do_all_commands(string str)
{
    string verb;
    string *nie_dozwolone;
    string *nie_dozwolone2;
    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"});
    nie_dozwolone2=({"zamow"});   
    verb = query_verb();
    if (this_player()->query_prop(SIEDZACY)==1)
    {
    if (member_array(verb,nie_dozwolone)==-1)
        return 0;
    else 
        return no_command();
    }
    if(this_player()->query_prop(SIEDZACY)==0)
    {
    if(member_array(verb,nie_dozwolone2)==-1)
        return 0;
        else
        return no_command2();
    }
    return 0; 
}
public int
no_command()
{
    write("Moze bys tak najpierw wstal.\n");
    return 1;
}
public int
no_command2()
{
    write("To co zamowiles podajemy tylko na miejscu, wiec usiadz sobie "+
    "przy stole.\n");
    return 1;
}
int
sit_down(string str)
{
    object who,*list;
    string check;
  
    if (!str)
        return 0;

    if (sscanf(str,"przy %s",check)==1)
        str = check;
    
    
    notify_fail("Gdzie chcesz usiasc, moze przy barze?\n");
    if(str!="stole")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")+" przy barze");
    write("Rozsiadasz sie wygodnie na krzesle stojacym przy barze.\n");
    say(QCTNAME(this_player())+" siada przy barze.\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 krzesla.\n");
    say(QCTNAME(this_player())+" wstaje od baru.\n");
    return 1;
}
