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

object paj;
object szc;

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

string opiskanalu()
{
    string s = "Stoisz w waskim kanale, prowadzacym "+lmov((["wschod":"dalej na wschod",
    "zachod":"dalej na zachod"]),"ze wschodu na zachod")
    +". Obok chodnika, ktorym idziesz, plyna "+lmov((["wschod":"w tym samym kierunku", "zachod":"w przeciwnym kierunku"]),"na wschod")
    +" hektolitry potwornie smierdzacych, obrzydliwych nieczystosci. Czujesz unoszacy sie"
    +" z nich potworny, nieziemski wprost smrod, w tym miejscu silniejszy niz gdziekolwiek."
    +" Po chwili zauwazasz, co jest powodem takiego straszliwego fetoru: w sciekach unosi"
    +" sie gnijaca ludzka glowa..."
    +" Slyszysz "+ lmov((["wschod":"coraz glosniejszy", "zachod":"cichnacy powoli"]),"ze wschodu cichy")
    +" szum.\n";
    return s;
}

void create_imperium_room()
{
  ::create_imperium_room();
  set_short ("Prosty kanal");
  set_long ("@@opiskanalu");
  if (!szc)
  {
    szc = clone_object (NULN + "/npc/szczur.c");
    szc -> move (this_object());
  }
  if (!paj)
  {
    paj = clone_object (NULN + "/npc/szczur.c");
    paj -> move (this_object());
  }
  
  add_item (({"glowe"}),"Widzisz gnijaca, lecz niewatpliwie niegdys zywa, glowe"
  +" kobiety. Jej nadgnile, wybaluszone galki oczne wpatruja sie w sufit z wyrazem"
  +" niemego przerazenia. Jej usta otwarte sa w jakby ciaglym, martwym krzyku. Ze"
  +" stanu rozkladu wnioskujesz, iz lezy w tych sciekach juz kilka dni."
  +" Wolisz sie nie zastanawiac, gdzie znajduje sie reszta ciala...\n");
  add_cmd_item (({"glowe"}),({"wez","zabierz","podnies"}),"FUJ! Brzydzisz sie"
  +" nawet spojrzec na ten zgnily czerep, o wzieciu tego paskudztwa"
  +" wolisz nawet nie myslec!\n");

  add_exit (ELEPATH+"/kan_6.c","wschod",0,1,0);
  add_exit (ELEPATH+"/kan_8.c","zachod",0,1,0);
}

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