/* Plik: loch_s.c
 * Autor: Kaes
 * Data: 4.11.97
 * Last update: 4.11.97
 * Opis poludniowy korytarz
*/

inherit "/d/Imperium/Nuln/std/room.c";
#include "kaes.h"
#include "/sys/stdproperties.h"
object npckarzel;

create_imperium_room()
{
 add_prop(ROOM_I_LIGHT,1);
 add_prop(ROOM_I_INSIDE,1);
 set_short("Poludniowy korytarz");
 set_long("@@dlugi_opis");
 add_exit(PATH+"loch_1.c","polnoc");
 add_item(({"swiece","swieczki"}),"Swieczki palace sie pod scianami. Niektore "+
  "wygladaja na zapalone niedawno, niektore juz dogasaja.\n");
 add_item(({"sciany","sciane","wilgotna sciane","wilgotne sciany","gladkie sciany",
 "gladka sciane"}), "Sciana jest bardzo wilgotna i gladka w dotyku. Poza tym "+
 "nie widzisz nic ciekawego.\n");
 add_item("korytarz", "Widzisz korytarz zakonczony sciana. Jedyne wyjscie "+
   "znaduje sie za toba.\n");
 add_item(({"krople wody","wode","krople"}),
   "Krople wody sacza sie powoli po scianach, odrywaja sie od sufitu ladujac "+
   "w blocie.\n");
 add_item("sufit"," Poza kroplami wody zwisajacymi z sufitu nie widzisz nic "+
   "ciekawego.\n");
 add_item("slady", "W blocie widzisz odcisniete slady stop. Wlasciciel musi "+
   "byc raczej poteznej postury.\n");
 add_item("bloto", "Fuj, stoisz po kostki w blocie.\n");
 add_cmd_item(({"swiece","swieczki","swieczke"}),({"zdmuchnij","zgas"}),"@@swiece");
 set_event_time(10.0,100.0);
 add_event("Nagly podmuch wiatru gasi jedna swieczke.\n");
 add_event("Slyszysz ciezkie kroki gdzies w korytarzu.\n");
 add_event("Kap, kap...\n");
 add_event("Cos przebiega ci pod nogami.\n");
 set_events_on(1);
 reset_imperium_room();
}
string swiece()
{ write("Nie widzisz takiej potrzeby, swiatlo moze ci sie jeszcze przydac.\n"); 
 return"";
}
string dlugi_opis()
{
 return("W swietle swieczek widzisz zakonczony sciana korytarz. Ziemia "+
  "jest blotnista, co chwile slyszysz kapanie kropli wody spadajacych z "+
  "sufitu. Sciany sa wilgotne, lekko zamszone i gladkie w dotyku. Przed "+
  "soba widzisz odcisniete w blocie slady, zostawione prawdopodobnie dosc "+
  "niedawno.\n");
}
reset_imperium_room()
{
 if(!npckarzel)
  {
   npckarzel=clone_object(PATH+"karzel.c");
   npckarzel->szykuj();
   npckarzel->move(this_object());
  }
}