inherit "/d/Imperium/Nuln/kanaly/kanal_room";
#include "elear.h"
#include <std.h>
#include <macros.h>
#include <stdproperties.h>

object paj;
object paj2;
object paj3;

reset_imperium_room ()
{
  ::reset_imperium_room();
  if (!paj)
  {
    paj = clone_object (NULN + "/npc/szczur.c");
    paj -> move (this_object());
  }
  if (!paj2)
  {
    paj2 = clone_object (NULN + "/npc/szczur.c");
    paj2 -> move (this_object());
  }
  if (!paj3)
  {
    paj3 = clone_object (NULN + "/npc/szczur.c");
    paj3 -> move (this_object());
  }
}

string opiskanalu()
{
    string s;
    s = "Znajdujesz sie w podluznym segmencie kanalow. Na scianach i na podpartym"
    +" wysokimi, kamiennymi lukami suficie widzisz szlam i brud"
    +" pamietajacy pewnie jeszcze poprzednie stulecie. Tuz kolo Twoich nog"
    +" plynie struga wszelkich miejskich nieczystosci, ktorych smrod"
    +" przyprawia Cie o wymioty.\n";
    return s;
}

void create_imperium_room()
{
  ::create_imperium_room();

  set_short ("Podluzny segment kanalow");
  set_long ("@@opiskanalu");

  add_exit (ELEPATH+"/kan_pod_wieza.c","polnoc",0,1,0);
  add_exit (ELEPATH+"/kan_2.c","poludnie",0,1,0);

  if (!paj)
  {
    paj = clone_object (NULN + "/npc/szczur.c");
    paj -> move (this_object());
  }
  if (!paj2)
  {
    paj2 = clone_object (NULN + "/npc/szczur.c");
    paj2 -> move (this_object());
  }
  if (!paj3)
  {
    paj3 = clone_object (NULN + "/npc/szczur.c");
    paj3 -> move (this_object());
  }
}

void 
init()
{
  ::init();
}