// Nathaniel 

inherit "/d/Imperium/std/room";

/* Ta funkcja sklada nam dlugi opis pokoju z 3 kawalkow
 * opisu przed + zmiennego opisu + opisu za
 */

string opis_pory_roku()
{
    string opis = "";

/* ================================ */
/* Ogolny opis zimowego krajobrazu  */
/* ================================ */

    if (pora_roku() == "zima")
    {
        opis += "Wszystko wokol ciebie pokrywa warstwa sniegu, spod ktorej czasami przeswituja "+
			"kawalki ziemii i kamieni.";

    /* opis por dnia podczas zimy */
        switch(pora_dnia())
        {
            case "swit": opis += " Platki sniegu powoli traca swoj szary kolor podswietlone " +
                    "pierwszymi promieniami slonca. Gasie sie latarnie, ktore noca dawaly zbawcze swiatlo."; break;
                    
            case "wczesny ranek": opis += " Slonce powoli wznosi sie znad horyzontu " +
                    "przybarwiajac snieg na lekko rozowy kolor."; break;

			case "ranek": opis += " Snieg skrzy sie w promieniach " +
	            "porannego slonca."; break;
	            
            case "poludnie": opis += " Promienie slonca odbijaja sie w sniegu " +
                    "razac twe oczy."; break;
                    
            case "popoludnie": opis += " Slonce powoli zachodzi, a nisko padajace promienie " +
                    "odbijaja sie od sniegu, przydajac mu przepieknej swietlistej bieli."; break;
                    
            case "wieczor": opis += " Zachodzace slonce rzuca dlugie cienie przetykane gdzieniegdzie " +
                    "jasnymi plamami. Zapala sie teraz latarnie."; break;
                    
            case "pozny wieczor": opis += " Gasnaca tarcza slonca rzuca ostatnie promienie. Latarnie "+
									  "rozjasniaja zblizajaca sie noc. "; break;
                    
            case "noc": opis += " Na niebie panuje jasna, gwiazdzista zimowa noc. Latarnie rozjasniaja "+
							"panujaca w miescie noc"; break;

            case "polnoc": opis += " Na niebie panuje jasna, gwiazdzista zimowa noc. Latarnie rozjasniaja panujaca "+
							   "w miescie noc."; break;

        }
    }
    else
 /* ================== */
 /* Glowny opis wiosny */
 /* ================== */
    if (pora_roku() == "wiosna")
    {
        if (pora_dnia() != "noc") 
            opis += "Zycie budzi po ziomowym snie i wszedzie da sie " +
                "odczuc wiosenn radosc.";

/* opis wiosny zalezny od pory dnia */
	switch (pora_dnia())
	{
	    case "swit": opis += " Za choryzontem pojawia sie powoli tarcza slonca."; break;
	        
	    case "wczesny ranek": opis += " Naokolo zauwazasz slady rosy, ktora przepieknie skrzy sie " +
	        "w pierwszych promieniach wschodzacego slonca."; break;
	        
	    case "ranek": opis += " Slonce jest juz widoczne w calej swej krasie."; break;

	    case "poludnie": opis += " Promienie poludniowego slonca przyjemnie grzeja, "+
							 "szczegolnie ze wzgledu na chlodny wechirek, "; break;
	        
	    case "popoludnie": opis += " Mimo, iz slonce chyli sie powoli ku zachodowi "+
							   "zycie wrze bez przerwy."; break;
	         
	    case "wieczor": opis += " Promienie ginacej za zachodzie tarczy slonca rzucaja "+
							"dlugie cienie";break;
	        
	    case "pozny wieczor": opis += "Ostatnie promienie slonca wlasnie nikna, zapala sie pierwsze latarnie. "; break;
	        
	    case "noc": opis += "Wiosenna radosc zanikla wraz z noca, ktora rozjasniaja latarnie."; break;

	    case "polnoc": opis += " Srodek nocy. Miasto zdaje sie byc wymarlym, a smetne swiatlo latarni "+
								"rozjasnie wszechobecna ciemnosc.";
		}
    
	}
	
    else

/* ================ */
/* Glowny opis lata */
/* ================ */

    if (pora_roku() == "lato")
    {
        switch(pora_dnia())
        {
	    case "swit": opis += "Na wschodzie widac pierwsze promienie wschodzacego slonca. "+
						 "Panuje przyjemny chlod wywolany zimnym wiaterkiem. Slychac pianie koguta "; break;
	        
	    case "wczesny ranek": opis += "Letnie slonce widac juz w pelnej krasie " +
	        "ale jeszcze jest chlodny, gdyz upalny dzien dopiero sie zaczal.";
	        break;
	        
	    case "ranek": opis += "Jasne promienie slonca staja sie powoli ciezkie do zniesienia. " +
	        "Kazdy wiaterek przyjmujesz z radoscia i ulga."; break;
	        
	    case "poludnie": opis += "Slonca w zenicie. Upal stal sie nie do wytrzymania. "+
							 "Gorace powietrze faluje przed toba zamazujac dalszy obraz. "+
							 "Wszystko z upragnieniem oczekuje chlodnego wiaterka."; break;
	         
	    case "popoludnie": opis += "Wszechobecny upal panuje. "+
							   "Slonce zeszlo z zenitu, ale nadal mocno grzeje sprawiajac, ze "+
							   "obfity pot wystepuje ci na czolo."; break;
	        
	    case "wieczor": opis += "Najsilniejsze upaly juz minely, a slonce gotuje sie do zejscia. "+
							"Przyjemny chlodny wiaterek wieje znad rzeki sprawiajac, ze z latwoscia "+
							"zapominasz o niedawnym skwarze."; break;
	        
	    case "pozny wieczor": opis += "Slonce w znacznej mierze juz zniknelo za horyzontem. Wszystko "+
								  "wokolo z ulga przyjmuje wieczorny chlod i nadchodzaca noc. "; break;
	        
	    case "noc": opis += "Wokol panuje noc rozswietlona przez latarnia. Cale miasto zdaje sie "+
						"odpoczywac glebokim snem po goracym dniu i zbierac sily nakolejny, nadchodzacy."; break;
	        
	    case "polnoc": opis += "Wokol panuje noc rozswietlona przez latarnia. Cale miasto zdaje sie "+
						"odpoczywac glebokim snem po goracym dniu i zbierac sily nakolejny, nadchodzacy."; break;
	}
    }
    else
    
/* =================== */
/* Glowny opis jesieni */    
/* =================== */

    if (pora_roku() == "jesien")
    {
        switch(pora_dnia())
        {
	    case "swit": opis += "Noc przemija zastepowana przez szarzyzne "+
						 "budzacego sie na wschodzie slonca. Ostatnie palace "+
						 "sie jeszcze latarnie za wygaszane."; break;
	        
	    case "wczesny ranek": opis += "Poranna mgla podnosi sie powoli ukazujac "+
								  "obraz smetnego jesiennego miasta. Slonce zakrywaja "+
								  "co chwile chmury gnane jesiennymi wiatrami."; break;
	        
	    case "ranek": opis += "Slonce rzuca dlugie cienie, przerywane co chwila "+
						  "plynacymi szybko po niebie chmurami. Pojedyncze liscie "+
						  "spadaja spokojnie z nieba powolnymi ruchami."; break;
	        
	    case "poludnie": opis += "Mimo, iz slonce stoi w zenicie, panuje chlod. "+
							 "Nagle porywy wiatru unasza z ziemii suche liscie i gnaja je "+
							 "ulicami. Drobne kropelki deszczu spadajace z nieba wiastuja "+
							 "zblizajace sie opady.";  break;
	        
	    case "popoludnie": opis += "Jesienny deszcz powoli ustaje, a gnane szybkim "+
							   "wiatrem chmury ukazuja slonce gotujace sie do zajscia. "+
							   "Suche, podnignile liscie plywaja w kaluzach wypelniajacych "+
							   "kazde zaglebienie."; break;
	        
	    case "wieczor": opis += "Ciemnorozowa tarcza slonca chowa sie leniwie "+
							"za horyzontem. W kaluzach odbijaja sie ostatnie promienie swiatla "+
							"przepieknie sie rozczepiajac."; break;
	        
	    case "pozny wieczor": opis += "Slonce juz ostatecznie zagaslo, a na niebie "+
								  "pojawil sie przepiekny ksiezyc schowany czesciowo "+
								  "za wielkimi chmurami deszczowymi. Gwiazdy przepieknie "+
								  "odbijaja sie we wszechobecnych jesiennych kaluzach"; break;
	        
	    case "noc": opis += "Panuje ciemna noc, ktora z trudem rozswietlaja gwiazdy "+
						"i ksiezyc chowajace sie co chwile za chmurami. Swiatlo "+
						"latarni leniwie odbija sie w kaluzach, w ktorych plywaja "+
						"zeschniete i gnijace liscie. W powietrzu unosi sie wilgoc "+
						"zraszajac wszystko wokol."; break;
	        
	    case "polnoc": opis += "Panuje ciemna noc, ktora z trudem rozswietlaja gwiazdy "+
						"i ksiezyc chowajace sie co chwile za chmurami. Swiatlo "+
						"latarni leniwie odbija sie w kaluzach, w ktorych plywaja "+
						"zeschniete i gnijace liscie. W powietrzu unosi sie wilgoc "+
						"zraszajac wszystko wokol."; break;
	}
    }

return opis;
}

