/* 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 + "skavstr.c");
        tell_room(TO,"Skaven nadchodzi.\n");
        skav[i]->move(TO);
    }
  }
}

create_imperium_room()
{
   
  
    set_long("@@long_desc");
    set_short("Ukryty pokoj w swiatyni Rogatego Szczura");

    add_item(({"stol","orzechowy stol"}),
	        "Jest to pieknie wykonany stol z drzewa orzechowego. Ma owalny ksztalt, a " +
	        "jego blat ozdobiono bogata mozaika z roznokolorowych kawalkow drzew. Taki " +
	        "stol musi byc wart majatek.\n");

    add_item(({"sciane","sciany","gobeliny","gobelin"}),
	        "Sciany pokoju ozdobione sa bogatymi gobelinami, zapwene z importu, gdyz" +
            " nigdy wczesniej nie widziales podobnych deseni. Takie gobeliny sa z " +
            "pewnoscia wiele warte i niezwykle trudne do zdobycia.\n");
    
    add_item(({"podloge","podloze","kilim"}),
	        "Podloge pomieszczenia pokrywa miekki i puszysty kilim, doskonale dopasowany " +
            "do jego rozmiarow. Czujesz, jak twe stopy odpoczywaja kiedy bezszelestnie po " +
            "nim stapasz.\n");

    add_item(({"loze","lozko"}),
	        "Jest to duze loze na dwie osoby przykryte jedwabnym baldachimem.\n");

    add_item(({"fotel","fotele"}),
	        "Sa to glebokie i niezwykle wygodne fotele, pokryte pluszowym obiciem. " +
	        "Kazdy kto na nim siadzie zapada sie gleboko w jego wnetrzu. Prawdziwy" +
	        " luksus, na ktory moga sobie pozwolic tylko najbogatsi.\n");
    add_item(({"zyrandol"}),
	        "Zyrandol ten to szczyt osiagniec rzemiosla artystycznego. Setki krysztalow " +
	        "misternie oprawionych i tak ustawionych, by swiatlo padalo w kazdy kat pokoju." +
	        " Najwyrazniej byl robiony na zamowienie, specjalnie dla tego pokoju.\n");

  
  INSIDE;

  
  add_exit( LOKACJE + "temple12.c","poludnie", 0,0,1);
  reset_imperium_room();
}
 string
 long_desc()
{
 return("Znalazl" + TP->koncowka("es", "as") + " sie w niewielkim pomieszczeniu," +
    " bedacym prawdopodobnie pracownia kogos wysoko postawionego w hierarchii" +
    " skavenow. Pokoj zostal elegancko wyposazony - sciany wylozono bogato zdobionymi" +
    " gobelinami, zas na podlodze lezy miekki, kolorowy kilim. W jednym z katow stoi" + 
    " bogato zdobione loze, na srodku zas ustawiono stol z drzewa orzechowego, przy" +
    " ktorym stoja dwa pokryte pluszowym obiciem fotele. Z sufitu zwisa piekny, krysztalowy" +
    " zyrandol, dajacy mily, cieply, blask sprawiajacy, iz czujesz sie jak w rodzinnym domu." +
    " Dziwne - skaveni nigdy nie urzadziliby pokoju w ten sposob.\n");
}