/*
 *  Plik:         c8.c
 *  Autor:        Aleksy
 *  Data:         16.08.1998
 *  Last Update:  17.08.1998
 *  Opis:         Cela wiezienna.
 */
   
#include "zamek.h"
#include "/d/Imperium/sys/alarm.h"

inherit STD +"lochy_std.c";

void
create_lochy_room()
{

add_prop (ROOM_I_LIGHT, 1);
add_prop (ROOM_I_INSIDE, 1);

set_short ("Cela wiezienna");
set_long ("Znajdujesz sie w niewielkim pokoju. Jest tu dosyc "
    + "ciemno. Wokol widzisz tylko smierdzace sciany. "
    + "Na jednej z nich zauwazasz ogromnych rozmiarow "
    + "pajeczyne. Ona jakby zyje swoim zyciem. "
    + "widzisz ze jest tak ogromna, ze czesc jej znajduje sie "
    + "gdzies w korytarzu tych lochow. "
    + "Jest tu bardzo brudno i czujesz okropny smrod "
    + "dochodzacy od rozpadajacych sie cial szczurow. "
    + "Na podlodze oproc smieci i kosci leza kawalki cial szczurow. "
    + "Pewnie walka o jedzenie jest w lochach jedynym sposobem "
    + "przetrwania. Miedzy nimi zauwazasz rowniez ciala"
    + "pajakow. Ale jest ich mniej niz cial szczurow.\n");

add_exit (NPATH + "lochy/l7.c", "poludnie");

add_item (({"sciane", "sciany"}),
      "Sa to brudne i smierdzace sciany. Na jednej "
    + "ze scian zauwazasz ogromnych rozmiarow pajeczyne, "
    + "ktora jakby zyje swoim zyciem. Lepiej trzymaj sie "
    + "jak najdalej od niej.\n");
add_item ("pajeczyne",
      "Ogromnych rozmiarow pajeczyna. Odrazu przyciaga twoj "
    + "wzrok przy wchodzeniu do tej celi. Jest taka brudna, "
    + "ze wszystkie twoje proby zajrzenia do jej wnetrza "
    + "koncza sie niepowodzeniem. Widzisz jak cos sie porusza "
    + "w jej wnetrzu. Sadzac z jej rozmiaru musi tam siedziec "
    + "naprawde duzy pajak. I pewnie zjada jakiegos szczura. "
    + "Nie chcesz wygladac ja te kawalki cial, wiec stajesz "
    + "jak najdalej od tej pajeczyny. Tylko z takiej odleglosci "
    + "dopiero mozesz ocenic caly jej ogrom. Widzisz ze jej "
    + "czesc konczy sie gdzies w zakatkach korytarza.\n");
add_item (({"brud", "smieci"}), 
      "Szczatki, kosci i ciala. Tylko nie wiesz czyje "
    + "to wszystko. Patrzysz na siebie. Uff, chyba nie twoje.\n"); 
add_item (({"cialo", "ciala"}),
      "Sa to ciala szczurow, no moze tylko "
    + "troche wieksze niz ciala zwyklych szczurow. Wsrod "
    + "cial szczurow zauwaszasz rowniez jakies szare kamienia. "
    + "Po dokladnym obejrzeniu stwierdzasz jednak, ze to nie sa "
    + "kamienia, lecz dosyc duzych rozmiarow ciala pajakow.\n");
add_item (({"kosci", "kosc"}),
      "Zwykle kosci jakich pelno w lochach. Zauwazasz "
    + "tylko dosc spora liczbe duzych kosci, pewnie sa ludzkie. "
    + "A moze i jakiejs innej rasy. Nie jestes pewny co do tego.\n");
add_item (({"szczatki", "kawalki"}),
      "Widzisz przed soba czyjes pozostalosci. "
    + "Nawet sie nie zastanawiaj od kogo, tylko uciekaj stad jak "
    + "najszybciej.\n");  

add_cmd_item ("powietrze", "powachaj", "@@powietrze");

set_event_time (10.0, 100.0);
add_event ("Slyszysz jak cos sie poruszylo w ciemnym zakatku celi. "
    + "Moze to duch wieznia? A moze szczur? Lepiej idz stad jak "
    + "najszybciej a nie namyslaj sie nad tym, co by to mozglo byc.\n");
add_event ("Czujesz, jakby ktos stal za toba. Szybko sie odwracasz "
    + "i ... Uffff, to chyba tylko zludzenie. Czujesz sie poprostu "
    + "potwornie.\n");
add_event ("Chyba juz zaczynasz wariowac. Wydaje ci sie ze slyszysz "
    + "jakis szepot. Tylko nic nie mozesz zrozumiec. Juz czujesz sie "
    + "zle od tych widokow i smrodu.\n");
set_events_on(1);
}

string
powietrze()
{
    write ("Wachasz powietrze ... Bleeeee, co za smierdzacy zapach. "
        + "Czujesz sie jeszcze gorzej. Zaslaniasz nos i rot reka, "
        + "bo juz nie wytrzymujesz. Zaczynasz czuc zawroty glowy. "
        + "I czyj to byl glupi pomysl by tu przyjsc? Teraz myslisz "
        + "tylko o jednym, zeby jak najszybciej stad wyjsc!\n");
    say (QCIMIE(TP, PL_MIA) + " nagle krzywi sie, "
        + "wyglada jak by zjadz trucizne. Zaslania twarz reka i "
        + "nerwowo zaczyna jakby szukac czegos. Po krotkim "
        + "namysleniu rozumiesz ze szuka wyjscie stad. Tez czujesz "
        + "sie niedobrze. Lepiej juz tez poszukaj wyjscie stad.\n");
}
