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

object szcz1,szcz2,szcz3;

reset_imperium_room()
{
    if(!szcz1)
    {
        szcz1=clone_object(NPATH + "npc/szczur.c");
        szcz1->move(TO);
    }
    if(!szcz2)
    {
        szcz2=clone_object(NPATH + "npc/szczur.c");
        szcz2->move(TO);
    }
    if(!szcz3)
    {
        szcz3=clone_object(NPATH + "npc/szczur.c");
        szcz3->move(TO);
    }
}    


create_imperium_room()
 {

    add_prop(ROOM_I_INSIDE, 1);
    add_prop(ROOM_I_LIGHT, 0);
    set_short("Bardzo waski korytarz");
    set_long(BSN("Waski korytarz prowadzi cie dalej w ciemnosc. " + 
                 "Gesta siec pajeczyn sprawia ze przejscie jest jeszcze wezsze " +
                 "i bardziej nieprzyjemne. " +
                 "Jesli tak dalej pojdzie mozesz utknac, " +
                 "stajac sie jedna z ofiar wlasciciela pajeczyn."));

    add_exit(NPATH + "wieza/wie_0_6.c","poludniowy-zachod",0,1);
    add_exit(NPATH + "wieza/wie_0_8.c","polnocny-wschod",0,1);

    add_item(({"podloga","podloge"}),
               BSN("Kamienna posadzka pokryta jest gruba warstwa kurzu i " +
                   "nieczystosci."));
    add_item(({"kurz","nieczystosci","odpadki","odchody"}),
               BSN("Z odraza zauwazasz ze wiekszosc z odpadkow pokrywajacych " +
                   "podloge to zeschniete odchody jakichs zwierzat."));
    add_item(({"sciany","sciana","sciane","sufit"}),
               BSN("Sklepienie jest tu polokragle, zrobione z twardej, " +
                   "czerwonej cegly. Sciany i sufit pokryte sa siecia " +
                   "pajeczyn."));
    add_item(({"pajeczyna","pajeczyne","pajeczyny"}),
               BSN("Ilosc pajeczyn wskazuje na to ze miejsce to nie jest " +
                   "zbyt czesto odwiedzane. Nici sa grube, nie widac " +
                   "jednak ani jednego pajaka. Moze to i dobrze."));

    szcz1=clone_object(NPATH + "npc/szczur.c");
    szcz1->move(TO);

    szcz2=clone_object(NPATH + "npc/szczur.c");
    szcz2->move(TO);

    szcz3=clone_object(NPATH + "npc/szczur.c");
    szcz3->move(TO);
    
 }