/*
 *  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 ("Jestes w ponurym lochu. Stoisz na nierownym, opadajacym w dol chodniku. "
        + "Jest czesciowo zalany przez sciek, ktory rozlewa sie pod poludniowa sciana "
        + "i bardzo cuchnie. Jego szybki nurt niesie z soba wiele zanieczyszczen. "
	+ "Sciany, zbudowane z kamiennych blokow, wygladaja na nie do zdobycia, jakby "
	+ "czas obszedl sie z nimi ladognie, jedynie drzwi prowadzace do cel, sa "
	+ "zniszczone.\nSklepienie jest wysokie. Sa w nim otwory, "
        + "ale bardziej wygladaja na dzielo natury.\n");

    add_exit (NPATH + "lochy/l7.c", "wschod");
    add_exit (NPATH + "lochy/l5.c", "zachod");
    add_exit (NPATH + "lochy/c6.c", "polnoc");
    add_exit (NPATH + "lochy/c7.c", "poludnie");

    add_item ("kamienne bloki","Odgradzaja cele od korytarza. Sa ogromne. "
	+ "Ich masywny wyglad budzi respekt przed proba przebicia sie przez "
	+ "nie.\n");
    add_item ("sciany","Zbudowane sa z kamiennych blokow. Sa dosyc gladkie "
	+ "i proste, a przy tym solidnej budowy. Wygladaja porzadnie, ale "
	+ "gdyby byla taka potrzeba podzielilyby los drzwi.\n");
    add_item ("drzwi","Sa bardzo zniszczone. Musial ktos je wywazyc, bo "
	+ "uszkodzil je doszczetnie. Nie nadaja sie juz do zamykania cel.\n");
    add_item ("cele","Stad nie mozesz obejrzec cel. Dzwi do nich stoja "
	+ "otworem.\n");
    add_item ("sklepienie","Jest to zwyczajne sklepienie, jakie mozna spotkac "
	+ "w lochu. Widoczne sa w nim otwory. Czesc z nich jest pokaznych "
	+ "rozmiarow.\n");
    add_item ("otwory","Sa w sklepieniu. Dochodza z ciche piski. Kilka jest "
	+ "dosc duzych, mogacych pomiescic jakies latajace zwierze.\n");
    add_item (({"duze otwory","duze otwory w sklepieniu"}),"Sa ciemne. Nie "
	+ "widac co kryja w sobie. Mozna w nich wyczuc poruszenie. Nalepiej "
	+ "jest uwazac na wlasciciela.\n");


    set_event_time (100.0, 250.0);
    add_event ("Slyszysz w oddali trzepotanie skrzydel. Jest ich wiele. Czego "
        + "tu chca, dlaczego nie daja spokoju?\n");
    add_event ("Slyszysz w oddali odglosy walki.\nNie, to sa krzyki zaatakowanych "
        + "przez te stwory. Umrzec rozszarpanym - to musi byc staszna smierc.\n");
    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 "";
}

