/* 
 * Plik:        droga.c
 * Autor:       Kylo
 * Data:        14.11.97
 * Last Update: 22.11.97
 * Opis:        Droga do zajazdu		
 */

// Dziedziczenie standartowego pokuju w Imperium
inherit "/d/Imperium/przyklady/stdroom.c";

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

// Brama zajazdu
object drzwi_n;

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

string
ustaw_dlugi_opis() 
{
    string opis="";
    opis+="Znalazles sie na brukowanej drodze laczacej trakt Nuln-Kraina " +
	"Zgromadzenia z zajazdem, w ktorym zmeczeni droga podroznicy " +
	"moga dobrze zjesc, wypic i odpoczac przed wyruszeniem w dalsza " +
	"droge. " + opis_pory_roku() +
	" ";
return opis;
} 
// koniec funkcji ustaw_dlugi_opis()
    
/*
 * Nazwa funkcji: create_imperium_room()
 * Opis:	  Inicjalizacja glownej funkcji pomieszczenia
 *		  W Imperium jest to create_imperium_room() 
 *		  nie zas create_room().
 * Argumenty:	  brak
 * Zwraca:	  nic nie zwraca
 */
 	
void
create_imperium_room()
{
    // Ustalenie natezenia swiatla w tym pomieszczeniu - 0 ciemnosc.       
    // ( domyslnie 1 )
    add_prop(ROOM_I_LIGHT, 1);

    // Ustalenie czy pokoj jest 'na zewnatrz' - 1 pomieszczenie.    
    // ( domyslnie 0 )
    add_prop(ROOM_I_INSIDE, 0);

    // Ustalenie 'krotkiego opisu' pomieszczenia,"
    // Na koncu _NIE_MA_KROPKI_. 
    set_short("Droga do zajazdu");

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

    // Dodanie wyjsc z pomieszczenia
    add_exit(LOKACJE_PATH + "dziedziniec.c","polnoc");
    add_exit(KRAINA + "KZ-NULN/droga41.c","poludnie");
    
    // Ustawienie opisow przedmiotow 'widzianych' 
    // przez gracza w danym pomieszczeniu.
    add_item(({"bruk","droge"}),
	"Brukowana droga jest utrzymana w dobrym stanie, nie brakuje ani " +
	"jednej kostki. " +
        "\n");
    add_item("zajazd",
	"Na razie widzisz tylko otaczajacy go mur i brame wjazdowa. " +
	"\n");
    add_item("szyld",
	"Dostrzegasz tam malunek przedstawiajacy pieknego czarnego rumaka. " +
	"Ponizej jest jakis napis, moze powinienes go przeczytac. " +
	"\n");	
	
    // Pozwalenie graczowi wykonac komendy 
    add_cmd_item(({"szyld","napis"}),({"czytaj","przeczytaj"}),"@@szyld");

    // 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("Obok ciebie przejechal konno jakis czlowiek. " +
	"\n"); 
    add_event("Grupa trzech krasnolodow minela cie i udala sie do zajazdu " +
	"\n");
    
    // Wlaczenie eventow.
    set_events_on(1);
    
    reset_imperium_room();
    
}
// koniec funkcji create_imperium_room()

/*
 * Nazwa funkcji: szyld()
 * Opis:	  Ustala napis na szyldzie
 *		  Opisuje jego zachowanie gracza dla innych
 * Argumenty:	  brak
 * Zwraca:	  napis na szyldzie
 */

string
szyld()
{
    // Jak to widza inni 
    say(QCIMIE(this_player(), PL_MIA) + " czyta napis na szyldzie. \n");
    // A oto zwracany opis
    return
    "\t ============== \n" +
    "\t | Czarny Kon | \n" +
    "\t ============== \n";
}
// koniec funkcji szyld()


/*
 * Nazwa funkcji: reset_imperium_room()
 * Opis:	  
 * Argumenty:	  brak
 * Zwraca:	  nic nie zwraca
 */

void
reset_imperium_room()
{
    if(!drzwi_n)
    {
        drzwi_n=clone_object(DRZWI_PATH + "dziedziniec_droga.d.2.c");
        drzwi_n->move(TO);
    }
}