inherit "/d/Imperium/Nuln/kanaly/kanal_room.c";
#include <std.h>
#include <macros.h>
#include "elear.h"
#include <stdproperties.h>
object paj = allocate(12);
string opiskanalu()
{
    string s = "Z otworu "
    + "w sklepieniu splywa po scianach uliczny szlam. Chyba na gorze pada de"
    + "szcz? Ta mizerna wentylacja pozwala Ci odetchnac po duchocie kanalow."
    + " Raz po raz slyszysz glosy przechodnow i turkot karoc poruszajacych si"
    + "e po ulicy. Chlod kanalow, ich smrod i odglosy przebiegajacych stworz"
    + "en, szybko sciagaja cie na, a wlasciwie, pod, ziemie. Wilgotne sciany"
    + " tunelu pokryte tu sa plaskorzezbami.\n";
    return s;
}
void create_imperium_room()
{
  ::create_imperium_room();
  set_short ("Podluzny odcinek kanalu");
  set_long ("@@opiskanalu");
  add_exit (ELEPATH+"/kan17.c","polnocny-wschod",0,1,0);
  add_exit (ELEPATH+"/kan19.c","poludniowy-zachod",0,1,0);
  reset_imperium_room();
  add_item(({"sciek","szlam","uliczny szlam"}), 
     "Sciekajaca breja rostacza ochydna won ekstrementow.\n");
      
  add_item(({"tunel","korytarz","sciany"}), 
     "Plaskorzezby przedstawiaja zdobnicze motywy krasnoludzkiej sztuki."
    + "Nudy na pudy: tarcze, mloty, topory, itp.\n");  
   
  add_item(({"otwor","dziura"}), "Spogladasz w gore na otwor...\n" 
    + "Wtem!\n"
    + "Ogromna fala opadajacego szlamu spada wprost na twoja twarz!\n"
    + "tfu...tfu...bluee...SLIMAK!\n");
}
void reset_imperium_room()
{
  int i;
  ::reset_imperium_room;
  for(i=0; i<12; i++)
  if (!paj[i])
  {
    paj[i] = clone_object(NULN+"/npc/szczur.c");
    paj[i] -> move (this_object());
  }
}
void init()
{
  ::init();
}