inherit "/d/Imperium/std/room";

#include <macros.h>
#include <stdproperties.h>
#include "silvy.h"

object barylka;
int jest_garniec;
int kwas(string str);
    
create_imperium_room()
{    
    
    set_short("Piwniczka gospody U Rudolfa");
    set_long("Ciemnosc piwniczki rozjasnia oliwny kaganek uwieszony na "+
             "zwisajacym z sufitu grubym sznurze. Migoczacy plomien rzuca "+
             "roztanczone cienie przeskakujace z kata w kat. Z gory "+
             "dochodza halasy hulajacych gosci i krzatajacego sie "+
             "gospodarza. W watlym swietle kaganka widac wirujacy w "+
             "zatechlym powietrzu kurz. Szare pajeczyny powiewaja na "+
             "grubych, drewanianych belach podtrzymujacych strop. "+
             "Dokola na specjalnych stelazach wyleguja sie dziesiatki "+
             "butelek. Pod sciana, ustawione w piramidke, stoja pekate "+
             "beczki zawierajace zapasy trunkow i zywnosci. Osobna szafka " +
             "zawiera kufle, miski i inne naczynia.\n");
    
    add_item( "kaganek", "Jedyne zrodlo swiatla, rozswietlajace mroki "+
              "tego pomieszczenia.\n");
  
    add_item( "stelaze", "Drewniane konstrukcje przystosowane do "+
              "przechowywania butelek.\n");

    add_item( "beczki", "Sa po brzegi napelnione przednim winem i suszonym "+
              "miesem.\n");
    add_item("szafke","Drewniana szafka, stojaca w rogu, zawiera wiele " +
        "niezbednych w karczmie naczyn kuchennych, takich jak miski, kufle, "+
        "lyzki, garnce, talerze.\n");           
    add_item(({"lyzki","talerze","garnce","kufle","miski"}),
        "Naczynia kuchenne zajmuja cala szafke stojaca w rogu pomieszczenia.\n");
    
    add_cmd_item(({"z szafki talerz","talerz z szafki","z szafki lyzke","lyzke z szafki",
        "kufel z szafki","z szafki kufel","miske z szafki","z szafki miske"}),
        ({"zabierz","wez"}),"Nie widzisz potrzeby zabierania tego bezwartosciowego przedmiotu.\n");
    add_cmd_item(({"z szafki garniec","garniec z szafki"}),({"wez","zabierz"}),
        "@@bierz_garniec");
    
         
    add_exit(NPATH + "sklepy/bar_1.c","gora");
    
    add_prop(ROOM_I_INSIDE, 1);
    add_prop(ROOM_I_LIGHT, 1);  
    reset_imperium_room();
} 

reset_imperium_room()
{
   if(!barylka)
    {        
        barylka = clone_object(NPATH+"obj/barylka.c");
        barylka->move(this_object());
    }
}

reset_questa()
{
    if(!barylka)
    {        
        barylka = clone_object(NPATH+"obj/barylka.c");
        barylka->move(this_object());
    }
    barylka->reset_questa();
    jest_garniec = 1;
}        
    
string
bierz_garniec()
{
    if(!jest_garniec)
    {
        write("Przeszukujesz szafke, ale nie znajdujesz tam zadnego " +
            "garnca.\n");
        say(QCIMIE(this_player(),PL_MIA)+" przeszukuje stojaca w rogu " +
            "szafke.\n");
        return"";
    }            
    write("Bierzesz z szafki gliniany garniec.\n");
    say(QCIMIE(this_player(),PL_MIA)+" bierze z szafki jakies naczynie.\n");
    clone_object(NPATH + "obj/garniec")->move(this_player());
    jest_garniec = 0;
    return"";
}            

int
kwas(string str)
{
    object ob;
    
    if (str != "kwasa")
    {
        write("Gosciu w ciemnej szacie wstaje i lapiac cie za fraki "+
              "szepce: Albo zamawiasz kwasa albo spierdalaj...\n");
        return 1;
    }
    else
    {
        write("Gosciu w ciemnej szacie wstaje i szybkim ruchem "+
              "wklada ci kartonik do kieszeni.\n");
        ob=clone_object("/d/Imperium/ziola/kwas.c");
        ob->move(this_player());
        return 1;
    }
}

void
init()
{
    ::init();
    add_action("kwas", "zamow");
}
