/* 
 * Plik:         workroom.c
 * Autor:        Aleksy
 * Data:         14.08.1998
 * Last Update:  16.08.1998
 * Opis:         Pokoj poczatkujacego zarodzieja.
 */
 
 
inherit "/d/Imperium/std/room.c";

#include <macros.h>
#include <stdproperties.h>
#include <pl.h>
 
void
create_imperium_room()
{
    add_prop(ROOM_I_INSIDE, 1);
    set_short("Sala wejsciowa Malej Wiezy Drebigrohn");
    set_long("Znajdujesz sie w niewielkiej sali wejsciowej. "
        + "Nie przypomina ona raczej "
        + "sal smiertelnikow. Nie ma ani lamp ani pochodni. "
        + "Kula fruwajaca pod samym sufitem odrazu zwraca na "
        + "siebie twoja uwage.\nPrzez " 
        + "sciany i sufit przenika jasno-niebieskie swiatlo. Czujesz "
        + "jak to swiatlo napawa cie nieziemska energia. Ale jedno jest "
        + "pewne: w tej sali czujesz sie bezpiecznie! Rozgladajac sie "
        + "zauwazasz "
        + "kilka niezwykle interesujacych malowidel na scianach. "
        + "Troche dalej "
        + "widzisz prowadzace na gore piekne marmurowe schody. "
        + "Tam na gorze, wsrod chmur i blasku slonca znajduja sie "
        + "gorne pietra Malej Wiezy Drebigrohn.\n");
    add_item(({"sciany", "sciane"}),
          "Sciany przedstawiaja niezrozumiale dla ciebie "
        + "ale bardzo piekne tance Lesnych Elfow. Oproc tego "
        + "zauwazasz, ze sciany promienieja nieziemskim jasno-niebieskim "
        + "swiatlem.\n");
    add_item("sufit",
          "Zauwazasz, ze sufit promienieje nieziemskim jasno-niebieskim "
        + "swiatlem.\n");
    add_item(({"malowidlo", "malowidla"}),
          "Malowidla te przedstawiaja niezrozumiale dla ciebie "
        + "ale bardzo piekne tance Lesnych Elfow.\n");
    add_item("schody", "Sa to przepiekne marwumowe schody. "
        + "Moze wydawac sie to dziwne, ale schody promienieja "
        + "jasno-czerwnym swiatlem. Czujesz ze cos ogrzewa te sale. "
        + "Moze wlasnie jasno-czerwone swiatlo powoduje takie uczucie. "
        + "Sprobuj dotknac schody, to sie dowiesz napewno.\n");
    add_item("kule", "Z wielkim zaciekawieniem ogladasz te kule. "
        + "Takiej jeszcze chyba nikt nie widzial. "
        + "Jest to dosyc duza srebrna kula. Fruwa sobie spokojnie w "
        + "powietrzu, czasami przemieszczajac sie nieznaznie pod sufitem. "
        + "Wpatrujesz sie w kule, by zrozumiec w jaki sposob ona tak "
        + "sobie fruwa, ale nic nie zauwazasz. Pewnie magia tej "
        + "wiezy jest naprawde wielka.\n");
     
    add_exit("/d/Arkadia/wiz/wizroom", "spotkania", 0, 0);
    add_exit("/d/Imperium/workroom", "Imperium", 0, 0);   
	add_exit("/d/Imperium/aleksy/Poligon/pol1.c", "poligon", 0, 0);

    add_cmd_item("schody", "dotknij", "@@schody");

    set_event_time(50.0, 1000.0);
    add_event("Na krotka chwile cala sale ogarnia srebne swiatlo. "
        + "Za moment swiatlo znika tak samo nagle jak sie i zjawilo. "
        + "Tylko i "
        + "bylo widac, ze swiatlo to wychodzilo ze srebrnej kuli.\n");
    set_events_on(1);
} 

string
schody()
{
    write("Podchodzisz blizej do schodow. Nachylasz sie i ostroznie dotykasz "
        + "je. Na momet dziwne jasno-czerwone swiatlo staje sie "
        + "mocniejsze, ogarniajac cala sale. Fala ciepla przechodzi przez "
        + "twoje cialo.\nJuz za chwile wszystko wraca do normalnosci. "
        + "Ale to uczucie ciepla nadal zyje gdzies w tobie. Czujesz sie "
        + "o wiele lepiej. Usmiechasz sie wesolo i odchodzisz od schodow.\n");
   /* say(QCIMIE(this_player(), PL_MIA) + " podchodzi blizej do schodow "
        + "i ostroznie dotyka je. Na moment dziwne jasno-czerwone swiatlo "
        + "staje sie moniejsze, ogarniajac cala sale. Fala ciepla przechodzi "
        + "przez twoje cialo. Juz za chwile wszystko wraca do normalnosci. "
        + QCIMIE(this_player(), PL_MIA) + " usmiecha sie wesolo i "
        + "odchodzi od schodow.\n");*/
    return "";
}