inherit "/d/Imperium/std/room.c";
#include "/sys/stdproperties.h"
#include "silvy.h"

create_imperium_room()
 {

    add_prop(ROOM_I_INSIDE, 1);
    add_prop(ROOM_I_LIGHT, 0);
    set_short("Poludniowa czesc wielkiej sali");
    set_long("Znalazles sie w jaskini imponujacej wielkosci. Nie jestes " +
                 "w stanie dostrzec jej sklepienia. Sciany sa nierowne i " +
                 "pelne zalaman. Odbija sie w nich czerwona luna bijaca od " +
                 "niewielkiego podwyzszenia widocznego na polnocy. Trudno ci " +
                 "z tej odleglosci zobaczyc szczegoly. Powietrze jest tu " +
                 "swieze i wyczuwasz lekki przeciag.\n");

    add_exit(NPATH + "wieza/sala_2.c","polnocny-zachod","@@czy_mozna",1);
    add_exit(NPATH + "wieza/sala_3.c","polnocny-wschod","@@czy_mozna",1);
    add_exit(NPATH + "wieza/sala_4.c","polnoc","@@czy_mozna",1);
    add_exit(NPATH + "wieza/wie_0_9.c","poludnie","@@czy_mozna",1);

    add_item(({"podloga","podloge","posadzka","posadzke"}),
               BSN("Kamienna posadzka jest tu czysta i lsniaca."));
    add_item(({"sciany","sciana","sciane"}),
               BSN("Sciany maja tu imponujaca wielkosc. W skalnych " +
                   "zalamaniach odbija sie czerwony blask bijacy z polnocy."));
    add_item(({"podwyzszenie","swiatlo"}),
               BSN("Na polnocnym krancu jaskini znajduje sie cos, jakby " +
                   "podwyzszenie, od ktorego bije jasne, krwistoczerwone " +
                   "swiatlo, tanczace na wypolerowanej posadzce i w zalomach " +
                   "scian."));

 }

int
czy_mozna()
{
    if(random(5))
    {
        write("Tracisz rownowage na sliskiej posadzce i padasz jak " +
           this_player()->koncowka("dlugi","dluga") + ".\n");
        say(QCIMIE(this_player(),PL_MIA) + " traci rownowage na "+
           "sliskiej posadzce i pada jak "+
           this_player()->koncowka("dlugi","dluga") + ".\n");
        this_player()->add_fatigue(-10);
        return 1;
    }
    return 0;
}