/* Plik:     chata_w2.c
 * Autor:    Borzoj
 * Data:     27.3.98
 * Opis:     kuchnia w domu wojta, Dimenau
 * Poprawki: Tigr
 * Update: 20.06.98
 */

#include "tigr.h"
inherit "/d/Imperium/std/room.c";

#define KUCHARKA_PRACUJE 3
#define KUCHARKA_SPI 1
#define KUCHARKA_KLADZIE_SIE 4

string dlugi_opis();
string opis_stolu();
string opis_pieca();
string opis_kawalkow();

int czy_jasno();

object kucharka;
sklonuj_kucharke()
{
   mixed inv;
   int i;
   
   kucharka = clone_object(TPATH + "/npc/kucharka.c");
   kucharka->szykuj();
     if (czy_jasno()) 
        {
          kucharka->ustaw_stan(KUCHARKA_PRACUJE);
          kucharka->move_living("M",this_object(),0,0);
          kucharka->sklonuj_bron();
        }
     else 
        {
          kucharka->ustaw_stan(KUCHARKA_KLADZIE_SIE);
          
          if (find_object(TPATH+"/sklepy/chata_w4.c"))
             {
                inv = all_inventory(find_object(TPATH+"/sklepy/chata_w4.c"));
                
                for (i=0;i<sizeof(inv);i++)
                    {
                       if ((inv[i]->query_kucharka()))
                          {
                             inv[i]->remove_object();
                          }
                    }
             }
          
          kucharka->move_living("M",TPATH + "/sklepy/chata_w4.c",0,0);
          kucharka->sklonuj_bron();
          kucharka->command("ziewnij sennie");
          set_alarm(1.0,0.0,"spac");
        }
}

spac()
{
   kucharka->command("zdejmij wszystko");
   kucharka->command("emote kladzie sie i zasypia.");
   kucharka->ustaw_stan(KUCHARKA_SPI);
   kucharka->add_prop(LIVE_S_EXTRA_SHORT," spiaca na lozku");
}

void
create_imperium_room()
{
  set_short("Kuchnia");
  set_long("@@dlugi_opis");
  add_prop(ROOM_I_LIGHT,1);
  add_prop(ROOM_I_INSIDE,1);
  add_item("stol","@@opis_stolu");
  add_item("piec","@@opis_pieca");
  add_item(({"kawalek","kawalki","mieso","warzywo","warzywa"}),
    "@@opis_kawalkow");
  add_item("polki","Na tych polkach porozkladane jest wszystko, co moze " +
  	"byc przydatne w kuchni - garnki, patelnie, sztucce, naczynia i " +
  	"inne przedmioty.\n");
  add_item("naczynia","Na polkach poukladane sa cynowe talerze, kubki "+
    "sztucce - wszystko co tylko moze byc potrzebne w kuchni.\n");
  add_item("garnki","Kazdy garnek jaki tylko moze przydac sie gospodyni "+
    "napewno lezy na ktorejs z polek - sa tu malutkie garnuszki, zwykle "+
    "garnki, plaskie patelnie, az po wielkie garnce.\n");
  
  setuid();
  seteuid(getuid());
  
  
  add_exit(TPATH + "/sklepy/chata_w3.c","zachod",0,1);
  add_exit(TPATH + "/sklepy/chata_w4.c","poludnie",0,1); 
  
  sklonuj_kucharke();
} //create_imperium_room


string 
opis_pieca()
{
  return
  ((czy_jasno())?"W piecu rozpalony jest ogien a na plycie stoja garnki "+
  "z gotujaca sie strawa.":
  "duzy piec kuchenny jest teraz wygaszony, ale w "+
  "palenisku czauc jeszcze slady ciepla pozostale po calodziennym "+
  "gotowaniu.")+
  "\n";
}//opis_pieca

string
opis_stolu()
{
  return
  ((czy_jasno())?"Na calym stole widac slady przygotowywania posilku - "+
  "porozkladane sa naczynia, leza noze, kawalki miesa i warzyw.\n":
  "Blat stolu jest pusty i starannie wyczyszczony.\n");
} //opis_stolu


string
dlugi_opis()
{
  return 
    "Niezbyt duze pomieszczenie wypelnia intensywny zapach gotowanych "+
    "potraw. Do scian przymocowane sa polki na ktorych leza wszelkiego "+
    "rodzaju naczynia i garnki, a takze wedzone kielbasy, suszone "+
    "ziola i roznorodne smakolyki. Pod sciana stoi duzy piec kuchenny, "+
    "a na srodku wielki stol. "+
    "Na poludniu widzisz nieduze drzwi prowadzace do pokoju kucharki, "+ 
    "a zachodnie wyjscie prowadzi do reszty domu."+  
    "\n";
} // dlugi_opis   

string
opis_kawalkow()
{
  return
  ((czy_jasno())?"Na stole pelno jest fragmentow zywnosci roznych "+
  "rozmiarow i rodzaju.\n":"");
}//opis_kawalkow

int
czy_jasno()
{
  int temp=0;
  if ((pora_dnia()=="noc")|(pora_dnia()=="wieczor")|
      (pora_dnia()=="pozny wieczor")|(pora_dnia()=="polnoc")) 
    {temp=0;} 
  else
    {temp=1;};
  return temp;
} // czy_jasno

reset_imperium_room()
{
  if (!kucharka) sklonuj_kucharke();
  ::reset_imperium_room();
}

object
query_kucharka()
{
   return kucharka;
}