inherit "/d/Imperium/Nuln/kanaly/kanal_room.c";
#include <std.h>
#include <macros.h>
#include "elear.h"
#include <stdproperties.h>

object paj1;
object paj2;

string opiskanalu()
{
    string s = "Jestes w prostym, cuchnacym kanale. Wiesz ze budowany on byl pr"
     + "zez krasnoludzkich wygnancow, uciekinierow z Gor Kranca Swiata, ktore"
     + " dla nich staly sie zbyt niebezpieczne by w nich pozostac. Potezne lu"
     + "ki, ozdobione plaskorzezbami z tradycyjnym krasnoludzkim motywem mlot"
     + "a i tarczy, podtrzymuja kamienne sklepienia juz od niemal tysiaca lat"
     + ". Przez sam srodek tego ogromnego pomieszczenia przeplywa ogromna mas"
     + "a miejskich sciekow. Fosforyzujace opary unoszace sie w powiet"
     + "rzu przyprawiaja o wymioty i torturuja Twoj zoladek. Mysl ze jeden ni"
     + "ewlasciwy ruch, na polmetrowej sciezce, moze skonczyc sie kapiela w t"
     + "ej zupie gowna i moczu paralizuje twe ruchy. \n";
    return s;
}

void create_imperium_room()
{
  ::create_imperium_room();
  set_short ("Podluzny odcinek kanalu");
  set_long ("@@opiskanalu");
  add_exit (ELEPATH+"/kan13.c","polnocny-wschod",0,1,0);
  add_exit (ELEPATH+"/kan15.c","zachod",0,1,0);
  
  paj1 = clone_object(NULN+"/npc/szczur.c");
  paj1 -> move (this_object());
  paj2 = clone_object(NULN+"/npc/szczur.c");
  paj2 -> move (this_object());
  
  add_item(({"luki","sklepienie"}), "Jest to solidna krasnoludz"
     + "ka robota, to i owdzie restaurowana przez ludzkich murarzy.\n");
    
  add_item(({"rzeke","sciek","nieczystosci","zupe"}), 
       "Tuz obok Twoich nog, szeroka na okolo dwa metry, plynie bulgoczaca br"
     + "eja z ekstrementow. Odor jej jest wyjatkowo paskudny. Od oparow zaczy"
     + "na Ci sie krecic w glowie i zbiera sie na wymioty.\n");
    

}

void reset_imperium_room()
{
  ::reset_imperium_room;
  if (!paj1)
  {
    paj1 = clone_object(NULN+"/npc/szczur.c");
    paj1 -> move (this_object());
  }
  if (!paj2)
  {
    paj2 = clone_object(NULN+"/npc/szczur.c");
    paj2 -> move (this_object());
  }
}

void init()
{
  ::init();
}
