#include "local.h"
inherit IR;
int z=1;

create_imperium_room() {
    
    set_long("@@my_long");
    set_short("Lesna sciezka");
    
    add_exit(HOME+"/oboz17", "polnocny-zachod");
    add_exit(HOME+"/oboz19", "poludniowy-wschod", 0);
    
    set_event_time(10.0,100.0);
    add_event("Masz wrazenie, ze jestes obserwowany.\n");
    add_event("Widzisz jakies oczy, mrugajace w zaroslach.\n");
    add_event("Owiewa cie zimny wiatr.\n");
    add_event("Slyszysz wiatr skowyczacy w oddali.\n");
    add_event("Nagle robi sie bardzo cicho.\n");
    add_event("Slyszysz za soba jakis szept.\n");
    set_events_on(1);
    
    add_cmd_item(({"ziemie","sciezke","krzaki","zarosla","kurhan","kopiec"}),
                 ({"obejrzyj","przeszukaj","ob"}),"@@sciezka");
    add_cmd_item(({"do kurhanu","do kopca"}),({"idz","wejdz"}),"@@wejdz");

}

string
my_long() {
     write("Kroczysz sciezka. Dookola otacza cie las. ");
     write("Las jest nienaturalnie cichy, mroczny i bardzo, bardzo gesty."+
           " Swiatlo z trudem przebija sie przez korony drzew. Sciezka wije sie"+
           " dookola grubych pni, wydaje sie gubic w kniei i znow wylaniac"+
           " przed twoimi stopami. Od dawna nikt nie zapuszczal sie tak gleboko"+
           " w dziewicza puszcze. Masz nadzieje, ze sludzy Solkana "+
           ((TP->query_alignment() < 0) ? "nie " : "")+
           "wytepili stwor"+
           ((TP->query_alignment() < 0) ? "ow " : "y ")+
           "Chaosu zamieszkujac"+
           ((TP->query_alignment() < 0) ? "ych " : "e ")+
           "niegdys ten bor."+opis_pory_roku());
     if (TP->query_skill(SS_AWARENESS)>7+random(9))
           write(" Glebiej, kolo sciezki, zauwazasz niewielki kopiec. Czyzby byl to"+
                 " jakis zapomniany kurhan, usypany dawno zmarlemu wojownikowi?\n");
     else write("\n");
    return"";                 
           }

string
sciezka(string str)
{
    if (this_player()->query_skill(SS_AWARENESS)<random(12))
    {
        return"Sciezka wije sie miedzy drzewami. Jest tu dosc"+
               " chlodno i nieprzyjemnie, az ciarki przechodza ci po plecach.\n";
    }
    else
    {
       return"Sciezka wije sie miedzy drzewami. Jest tu dosc"+
              " chlodno i nieprzyjemnie, az ciarki przechodza ci po plecach. "+
              "Kolo sciezki dostrzegasz niewielki kopiec. "+
              "Chyba mozna do niego wejsc...\n";
     }
}

string
wejdz()
{
   write("Powoli zaglebuiasz sie w ciemnosc panujaca wewnatrz kurhanu.\n");
   TP->move_living("do kurhanu",HOME + "/kopiec.c",1,0);
   return "";

}