/* 
 * Karczma Kreutzhofenska "Pod Zeglarzem" by Tanis ( Duza poprawka karczmy "Pod Wielkim Dzikiem" Mithandira )
 */
 
#include "tanis.h"

inherit "/d/Imperium/std/room"; 
inherit "/lib/pub"; 

object caen;

void
create_imperium_room()
{
        set_short("Szynk");

        set_long("@@dlugi_opis");

        add_item(({"gosci","klientow"}), "Wiekszosc mieszkancow Kreutzhofen "
            +"wpada tu wieczorem nagarniec piwa pogadac ze znajomymi. Czesc "
            +"z nich spedza tu wiekszosc swego zycia.\n");

        add_item(({"szynk","szynkwas","bar","lade","kontuar"}),
            "Dlugi, drewniany szynkwas poplamiony jest tluszczem i piwem.\n");
        add_item("osilka", "Przy barze stoi znudzony osilek, ktorego "
           +"zdaniem jest pilnowanie w karczmie porzadku. W tak spokojnym "
           +"miasteczku jak Kreutzhofen nie ma zbyt duzo roboty, nie "
           +"przepusci wiec zadnej okazji do sprania komus skory.\n");

        add_item(({"menu", "tabliczke"}), "@@menu");
        add_cmd_item(({"menu", "tabliczke"}), ({"przeczytaj"}), "@@menu");

        add_prop(ROOM_I_INSIDE,1);

    add_drink("piwa","piwo","cieple piwo",
        "jasnego piwa o niesprecyzowanym zapachu",
        ({ ({"cieply"}), ({"ciepli"}) }),
        3, 500, 10, 52, PL_NIJAKI_NOS);

    add_food("kasze", 0, 
        260, 30, PL_ZENSKI, "miske z przypalona kasza ze skwarkami");

    add_food("makaron", 0,
	150, 90, PL_MESKI_NZYW, "makaron z jajkiem sadzonym i warzywami");

    add_food("udziec", ({({"barani"}),({"barani"})}),
	400, 195, PL_MESKI_NZYW, "barani udziec");

        dodaj_npca(NPCPATH + "karczmarz1.c");

        add_exit(SKLPATH + "karczma1.c", "polnoc",0);
}
 
int
zamow(string str)
{
    if (!present("karczmarz", environment(TP)))
    {
        write("Rozgladasz sie uwaznie po pomieszczeniu, ale nigdzie nie widac karczmarza !\n");
	say(TP->query_name(0) + " rozglada sie wokol szukajac karczmarza.\n");
	
        return 1;
    }
    
    return order(str);
}

void
init()
{
    ::init();

    add_action(zamow, "kup");
    add_action(zamow, "zamow");
}

string
dlugi_opis()
{
     string s;

     s = "Siedzi tutaj kilku pijanych gosci, niektorzy z nich spia majac"
                +" glowe oparta o szynk, jest tu tez kilka wolnych miejsc. "
                +"Pomieszczenie nie jest zbyt duze, ale calkiem ladnie urzadzone. "
                +"W powietrzu unosza sie zapach spalenizny. i piwa "
                +"Nad kontuarem wisi tabliczka z menu.";
    s=s+"\n";
     return s;
}

string
menu()
{
        say(QCIMIE(this_player(), PL_MIA) + " oglada menu.\n");
        return
        "\nNa tabliczce krzywymi literami jest napisane:\n\n"
        +"\t\t** MENU **\n"
        +"Piwo                26 miedziakow\n"
        +"Kasza ze skwarkami  30 miedziakow\n"
        +"Makaron            100 miedziakow\n"
        +"Barani udziec      195 miedziakow\n\n"+
         "Beka piwa - 10 litrow za 760 miedziakow tylko\n\n";

}