#include "/sys/stdproperties.h"
#include "local.h"
inherit IR;
#include "ork.h"
int licznik=0;

void
reset_imperium_room() 
{
    ludzie(2);
}
  
create_imperium_room() {
    
    set_long("@@my_long");
    set_short("Polnocne skrzydlo obozu orkow");
    
    add_exit(HOME+"/oboz1", "poludniowy-zachod", 0);
    add_exit(HOME+"/oboz5", "poludniowy-wschod", 0);
    add_exit(HOME+"/oboz2", "poludnie", 0);    

    add_prop(ROOM_I_LIGHT, 5);
    
    add_item(({"sterte","sterty","smiecie"}), "Wysoka sterta smieci... Sa to glownie resztki pozywienia, stare szmaty i opatrunki.\n");
    add_item(({"namiot","kuchnie"}), "Zgodnie z twoimi przypuszczeniami, ten spory namiot to kuchnia polowa."+
                                     " Z dziury u gory namiotu wydobywa sie slaba struzka dymu, snujaca sie z wolna do gory.\n");
                                     
    set_event_time(10.0,100.0);
    add_event("Cos tu smierdzi.\n");
    add_event("Alez cos tu smierdzi!\n");
    add_event("Ten smrod jest nie do zniesienia!\n");
    add_event("Zauwazasz jakiegos snotlinga z przejeciem grzebiacego w stercie smieci.\n");
    set_events_on(1);
    
    reset_imperium_room();
    
               }

string
my_long() {
  return "Polnocne skrzydlo obozu orkow. Na poludniowym wschodzie jest jakis" +
         " duzy, bogatszy namiot. Tam pewnie rezyduje dowodca tego oddzialu. Gdzies w tej okolicy musi"+
         " znajdowac sie kuchnia obozu... Mozna sie tego domyslic po stertach smieci lezacych"+
         " dookola i wydzielajacych specyficzny zapach. Z boku dostrzegasz spory namiot. "+
         opis_pory_roku()+"\n";
           }

/*

string 
przeszuk (object searcher, string s)
{
    object kartka;
    set_this_player(searcher);
    if (s=="sterte" || s=="smiecie" || s=="kupe")
    {
        if ((TP->query_skill(110) > random(10) + 10))
        {
            if (licznik==0)
            {
                kartka=clone_object(DPATH + "bronie/przepis.c");
                kartka->move(this_player());
                licznik++;
                return "Znalazl"+TP->koncowka("es","as")+" jakas brudna kartke.\n"+
                       "Podnosisz ja i wkladasz do kieszeni.\n";
            }
            return "Po paru sekundach radosnego babrania sie w smieciach rezygnujesz.\n";
        }
        return "Po paru sekundach radosnego babrania sie w smieciach rezygnujesz.\n";
    }
    return 0;
}

*/