/*
 *  Plik:         l.c
 *  Autor:        Dushin
 *  Data:         16.08.1998
 *  Last Update:  18.08.1998
 *  Opis:         Prototyp.
 */

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

#include "/d/Imperium/lakshmi/Witt/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 ("Korytarz lochow");
    set_long ("Stoisz po kolana w podziemnym scieku. Ta czesc lochu jest "
        + "calkowicie zalana. Nie jestes w stanie dostrzec dna. Nie masz "
        + "mozliwosci patrzenia pod nogi. Po obu stronach korytarza sa "
        + "sciany wykute w skale. Wygladaja, jakby ktos wydlubal chodnik i "
        + "nie interesowala go jakosc wykonania.\n");

    add_exit (NPATH + "lochy/l12.c", "poludniowy-wschod");
    add_exit (NPATH + "lochy/l9.c", "zachod");

    add_item ("sciek","Stoisz w nim po kolana. Jest to cuchnaca, okropna "
	+ "ciecz niezdatna do picia. Choc moglo to byc jedyne zrodlo dla "
	+ "spragnionych wiezniow.\n");
    add_item ("wode","To w czym stoisz, na pewno nie przypomina wody. Jest "
	+ "to zwyczajny sciek. Nie stoj tu zbyt dlugo, bo sie czyms zarazisz.\n");
    add_item ("sciany","Sa okropnie wykonane. Mozna przypuszczac, ze wykonujacy "
	+ "prace przy budowie lochu nie byli typowymi rzemieslnikami. Moze "
	+ "nawet byli to skazancy, ktorzy resztkami sil kuli korytarze.\n");
    add_item ("sciane","Nie ma sensu przygladac sie scianie. Jest wykonana okropnie "
	+ "i nie ma co w niej szukac.\n");
    add_item ("chodnik","Nie mozesz dostrzec czegos, co jest zalane okropnym "
	+ "sciekiem. A szkoda, bo nie widac niespodzianek jakie niesie nierowna "
	+ "powierzchnia chodnika.\n");

    set_event_time (50.0, 150.0);
    add_event ("Slyszysz plusk. Odwracasz sie, ale nic nie widzisz. Zaczynasz "
	+ "sie bac. \n");
    add_event ("Widzisz jakis cien pod powierzchnia. Zniknal i znowu sie pojawil. "
	+ "Sytuacja wydaje sie grozna, wyczuwasz niebezpieczenstwo.\n");
    add_event ();
    add_event ();
    add_event ();
    set_events_on(1);

    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 "";
}