/* Vaktoth 1997 */


#pragma no_clone
inherit "/d/Imperium/std/room";
#include "/sys/stdproperties.h"
#include "/sys/macros.h"
#include "defs.h"

object *skav = allocate(10);
void
reset_imperium_room()
{
  int i;
  for (i=0; i<sizeof(skav); i++)
  {
    if (present(skav[i],TO)==0)
    {
        skav[i] = clone_object( NPCS + "skaven.c");
        tell_room(TO,"Skaven nadchodzi.\n");
        skav[i]->move(TO);
    }
  }
}



create_imperium_room()
{
  

     set_long("@@long_desc");
     set_short("Przodek tunelu");
   
    add_item(({"sciana","sciane","przodek","skaly","skale"}),
	    "Sciany w tej czesci tunelu zostaly wykute calkiem niedawno " +
	    "i widac wyraznie, ze skavenom robota idzie dosc opornie - skala " +
	    "jest twarda i trzeba nie lada wysilku aby ja skruszyc. " +
        "Skavenom widocznie to nie przeszkadza, gdyz z dzikim uporem " +
        "wciaz wgryzaja sie w skale. Musi im bardzo na tym zalezec, " +
        "poniewaz tempo pracy jest zabojcze.\n");
    add_item(({"latarnie","latarnia","lampe","lampy"}),
	    "Sa to latarnie naftowe, mocno umocowane w skalistym podlozu. " +
	    "Daja zoltawe swiatlo, ktore zalewa przodek i powoduje, ze czujesz " +
            "sie tu nieco nieswojo.\n");
    add_item(({"gornicy","gornikow","skavenskich gornikow","sylwetki"}),
	    "Wsrod tumanow pylu ledwie rozpoznajesz sylvetki skavenskich " +
	    "gornikow. Pracuja bez wytchnienia, drazac skale i podazajac " +
        "do sobie tylko znanego celu.\n");
 add_exit( LOKACJE + "temple04.c","zachod", 0);

 INSIDE;
 set_alarm(30.0, 30.0, "talk");
 set_alarm(150.0, 200.0, "talk1");
 reset_imperium_room();
}
 string
 long_desc()
{
 return("Znalazles sie w przodku tunelu. Pomieszczenie wypelnia pyl i " +
    "zapach potu skavenskich robotnikow, drazacych skale z nieustajaca " +
    "energia. Skala najwyrazniej stawia bardzo silny opor, gdyz mimo " +
    "morderczego tempa prac wyniki sa bardzo mizerne - kilka odlamkow " +
    "rozrzuconych po podlozu. Poprzez drobiny pylu zaledwie rozpoznajesz " +
    "sylwetki gornikow, pracujacych w slabym swietle latarn. Odglosy kucia " +
    "odbijaja sie echem po korytarzu tworzac istna kakofonie dzwiekow, " +
    "powodujac iz po chwili ledwo slyszysz cokolwiek innego poza tym " +
    "piekielnym halasem!\n");
} 

void 
talk()
{
         tell_room(this_object(), 
           "Lup! Lup! Lup! Odglosy kucia sa przerazajaco glosne.\n");
}

void 
talk1()
{
         tell_room(this_object(), 
           "Skavenscy robotnicy przystaneli na chwile, po czym znow zabrali sie do pracy.\n");

}