/* 
 * Plik:        balowa5.c
 * Autor:       Kylo
 * Data:        01.02.99
 * Last Update: 01.02.99
 * Opis:        sala balowa w jakims palacu czy cos takiego
 */

// Dolaczenie pliku naglowkowego 
#include "ogolne.h"

// Dziedziczenie standartowego "pomieszczenia" w Imperium
inherit "/d/Imperium/std/room.c";


/*
 * Nazwa funkcji: ustaw_dlugi_opis()
 * Opis:	  Ustawi dlugi opis (VBFC)       
 * Argumenty:	  brak
 * Zwraca:	  dlugi opis balkonu
 */

void
dodaj_elfy()
{
   int lsluzby,lgwar;
   int a;
   
   
   lsluzby=random(8)-5;
   lgwar=random(8)-5;
   
   for(a=0;a<lsluzby;a++)
   {
       dodaj_npca(PATH + "npc/sluzacy.c");
   }
   for(a=0;a<lgwar;a++)
   {
      dodaj_npca(PATH + "npc/gwar.c");
   }
}

string
ustaw_dlugi_opis() 
{
    string opis="";
    opis+="We wschodniej czesci sali balowej znajduja sie ogromne okna, " + 
	"drugie po otworach w suficie naturalne zrodlo swiatla tutaj. " +
	"W wiekszosci " +
	"z nich zamontowane sa kolorowe witraze, gdy pada na nie " +
	"slonce, cale to miejsce wypelnia sie bajecznymi smugami swiatla." +
	"Te kilka wykonanych ze zwyklego szkla pozwala podziwiac o swicie " +
	"wspaniale wschody slonca. Pozostala czesc sali wciaz zadziwia cie " +
	"swoim ogromem, jednoczesna wesoloscia, radoscia, ale i " +
	"dostojenstwem." +
	"\n";
return opis;
} 
// koniec funkcji ustaw_dlugi_opis()
    
/*
 * Nazwa funkcji: create_inperium_room()
 * Opis:	  Inicjalizacja glownej funkcji pomieszczenia
 *		  w Imperium to create_imperium_room().
 * Argumenty:	  brak
 * Zwraca:	  nic nie zwraca
 */
 	
void
create_imperium_room()
{
    // Ustalenie 'krotkiego opisu' pomieszczenia,"
    // Na koncu _NIE_MA_KROPKI_. 
    set_short("Sala balowa");

    // Ustawienie dlugiego opisu
    set_long("@@ustaw_dlugi_opis");

    // Dodanie wyjsc z pomieszczenia
    add_exit(PALPATH + "balowa2.c","polnocny-zachod");
    add_exit(PALPATH + "balowa3.c","zachod");
    add_exit(PALPATH + "balowa4.c","poludniowy-zachod");
    
    // Ustawienie opisow przedmiotow 'widzianych' 
    // przez gracza w danym pomieszczeniu.
    add_item(({"okna","okno"}),
	"Sa waskie ale siegaja prawie samej kopuly, kolejny dowod kunsztu " +
	"tych co stworzyli to miejsce." +
	"\n");
    add_item(({"otwor","otwory"}),
	"To dziwne ze mimo nich sklepienie pozostaje cale. Niewatpliwie " +
	"osiagniecie tego efektu kosztowalo wiele pracy." +
	"\n"); 
    add_item(({"sufit"}),
	"Ogroma kopula, nie wsparta jednak na zadnych kolumnach. Do tego " +
	"jeszcze tworca poprzecinal ja licznymi otworami na swiatlo. " +
	"Sprawia wrazenie niesamowicie delikatnej, a przetrwala przeciez " +
	"wieki." +
	"\n");	
    // Zainicjowanie tzw. events, czyli losowych komunikatow pojawiajacych
    // sie w danym pomieszczeniu. ( pierwszy pojawi sie po 10 sekundach,
    // nastepne co 100 sekund )
    
//    set_event_time(20.0, 300.0); 
    // Lista eventow. 
       
//    add_event("" +
//	"\n");
    // Wlaczenie eventow.
//    set_events_on(1);

    // Pomieszczenie we wnatrz
    add_prop(ROOM_I_INSIDE, 1);
	
	dodaj_elfy();
	
}
// koniec funkcji create_imperium_room()