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

object szcz,klapa;

reset_imperium_room()
{
    if(!szcz)
    {
        szcz = clone_object(NPATH + "npc/mszczur.c");
        szcz->move(this_object());
    }
}    
              

create_imperium_room()
 { 
    add_prop(ROOM_I_INSIDE, 1);
    add_prop(ROOM_I_LIGHT, 0);
    set_short("Dziura");
    set_long("Znalazles sie w najochydniejszym, najbardziej smierdzacym " +
        "miejscu, jakie kiedykolwiek widziales, a raczej wyczuwales. " +
        "Jestes po prostu Zdegustowany. Cala posadzka zaslana jest " +
        "rozkladajaca sie padlina, zgnilymi liscmi i innymi specyfikami, " +
        "ktorych pochodzenia nie chcesz sie nawet domyslac. Sciany " +
        "wygladaja nie lepiej, pokryte jakas niesamowita miazga. " +
        "Najgorsze ze to wszystko wyglada tak, jakby poruszalo sie " +
        "i zylo wlasnym zyciem. No i ten smrod. Po prostu " +
        "pozbawia cie zmyslow. Nad soba widzisz jedyne waska " +
        "szczeline w suficie.\n");

add_exit(NPATH + "wieza/wie_0_12.c","gora");

    add_item(({"podloga","podloge","nieczystosci","odpadki"}),
               BSN("Posadzka pokryta jest poruszajaca sie sterta " +
                   "miesa, odpadkow."));
    add_item(({"dziura","dziure","szczelina","szczeline","sufit"}),
               BSN("Jest ciemna i wyglada jak naturalne pekniecie, wywolane " +
                   "tapnieciem lub trzesieniem ziemi. Z radoscia myslisz " +
                   "o opuszczeniu tego potwornego miejsca."));
    add_item(({"sciany","sciane","sciana","masa","miazga","miazge","mase"}),
               BSN("Sciany uparane sa masa, przypominajaca konsystencja " +
                   "mokre bloto lub drobno mielone mieso. Masz wrazenie " +
                   "ze za moment zwymiotujesz."));

    szcz = clone_object(NPATH + "npc/mszczur.c");
    szcz->move(this_object());

    klapa = clone_object(NPATH + "obj/dr_do_kanalu.c");
    klapa->move(this_object());
 }