/*
 *  Plik:         c6.c
 *  Autor:        Aleksy
 *  Data:         16.08.1998
 *  Last Update:  16.08.1998
 *  Opis:         Cela wiezienna.
 */
   
inherit "/d/Imperium/lakshmi/Witt/std/lochy_std.c";

#include "zamek.h"
#include "/d/Imperium/sys/alarm.h"

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 samym sriodku widzisz duza metalowa klatke. "
    + "Pewnie to byla cela dla najbardziej niebezpiecznych "
    + "zloczyncow. Na drzwiach klatki wisi ogromny zamek. "
    + "Jest tu bardzo brudno i czujesz okropny smrod "
    + "dochodzacy od rozpadajacych sie cial szczurow. "
    + "Czasami zauwazasz jak jakis szczur przemyka "
    + "kolo ciebie, ocierajac sie o twoje nogi. Jest to takie "
    + "nieprzyjemne uczucie, ze wolisz jak najszybciej stad uciec. "
    + "Na podlodze oproc smieci i kosci leza kawalki cial szczurow. "
    + "Pewnie walka o jedzenie jest w lochach jedynym sposobem "
    + "przetrwania. Patrzysz na to wszystko i masz nadzieje "
    + "ze nigdy tu nie wrocisz. Bo chyba nie chcesz zostac zjedzonym "
    + "przez szczury, czyje oczy patrza na ciebie z ciemnych "
    + "zakatkow tej celi z wyrazna checia rozerwania cie na "
    + "drobne kawalki, takie, jakie leza przed toba.\n");


add_exit (NPATH + "l6.c", "poludnie");

add_item (({"sciane", "sciany"}), "Sa to brudne i smierdzace sciany. "
    + "Chyba tylko pajaki moga na nich zyc. "
    + "Na jednej ze scian wlasnie zauwazasz dosyc duza pajeczyne.\n");
add_item ("pajeczyne",
      "Jest to dosyc duzych rozmiarow pajeczyna. W srodku jej cos sie "
    + "rusza. Ale nie chesz sprawdzac co to.\n"); 
add_item ("klatke", "Widzisz przed soba rdzawa metalowe klatke. "
    + "Tez jest cala pokryta rdza, jak i wszystkie metalowe czesci "
    + "znajdujace sie w tych celach. Jednak nawet na pierwszy rzut "
    + "oka widac ze jest ona bardzo mocna. I pomyslec tylko, "
    + "co za zwierze mogli trzymac tu. Na drzwiach tej klatki "
    + "wisi ogromny zamek. On jest taki duzy, ze odrazu rzuca "
    + "sie w oczy przy pierwszym zerknieciu na klatke.\n");
add_item ("zamek", "Jest to ogromny zamek. Chyba po raz pierwszy "
    + "widzisz tak duzy zamek.\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.\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 pozostalosci od kogos. "
    + "Nawet sie nie zastanawiaj od kogo, tylko uciekaj stad jak "
    + "najszybciej.\n");  

add_cmd_item ("zamek", ({"wyrwij", "zniszcz"}), "@@zamek");
add_cmd_item ("powietrze", "powachaj", "@@powietrze");

set_event_time (10.0, 200.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
zamek()
{
    write ("Probujesz wyrwac zamek z tej klaki. Ale ci sie nie "
        + "udaje. Z przykroscia musisz stwierdzic ze jestes na to "
        + "zaslaby. Ten zamek jest naprawde taki mocny, ze nawet "
        + "chyba i 10 takich jak ty nie dadza rade wyrwac go. "
        + "Wiec daj sobie spokoj lepiej.\n");
    say (QCIMIE(TP, PL_MIA) + " probuje wyrwac zamek z klatki. "
        + "Alez idiota. Co on robi? Mysli ze jest az taki silny? "
        + "Nie uda mu sie to nigdy. Chyba i ty nie chesz probowac.\n");
    return "";
}

string
powietrze()
{
    write ("Watchasz 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");
}