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

object paj;

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

int sluch (string s)
{
   write ("Slyszysz glownie szum sciekow, ktore spadajac z brzegu rynny rozchlapuja"
   +" sie kilka metrow nizej. Dzwiek ten jest naprawde nieprzyjemny; zbiera Ci sie na"
   +" wymioty.\n");
   say (QCNAME(this_player())+" nastawia uszu, probujac z szumu sciekow wylowic jakis"
   +" bardziej znajomy dzwiek.\n");
   return 1;
}

string opiskanalu()
{
    string s = "Stoisz na krawedzi chodnika kanalowego. Niecaly metr dalej"
    +" chodnik urywa sie i, razem z rynna ze sciekami, schodzi bardzo stromo"
    +" w dol. Scieki przyplywajace z zachodu dotarlszy do brzegu rynny na pol splywaja, na pol spadaja"
    +" niemalze pionowa w tym miejscu rynna, wydajac"
    +" przy tym sliski, obrzydliwy dzwiek plynacego szlamu.\n"
    +"Obok pionowej rynny zauwazasz zamocowane w kamiennej scianie grube"
    +" klamry, po ktorych mogl"+plpl("","a")+"bys zejsc na dol.\n";
    return s;
}

void create_imperium_room()
{
  ::create_imperium_room();
  set_short ("Krawedz chodnika");
  set_long ("@@opiskanalu");
  
  add_exit (ELEPATH+"/kan_5d.c","dol",0,1,0);
  add_exit (ELEPATH+"/kan_4.c","zachod",0,1,0);
    
  add_item (({"drabinke","klamry"}),"Widzisz kilkanascie klamr wbitych w sciane"
  +" niecaly metr od Twoich stop. Nie wygladaja na kruche - sa wykonane z grubych, wygietych"
  +" pretow - nie powinno wiec byc problemu z zejsciem na dol, oraz, oczywiscie, powrotem.\n");
 reset_imperium_room();
}

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