
inherit "/d/Imperium/std/room";
#include "/sys/stdproperties.h"
#include "silvy.h"

object szcz1,szcz2;

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);
    }
}  

create_imperium_room()
{
 
    add_prop(ROOM_I_INSIDE, 1);
    add_prop(ROOM_I_LIGHT, 0);
    set_short("Sciana z czerwonej cegly");
    set_long(BSN("Tuz przed toba korytarz konczy sie nagle. Sciana z " +
                 "czerwonej cegly zagradza ci dalsza droge. Smrod jest tu " +
                 "nie do zniesienia. Wydobywa sie on z waskiej szczeliny, " +
                 "widocznej zaraz przy wschodniej scianie."));

    add_exit(NPATH + "wieza/wie_0_11.c","poludnie",0,1);
    add_exit(NPATH + "wieza/dziura.c","dol",0,1);

    add_item(({"podloga","podloge"}),
               BSN("Kamienna posadzka pokryta jest gruba warstwa kurzu i " +
                   "nieczystosci. Opada ona powoli w kierunku polnocnym. " +
                   "Zaraz obok polnocnej sciany widoczna jest waska szczelina " +
                   "z ktorej bije nieznosny, mdly smrod."));
    add_item(({"kurz","nieczystosci","odpadki","odchody"}),
               BSN("Z odraza zauwazasz ze wiekszosc z odpadkow pokrywajacych " +
                   "podloge to zeschniete odchody jakichs zwierzat."));
    add_item(({"sufit","sklepienie"}),
               BSN("Sklepienie jest tu polokragle, zrobione z twardej, " +
                   "czerwonej cegly. Sciany z szarego, twardego kamienia " +
                   "stanowia idealne polaczenie prostoty i niezniszczalnej " +
                   "praktycznosci."));
    add_item(({"sciana","sciane","cegly"}),
               BSN("Sciana z cegiel, postawiona z pewnoscia pozniej niz " +
                   "wybudowany zostal sam tunel, nie jest bynajmniej prowizoryczna. " +
                   "Gdzieniegdzie porastaja ja kepki szarego mchu. Wyglada raczej " +
                   "masywnie."));
    add_item(({"mech","porosty","mchy"}),
               BSN("Mech jak to mech, rosnie sobie bezmyslnie."));
    add_item(({"dziura","dziure","szczelina","szczeline"}),
               BSN("Jest ciemna i wyglada jak naturalne pekniecie wywolane " +
                   "tapnieciem lub trzesieniem ziemi. Ze srodka wydobywa " +
                   "sie smrod tak intensywny, ze az miesza ci sie w glowie."));

    szcz1=clone_object(NPATH + "npc/szczur.c");
    szcz1->move(TO);

    szcz2=clone_object(NPATH + "npc/szczur.c");
    szcz2->move(TO);
 
 }
