inherit "/d/Imperium/std/room";
inherit "/lib/pub.c";
#include <stdproperties.h>
#include <macros.h>
#include <pl.h>
#include <stdproperties.h>
#include <macros.h>
#include <ss_types.h>
#define TO      this_object()
#define TP      this_player()
object ob;
object piekarz;
string opispokoju()
{
  string s = "Znajdujesz sie w jednej ze znamienitszych, o ile nie najlepszej"
  +" piekarni w Altdorfie. "
  +"Pomieszczenie to nie jest zbyt duze, jednak miesci sie tu wszystko, co"
  +" powinno. "+
  "Gdziekolwiek nie spojrzysz, widzisz wspaniale i apetyczne wypieki."
  +" Duzy regal stojacy przy najdalszej scianie, kilka mniejszych regalow, "
  +"jak i kilka stojacych na ziemi koszy - wszystko pelne jest rozmaitego rodzaju"
  +" bulek, chlebow, rogalikow, ciastek i wszystkiego, co przyszlo do glowy stojacemu"
  +" za szeroka lada piekarzowi.\n"
  +"Czujesz zapach pieczonego chleba, na mysl o ktorym az slinka ci cieknie."
  +" Na scianie obok lady widzisz drewniana tabliczke z instrukcjami.\n";
  return s; 
}
void
create_imperium_room()
{
  int i;
  
  set_short("Piekarnia");
  set_long("@@opispokoju");
  
  add_item (({"regal","regaly","polki"}), "Na polkach regalow widzisz rozmaitych ksztaltow"
  +" chleby, bulki, rogaliki i inne wypieki, niektore nawet jeszcze cieple."
  +" Wszystko wyglada niezwykle apetycznie, i z pewnoscia jest - swiadczyc moze"
  +" o tym tusza piekarza, stojacego za lada.\n");
  add_item (({"chleby","bulki","rogale","pieczywo","wypieki"}), "Gdziekolwiek nie spojrzysz,"
  +" widzisz smakowite wypieki, niemalze az proszace, by je natychmiast zjesc."
  +" Pulchne bulki maja ksztaltne naciecia w ksztalcie litery X, zas chleby i podluzne"
  +" bulki nosza polokragle slady od lyzki. Wszystkie te specjaly wydaja sie"
  +" byc swiezutkie i chrupiace - i najprawdopodobniej sa.\n");
  add_item (({"kosz","kosze","koszyk","koszyki"}), "W wiklinowych koszach, ustawionych na"
  +" podlodze, znajduja sie bulki, chleby i inne wypieki, ktore juz nie zmiescily"
  +" sie na polkach regalow, a najwyrazniej piekarz uznal, ze warto sie nimi"
  +" pochwalic.\n");
  add_exit("/d/Imperium/Altdorf/Ulice/plglo4","wschod",0,1,0);
  
  add_item("tabliczke","Na tabliczce jest cos napisane.\n");
  
  add_cmd_item(({"tabliczke","napis"}),"przeczytaj","@@standard_tabliczka");
  
  add_prop(ROOM_I_INSIDE, 1);
  
  dodaj_npca("/d/Imperium/Altdorf/npc/piekarz.c");
    
    add_wynos_food( ({"bulka","bulki","bulce","bulke","bulka",
                     "bulce"}),
                ({"bulki","bulek","bulkom","bulki","bulkami","bulkach"}),
                ({ ({"dlugi"}),({"dludzy"}) }),
                150,20,
                "Jest to cudownie pachnaca, swiezutka bulka.\n",
                PL_ZENSKI, 1500, ({"zeschly","zeschli"}));
                
    add_wynos_food( ({"kajzerka","kajzerki","kajzerce","kajzerke","kajzerka",
                     "kajzerce"}),
                   ({"kajzerki","kajzerek","kajzerkom","kajzerki",
                   "kajzerkami","kajzerkach"}),
                   ({ ({"dobrze przypieczony"}),({"dobrze przypieczni"}) }),
                   30,5,
                   "Jest to malutka, dobrze przypieczona kajzerka.\n",
                   PL_ZENSKI, 1500, ({"zeschly","zeschli"}));
                   
    add_wynos_food( ({"chleb","chleba","chlebowi","chleb","chlebem","chlebie"}),
                ({"chleby","chlebow","chlebom","chleby","chlebami","chlebach"}),
                ({ ({"chrupiacy"}),({"chrupiacy"}) }),
                400, 25,
                "Jest to chrupiacy dobrze upieczony bochenek chleba.\n",
                PL_MESKI_NZYW, 1600, ({"zeschly","zeschli"}));
                
}
string
standard_tabliczka()
{
  return "Witamy w naszej piekarni drogich klientow, mozecie dokonywac tu "+
    "nastepujacych czynnosci:\n"+
    "1. kupowac, np.: kup bulke, ew.: zamow bulke.\n"+
    "2. przejrzec cennik, np.: przejrzyj cennik.\n";
}
    
void
init()
{
  init_pub();
  ::init();
}
int
order(string str)
{
    if (!present("piekarz", this_object()))
      {
        write("Nie masz do kogo zwrocic sie z ta prosba.\n");
        return 1;
      }
  return ::order(str);
}