/* Tutaj jest mala ale czasami przydatna funkcja pozwalajaca zmienic
 * zmeczenie gracza w zaleznosci od pory dnia np gdy jest na tyle
 * nierozsadny ze stara sie gdzies dotrzec w najwiekszy upal
 * Odwolanie do tej funkcji nalezy dodac w add_exit
 */

int 
go()
{
    int zmeczenie, trudnosc;
    string opis; 
    
    trudnosc = 5;
    
    if (pora_roku() == "lato")
    {
        switch(pora_dnia())
        {
	    case "swit": trudnosc = 7; break;
	    case "wczesny ranek": trudnosc = 5; break;
	    case "ranek": trudnosc = 7; break;
	    case "poludnie": trudnosc = 20; break;
	    case "popoludnie": trudnosc = 12; break;
	    case "wieczor": trudnosc = 8; break;
	    case "pozny wieczor": trudnosc = 7; break;
	    case "noc": trudnosc = 6; break;
        }
    }
    else
    if (pora_roku() == "jesien")
    {
        switch(pora_dnia())
        {
	    case "swit": trudnosc = 7; break;
	    case "wczesny ranek": trudnosc = 7; break;
	    case "ranek": trudnosc = 6; break;
	    case "poludnie": trudnosc = 5; break;
	    case "popoludnie": trudnosc = 5; break;
	    case "wieczor": trudnosc = 8; break;
	    case "pozny wieczor": trudnosc = 6; break;
	    case "noc": trudnosc = 8; break;
        }
    }
    else
    if (pora_roku() == "zima")
    {
        switch(pora_dnia())
        {
	    case "swit": trudnosc = 18; break;
	    case "wczesny ranek": trudnosc = 15; break;
	    case "ranek": trudnosc = 10; break;
	    case "poludnie": trudnosc = 8; break;
	    case "popoludnie": trudnosc = 12; break;
	    case "wieczor": trudnosc = 15; break;
	    case "pozny wieczor": trudnosc = 10; break;
	    case "noc": trudnosc = 20; break;
        }
    }
    else
    if (pora_roku() == "wiosna")
    {
         switch(pora_dnia())
         {
	    case "swit": trudnosc = 8; break;
	    case "wczesny ranek": trudnosc = 7; break;
	    case "ranek": trudnosc = 6; break;
	    case "poludnie": trudnosc = 5; break;
	    case "popoludnie": trudnosc = 5; break;
	    case "wieczor": trudnosc = 7; break;
	    case "pozny wieczor": trudnosc = 6; break;
	    case "noc": trudnosc = 10; break;
         }
    }

    this_player()->add_fatigue(-trudnosc);

    return trudnosc;
}