/* Karczma by Thalis luty'97 */

inherit "/d/Imperium/std/room";
inherit "/lib/pub.c";

#include <stdproperties.h>
#include "/d/Imperium/Nuln/sklepy/silvy.h"
#include <pl.h>
#include <macros.h>

object barm;
string zamow(string str);

void
create_imperium_room()
{
    set_short("Karczma Rzeznicka - oddzial w Drakenhoff");
    set_long("W twoje nozdrza uderza straszliwy odor krasnoludzkiej " 
      + "wodki i ordynarnego tytoniu, gdy wkraczasz do wnetrza podlej "
      + "spelunki noszacej dumna nazwe Karczma Rzeznicka. Dziki tlum "
      + "pijanych w sztok robotnikow i marynarzy okupuje kazde wolne "
      + "miejsce przy szynkwasie i na lawach ustawionych wzdluz "
      + "prymitywnych stolow. Raz za razem z przepitych gardel gosci "
      + "wydobywa sie choralny spiew przypominajacy raczej odglos "
      + "zarzynanego prosiaka niz cos, co sie zwyklo okreslac mianem "
      + "muzyki. Jedyny element dekoracyjny w tej mordowni stanowi "
      + "wielki topor rzeznicki zawieszony na zachodniej scianie "
      + "na tyle blisko barmana, aby mogl sie on nim posluzyc w razie "
      + "klopotow z bywalcami Karczmy. Tuz obok kontuaru dostrzegasz "
      + "drewniana tabliczke. \n");


    add_item(({"topor","topor rzeznicki"}),"Jest to wielkich rozmiarow "
      + "topor uzywany do uboju zwierzat. Wydaje sie jednak ze moze on "
      + "byc uzyty takze w innym celu.... \n");
    add_item(({"stol","stoly","lawe","lawy"}),"Wszystkie sprzety "
      + "w karczmie sa zrobione z solidnego debowego drewna, "
      + "zapewne po to, aby byly w stanie wytrzymac czeste bijatyki w "
      + "tym lokalu. \n");
    add_item(({"szynkwas"}),"Przed szynkwasem za ktorym stoi barczysty "
      + "barman klebi sie tlumek spragnionych mocnego trunku gosci. \n");
    add_item(({"tabliczke"}),"Jest to niewielkich rozmiarow drewniana " 
      + "tabliczka, na ktorej wypalono napis MENU. Warto by ja "
      + "przeczytac. \n");
    add_item(({"kontuar"}), "Jest to solidny, drewniany kontuar, na"
      + " na ktorym stoi mnostwo szklanic, kufli i butelek.\n");

    dodaj_npca("/d/Imperium/Sylvania/npc/straznik.c");
    
    add_drink("piwa","piwo","kufel ciemnego piwa",
        "ciemnego, aromatycznego piwa",
        ({ ({"ciemny"}),({"ciemni"})}),
        6, 500, 7, 95, PL_NIJAKI_NOS);
    add_drink("wina","wino","kieliszek czerwonego wina",
        "ciemno-czerwonego wina",
        ({ ({"czerwony"}), ({"czerwone"}) }),
        14, 100, 8, 250, PL_NIJAKI_NOS);
    add_drink("wodki","wodke","kieliszek krasnoludzkiej wodki",
        "wodki pedzonej wedlug krasnoludzkich przepisow",
        ({ ({"krasnoludzki"}),({"krasnoludzcy"}) }),
        55, 50, 2, 950, PL_ZENSKI);
    add_food("sledzia", 0, 30, 12, PL_MESKI_NOS_NZYW,
        "apetycznie wygladajacego sledzia w smietanie");
    add_food("befsztyk", ({({"rzeznicki"}),({"rzezniccy"})}),
        300, 80, PL_MESKI_NOS_NZYW, "krwisty befsztyk przyrzadzony na sposob rzeznicki");
    add_food("salatke", 0, 60, 18, PL_ZENSKI, "smakowita salatke warzywna");

    add_cmd_item( ({"tabliczke","menu"}), ({"czytaj", "przeczytaj"}),
      "@@menu");

    add_prop(ROOM_I_INSIDE, 1);

    add_exit("korytarz1.c","wyjscie",0,1,0);

    set_alarm(45.0,318.0,"bijatyka");
    set_alarm(230.0,350.0,"okrzyki");
    set_alarm(475.0,356.0,"pomruk");

    barm=clone_object(NPATH + "npc/bar_rzez.c");
    barm->move(TO);

} 

void
reset_imperium_room()
{
    if(!barm)
    {
        barm=clone_object(NPATH + "npc/bar_rzez.c");
        barm->move(TO);
    }
}

void
init()
{
    ::init();
    init_pub();
    add_action(zamow,"kup");
    add_action(zamow,"zamow");
}
int
zamow(string str)
{
    if(!barm)
    {
        write("To przykre, ale nie ma nikogo kto moglby cie obsluzyc. Ktos " +
            "najwyrazniej zabil karczmarza.\n");
        say(QCIMIE(this_player(), 0) + " rozglada sie za karczmarzem.\n"); 
        return 1;
    }
    
    return order(str);
}

string
menu()
{
    say(QCIMIE(this_player(), PL_MIA) + " czyta tabliczke. \n");
    return
    "\nNa tabliczce widzisz:\n\n" +
    "\t\tMENU:\n" +
    "Napoje: \n" + 
    " Ciemne piwo :                 47 miedziakow\n" +
    " Czerwone wino :               35 miedziakow\n" +
    " Wodka krasnoludzka :          47 miedziakow\n\n" +
    "Napoje w pojemnikach:\n"+
    " Beczka ciemnego piwa (10l)   875 miedziakow\n"+
    " Beczka czerwonego wina (6l) 2220 miedziakow\n"+
    " Buklak wodki (2l)           1938 miedziakow\n\n"+
    "Dania :\n" +
    " Sledz :                      12 miedziakow\n" + 
    " Salatka z jarzyn :           18 miedziakow\n\n" +
    "Szef Kuchni poleca :\n" +
    " Befsztyk po rzeznicku :      80 miedziakow\n";
}

void bijatyka()
{
    tell_room(TO,"Nagle w jednym z rogow spelunki wybucha gwaltowne "
      + "zamieszanie, szybko zakonczone dwoma ciosami noza i rozpaczliwym "
      + "okrzykiem umierajacego czlowieka. Wiekszosc gosci tylko przez "
      + "chwile zainteresowala sie wydarzeniem, po czym spokojnie "
      + "wrocila do swoich trunkow. \n");
}

void okrzyki() 
{
    tell_room(TO,"Wydaje sie, ze wszystkie deski w karczmie jeknely z "
      + "bolu, gdy na okrzyk marynarza stojacego przy kontuarze, wszyscy "
      + "amatorzy serwowanych tu trunkow zaintonowali swa piesn : "
      + "Szlaaaaaa dzieeeeweczkaaaa, do laseeeeczkaaaa!\n");
}

void pomruk()
{
    tell_room(TO,"Przez sale przeszedl glosny pomruk niezadowolenia, "
      + "gdy faworyt w silowaniu na reke niespodziewanie przegral "
      + "z nikomu nie znanym krasnoludem. Kibice nie zdolali jednak "
      + "wyladowac swej frustracji na zwyciezcy, gdyz ten szybko umknal "
      + "zgarniajac cala wygrana. \n");
}