/*
 *  Plik:         l5.c
 *  Autor:        Dushin
 *  Data:         25.08.1998
 *  Last Update:  25.08.1998
 *  Opis:         Korytarz lochow.
 */


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

inherit  "/d/Imperium/lakshmi/Witt/std/lochy_std.c";

object zlapany;


void
create_lochy_room()
{

    add_prop (ROOM_I_LIGHT, 1);
    add_prop (ROOM_I_INSIDE, 1);

    set_short ("Korytary lochow");
    set_long ("Jestes gdzies w lochu. Chodnik wyraznie opada. Coraz "
        + "trudniej sie po nim poruszac, by nie zrobic sobie krzywdy. "
        + "Slyszysz szum szlamu plynacego pod poludniowa sciana. Teraz "
        + "nie miesci sie w rowku. Rozlewa sie duzym strumieniem po "
        + "chodniku, podmywa poludniowa sciane, na ktorej widnieja "
        + "pekniecia. Sprawiaja wrazenie, ze sciana zaraz runie. "
        + "Sklepienie osiaga podwojna wysokosc korytarza. Jest "
        + "jakby kominem, na koncu ktorego widac hak.\n");

    add_exit (NPATH + "lochy/l6.c", "wschod");
    add_exit (NPATH + "lochy/l2.c", "zachod");
    add_exit (NPATH + "lochy/c4.c", "polnoc");
    add_exit (NPATH + "lochy/c5.c", "poludnie");

    add_item ("chodnik","Jest wydrazony w skale. Jego nierowna "
        + "powierzchnia jest niebezpieczna. Latwo wpasc w jakas "
        + "nierownosc i zrobic sobie krzywde.\n");
    add_item (({"szlam","sciek","wode"}),"Plynie przez caly chodnik, tuz "
        + "pod poludniowa sciana. Nie ma okreslonego korytka, wiec "
        + "rozlewa sie na duza czesc chodnika.\n");
    add_item (({"sciane","poludniowa sciane"}),"Jest podmyta przez "
        + "sciek. Prawdopodobnie dlatego widnieja na niej liczne, "
        + "niezbyt grozne pekniecia.\n");
    add_item ("pekniecia","Widnieja na poludniowej scianie. Sa drobne, "
        + "lecz jest ich dosyc duzo. Pierwsze wrazenie, po "
        + "dokladniejszym obejrzeniu pekniec znika. Sciane nadal nic nie "
        + "jest wstanie ruszyc.\n");
    add_item ("sklepienie","Jest tu bardzo wysokie. Na srodku korytarza "
        + "przechodzi w komin, na koncu ktorego umocowany jest hak. "
        + "Zastanawiajace jest dlaczego wlasnie taka jest budowa "
        + "sklepienia.\n");
    add_item ("hak","Wisi na koncu uformowanego przez sklepienie komina. "
        + "Jest wytrzymalej konstrukcji. Zastanawiasz sie do czego sluzyl. "
        + "Jedynie co ci przychodzi do glowy jest to, ze wieszali na nim "
        + "wiezniow. Musial to byc okrutny zwyczaj, tym bardziej, ze "
        + "cialo sie szybko tu rozklada "
        + "i przebywanie w lochu stawalo sie nie do zniesienia.\n");

    add_item ("nierownosci","@@oglada");

    add_cmd_item ("sie wody","napij","@@pije_wode");
    add_cmd_item ("sie scieku","napij","@@pije_sciek");

}

string
pije_wode()
{
    write ("Jezeli chcesz sie to zrobic to musisz sie napic scieku.\n");
    say (QCIMIE(TP, PL_MIA) + " pochyla sie, aby napic sie scieku, ale rezygnuje. "
		+ "Dobrze, bo moglby od niego zachorowac.\n");
    return "";
}

string
pije_sciek()
{
    write ("Nie mozesz tego uczynic w tym miejscu. Poszukaj zrodla, z ktorego "
        + "moglbys sie napic bez uszerbku dla zdrowia.\n");
    say (QCIMIE(TP, PL_MIA) + " pochyla sie, aby napic sie scieku, ale rezygnuje. "
		+ "Dobrze, bo moglby od niego zachorowac.\n");
    return "";
}

string
oglada()
{
    say (QCIMIE(TP, PL_MIA) + " uwaznie przyglada sie chodnikowi. Czegos "
        + "szuka, albo boi sie o swoje zdrowie. Nierownosci moga byc "
        + "niebezpieczne.\n");
    return "Starasz sie obejrzec dokladnie nierownosci chodnika. Widzisz "
        + "kilka potencjalnych pulapek, lecz nie sadzisz, by mogly ci "
        + "zrobic krzywde.\n";
}