/*
 * Karczma w Athel-Loren
 * by Tanis
 * czerwiec 1998
 */
 
inherit "/d/Imperium/std/room";
inherit "/lib/pub";


#include "ogolne.h"

void
create_imperium_room()
{
    set_short("Karczma w Athel Loren");
    set_long("Jestes w duzym, drewnianym pomieszczeniu. Wszystko wskazuje, ze jest "
       + "to miejscowa karczma. Stoi tutaj kilka drewnianych stolow, przy kazdym "
       + "dluga lawa. Z tylu, pod sciana dostrzegasz lade, za ktora zwykle urzeduje karczmarz. "
       + "Pod sufitem wisza rozne ziola, troche grzybow, z ktorych czesc jest juz zupelnie ususzona. "
       + "Nad lada wisi drewniana tablica.\n");
    
    add_item("lade", "Lade wykonano z mocnego, prawdopodobnie debowego drewna. W kilku "
        + "miejscach jest troche wytarta, jednak jest czysta i sprawia dobre wrazenie.\n");

    add_item(({"stoly","stol"}),"Drewniane stoly sa utrzymane w czystosci. "
       + "Widac, ze o te karczme wlasciciel bardzo dba.\n");

    add_item(({"lawe","lawy"}),"Przy kazdym ze stolow stoja dwie drewniane lawy, "
       + "wystarczajaco dlugie, aby zmiescila sie na nich nawet spora grupa gosci.\n");

    add_item(({"ziola","grzyby"}),"Ziola i grzyby suszone pod sufitem pochadza prawdopodonie z "
       + "otaczajacego Athel-Loren lasu. Czesc jest calkiem swieza, a czesc juz prawie zupelnie ususzona.\n");
            
    add_item(({ "tablice", "drewniana tablice", "menu" }), "Drewniana, ladnie zezbiona tablica spelnia funkcje "+
        "menu. Warto by ja przeczytac.\n");
        
    add_cmd_item( ({ "tablice", "menu" }), ({ "czytaj", "przeczytaj" }),
        "@@menu");
        
    add_prop(ROOM_I_INSIDE, 1);

    set_event_time(10.0, 100.0);
    
    add_event("Od ktoregos ze stolow dobiega cie glosny smiech siedzacych tam gosci.\n",0);
    add_event("Czujesz silny, drazniacy nozdrza zapach, pochodzacy pewnie z suszonych pod sufitem "
       + "ziol.\n",0);
    add_event("Z dworu dobiega ci czyjs sciszony glos.\n",2);
    add_event("Mija cie mloda elfka, roznoszaca jakies smakowicie wygladajace dania.\n",0);
    add_event("Do karczmy wchodzi jakis nowy gosc. Rozglada sie przez chwile po czym siada przy jednym z wolnych stolikow.\n",0);
    add_event("Ktorys z gosci wstaje, placi i wychodzi niespiesznie z karczmy.\n",0);

    set_events_on(1);

    add_exit(APATH+"ulica09.c","zachod",0,1);

/* Oto co oznaczaja poszczegolne argumenty dla add_drink() */
/*
 * Nazwa funkcji : add_drink
 * Opis          : Dodaje trunek serwowany na miejscu i (lub) na wynos.
 * Argumenty     : nazwy_dop - Nazwa lub nazwy trunku w dopelniaczu w lp
 *		   nazwy_bie - Nazwa lub nazwy trunku w bierniku w lp
 *		   picie_tu  - Opis przy piciu (Xxx wychyla 'kufel jasnego piwa')
 *		   short_dop - Krotki opis trunku w dopelniaczu.
 *		   adj	     - Tablica z parami przymiotnikow
 * 		   vol	     - Ile % alkoholu jest w plynie
 *		   porcja    - Ile ml napoju sprzedaje sie w porcji na miejscu
 *		   obj_pojemn- W ilu litrowych pojemnikach sprzedaje sie na wynos
 * 		   cena	     - Cena litra napoju.
 *		   rodzaj    - Rodzaj gramatyczny nazwy napoju
 *		   opis_pojemn-Opcjonalny opis pojemnika, w jakim trunek
 *			       jest sprzedawany. 
 */
    

/* Zwykle piwo, sprzedawane w 5-litrowych beczkch oraz w kuflach na miejscu.
   Ponadto beczki w ktorych jest sprzedawne sa 'firmowe'. 
 */
    add_drink("piwa", "piwo", "kufel jasnego, musujacego piwa",
    		"ciemno-bursztynowego, wspaniale pieniacego sie piwa",
    		({ ({ "jasny", "musujacy" }), ({ "jasni", "musujacy" }) }),
    		5, 250, 5, 80, PL_NIJAKI_NOS, "Jest to niewielka debowa " +
    		"beczulka na piwo.");

/* A tu mamy wino, ktore jest na tyle dobore, ze nie sprzedaje sie go 
   w beczkach na wynos (swiadczy o tym 0, jako pojemnosc pojemnika) 
 */
    add_drink("wina", "wino", "kubek czewonego, elfiego wina",
    		"", ({ ({ "czerowny", "elfi" }), ({ "czerwoni", 
    		"elfi" }) }), 12, 100, 0, 800, PL_NIJAKI_NOS);


/* UWAGA: Przy trunkach trzeba pamietac, ze cena jest podawana za litr,
	  a np. piwo u nas jest sprzedawane w kuflach cwierclitrowych.
	  Oznacza to, ze cene nalezy pomnozyc przez ilosc cieczy w porcji
	  i podzielic przez 1000. Dla piwa to bedzie: 80 * 250 / 1000 = 20.
	  Czyli cena kufla piwa wynosi 20.
	  
  UWAGA2: Napoje sa sprzedawane na wynos w dwoch rodzajach pojemnikow.
  	  Jesli pojemnosc sie poda w przedziale 1-4 litry, to beda sprzedane
  	  w buklaku. Jesli powyzej - w beczulce. Nalezy to uwzglednic w
  	  Menu. Do ceny za napoj doliczane jest (30 + 4*pojemnosc) 
  	  miedziakow za buklak i (140 + 10*pojemnosc) za beczulke.
 */

    
/* Oto co oznaczaja poszczegolne argumenty dla add_food() */ 
/*
 * Nazwa funkcji : add_food
 * Opis		 : Dodaje do menu posilek do zjedzenia 'na miejscu'.
 * Argumenty     : nazwa     - Nazwa lub nazwy jedzenia w bierniku lp
 *		   adj	     - Tablica z parami przymiotnikow
 *		   ilosc     - Ilosc zarcia (jego waga w gramach)
 *		   cena      - Cena zarcia (koszt kupna)
 *		   rodzaj    - Rodzaj gramatyczny nazwy jedzenia
 *		   short     - Krotki opis w bierniku lp (opcjonalne)
 */

    add_food( "ziemniaki", 0, 400, 40, PL_MESKI_NOS_ZYW,
              "miske goracych ziemniakow z ziolami.");

    add_food( "chleb", 0, 150, 25, PL_MESKI_NZYW,
              "pachnacy bochenek swiezego chleba.");

    add_food( "owoce", ({ ({"swiezy","soczysty"}),({"swiezy","soczysci"}) }), 300, 30, PL_ZENSKI,
              "miske soczystych, swiezych owocow.");

     dodaj_npca(PATH + "npc/karczmarz.c");    
}
  
int
zamow(string str)
{
    if (!present("karczmarz", environment(TP)))
    {
        write("Rozgladasz sie wokol, ale nie dostrzegasz nigdzie " +
               "charakterystycznej postaci karczmarza. Moze ktos go zabil ?\n");
	say(QCIMIE(this_player(), PL_MIA) + " rozglada sie za karczmarzem.\n");
	
        return 1;
    }
    
    return order(str);
}

void
init()
{
    ::init();

    add_action(zamow, "kup");
    add_action(zamow, "zamow");
}

string
menu()
{
    say(QCIMIE(this_player(), PL_MIA) + " czyta tablice.\n");
    return
    "\nTablica wyglada nastepujaco:\n\n"+
    "\t\tMENU:\n"+
    "Jedzenie:\n"+
    " Swieze owoce			30 miedziakow\n" +
    " Ziemniaki z ziolami		40 miedziakow\n" +
    " Chleb				25 miedziakow\n\n" +
    "Napoje:\n"+
    " Elfie wino			80 miedziakow\n" +
    " Jasne piwo			20 miedziakow\n\n" +
    " Oprocz tego, nasze piwo mozna nabyc w 5-litrowych beczulkach, za " +
    "jedyne 590 miedziakow.\n";

}