/* Neutralny opis pogodowo/porodniowo/pororokowy 
 * by Elvaron
 * slight zmiany by Silvy
 * Pustkowia Chaosu - Arvena
 */

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

/* Ta funkcja sklada nam dlugi opis pokoju z 3 kawalkow
 * opisu przed + zmiennego opisu + opisu za
 */
string opis_pogody()
{
    string opis = "";

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

    if (pora_roku() == "zima")
    {
        opis += "Wszystko wokol pokryte jest teraz cienka warstwa szronu,";

    /* opis por dnia podczas zimy */
        switch(pora_dnia())
        {
            case "swit": opis += " skrzacego sie lekko w chlodnej poswiacie"+
                                 " wstajacego dnia."; break;
                    
            case "wczesny ranek": opis += " polyskujacego w bladym swietle"+
                                          " wschodzacego slonca."; break;

            case "ranek": opis += " odbijajacego ponure promienie porannego"+
                                  " slonca."; break;
	            
            case "poludnie": opis += " mieniacego sie lekko w smetnym blasku "+
                                 "wysoko stojacego slonca."; break;
                    
            case "popoludnie": opis += " polyskujacego w nielicznych promieniach"+
                                       " ogromnego slonca, ktore wolnym tempem"+
                                       " zbliza sie ku zachodowi."; break;
                    
            case "wieczor": opis += " po ktorym smetnie snuja sie dlugie cienie, " +
                    "rozswietlane gdzieniegdzie krwawym blaskiem " +
                    "zachodzacego slonca."; break;
                    
            case "pozny wieczor": opis += " rozjasnionego lekko gasnaca na " +
                    "zachodzie luna."; break;
                    
            case "noc": opis += " ktory lekko polyskuje w zimnej poswiacie"+
                                " bladego ksiezyca.";
        }
    }
    else
 /* ================== */
 /* Glowny opis wiosny */
 /* ================== */
    if (pora_roku() == "wiosna")
    {
        if (pora_dnia() != "noc") 
            opis += "Nieznaczny wzrost temperetury wskazuje na to, iz "+
            "zima powoli odchodzi.";

/* opis wiosny zalezny od pory dnia */
	switch (pora_dnia())
	{
            case "swit": opis += "Otacza cie gruba warstwa porannej mgly, "+
                                 "przez ktora udalo sie przebic kilku cienkim "+
                                 "promieniom budzacego sie slonca."; break;
	        
            case "wczesny ranek": opis += "Przez cienka warstwe chlodnej mgly, "+
                                          "przebija sie wiele promieni wstajacego "+
                                          "slonca."; break;
	        
            case "ranek": opis += "Jest juz zupelnie jasno. Resztki mgly znikaja "+
                                  "powoli, w promieniach porannego slonca."; break;

            case "poludnie": opis += "Wieje chlodny wiatr, wiec jest dosyc zimno, "+
                                     "szczegolnie tam, gdzie nie docieraja promienie "+
                                     "wysoko swiecacego slonca."; break;
	        
            case "popoludnie": opis += "Wiele czarnych chmur sklebilo sie na niebie " +
                                       "i cala okolica zostala spowita cieniem. Jedynym "+
                                       "swiatlem sa tylko nieliczne, przebijajace sie przez "+
                                       "chmury promienie chylacego sie ku zachodowi "+
                                       "slonca."; break;
	         
            case "wieczor": opis += "Jest juz ciemno. Na niebie jest wiele czarnych chmur, " +
                                    "a czerwone promienie odchodzacego dnia spowijaja"+
                                    " wszystko w swym krwawym blasku."; break;
	        
	    case "pozny wieczor": opis += " Na zachodzie powoli gasnie " +
	        "luna odchodzacego dnia."; break;
	        
	    case "noc": opis += "Panuje wlasnie dosyc chlodna wiosenna noc. " +
	        "Robi sie powoli coraz zimniej, nad ranem moze wystapic " +
	        "nawet przymrozek.";
	}
    }
    else

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

    if (pora_roku() == "lato")
    {
        switch(pora_dnia())
        {
            case "swit": opis += "Poprzez chlodne nocne powietrze powoli "+
                "przebijaja sie pierwsze promienie wschodzacego slonca, "+
                "zwiastujace nadejscie kolejnego goracego i dusznego dnia.";
                 break;
	        
	    case "wczesny ranek": opis += "Na razie nie jest jeszcze " +
	        "zbyt goraco, jednak plomienna tarcza slonca wznoszaca sie " +
                "tuz ponad horyzont z wolna zaczyna rozgrzewac powietrze.";
	        break;
	        
	    case "ranek": opis += "Zaczyna sie robic coraz cieplej. " +
	        "Slonce powoli, lecz nieustannie zmierza w kierunku zenitu, "+
	        "niedlugo upal stanie sie nie do zniesienia."; break;
	        
            case "poludnie": opis += "Palace promienie stojacego w zenicie " +
                "slonca sprawiaja, iz wszystko wokolo zdaje sie lekko " +
                "falowac. Powietrze jest bardzo ciezkie i niemal geste od "+
                "unoszacego sie w nim kurzu."; break;
	         
            case "popoludnie": opis += "Wprawdzie rozpalona tarcza slonca "+
                "minela juz najwyzszy punkt na swej drodze, to jednak ziemia "+
                "jest jeszcze bardzo rozgrzana, a powietrze gorace i "+
                "pelne unoszacego sie kurzu."; break;
	        
            case "wieczor": opis += "Slonce chyli sie juz ku zachodowi, " +
                "zmieniajac z wolna kolor na czerwony. Cienie wydluzaja "+
                "sie, a mrok zaczyna ogarniac otaczajacy cie krajobraz. "+
                "Robi sie coraz chlodniej.";
                break;
	        
            case "pozny wieczor": opis += "Po jeszcze przed chwila palacym "+
                "sloncu zostala juz tylko krwawa luna na zachodzie. " +
                "Zaczynasz odczuwac przenikliwy i nieprzyjemny nocny chlod " +
                "potegowany dodatkowo przez ponury i niegoscinny krajobraz.";
                 break;
	        
            case "noc": opis += "Dokola ciebie panuja nieprzeniknione " +
                "ciemnosci, czasem tylko lekko rozjasniane " +
                "diabolicznym swiatlem ksiezyca przenikajacego przez "+
                "warstwe "+
                "chmur.";
	}
    }
    else
    
/* =================== */
/* Glowny opis jesieni */    
/* =================== */

    if (pora_roku() == "jesien")
    {
        switch(pora_dnia())
        {
            case "swit": opis += "Wraz z nadejsciem switu powoli zaczely " +
                "sie zbierac nad toba ciemne, burzowe chmury. Zdaje sie " +
                "ze niedlugo bedzie padalo."; break;
	        
            case "wczesny ranek": opis += "Ciemna warstwa chmur niemal " +
                "calkowicie przeslonila swiat. W oddali slychac wielkie "+
                "i przerazajace grzmienie, a co jakis czas niebo "+
                "rozjasniaja blyskawice. "+
                "Na twarzy czujesz juz pierwsze krople nadchodzacego "+
                "deszczu."; break;
	        
            case "ranek": opis += "Dokola widzisz oznaki wstajacego dnia. " +
               "Niestety pewnie bedzie on rownie szary i nieprzyjemny co poprzednie.";
                break;
	        
            case "poludnie": opis += "Za sprawa slabego slonca zaczyna robic sie nieco cieplej, "
               + "lecz nie masz watpliwosci, ze wieczorem niebo zachmurzy sie ponownie.";
                break;
	        
            case "popoludnie": opis += "Powoli powietrze zaczyna sie ochladzac. " +
                "Zaczyna wiac wiatr, ktorego " +
                "gwaltowne podmuchy smagaja twoja twarz."; break;
	        
            case "wieczor": opis += "Wraz z nadchodzacym wieczorem impet " +
                "wiatru oslabl nieco, ale za to stal sie on zdecydowanie "+
                "chlodniejszy. Powoli zaczyna zapadac ciemnosc."; break;
	        
	    case "pozny wieczor": opis += "Na niebie stopniowo pojawiaja " +
	        "sie kolejne gwiazdy, ktorych blask co chwile " +
	        "przeslaniany jest przez nisko lecace chmury. " +
	        "Chlodny, porywisty wiatr z polnocy przenika do szpiku " +
	        "kosci wzbudzajac drzenie."; break;
	        
	    case "noc": opis += "Panuje wlasnie noc, rozswietlana miejscami " +
	        "przez gwiazdy, ktorym udaje sie przebic przez rzadkie " +
	        "chmury plynace po niebie. Jest dosyc chlodno, nie do konca " +
	        "z powodu temperatury, lecz raczej zimnego, przejmujacego " +
	        "wiatru z polnocy. Powietrze przesycone jest wilgocia " +
	        "osadzajaca sie na wszystkim w okolicy."; 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
 *
 * Rozszerzylem ja o obsluge typow terenu na Pustkowiach - Tanis
 */

int 
idzie(int *konfiguracja, int *tablica_zmeczen)
{
    int zmeczenie, trudnosc;
    string opis; 
    
    trudnosc = 5;
    
//    return 1;  
//    NA razie !!!!!!!

    if (pora_roku() == "lato")
    {
        switch(pora_dnia())
        {
	    case "swit": trudnosc = 3; break;
	    case "wczesny ranek": trudnosc = 2; break;
	    case "ranek": trudnosc = 8; break;
	    case "poludnie": trudnosc = 15; break;
	    case "popoludnie": trudnosc = 8; break;
	    case "wieczor": trudnosc = 6; break;
	    case "pozny wieczor": trudnosc = 2; break;
	    case "noc": trudnosc = 1; break;
        }
    }
    else
    if (pora_roku() == "jesien")
    {
        switch(pora_dnia())
        {
	    case "swit": trudnosc = 4; break;
	    case "wczesny ranek": trudnosc = 3; break;
            case "ranek": trudnosc = 5; break;
            case "poludnie": trudnosc = 2; break;
	    case "popoludnie": trudnosc = 1; break;
            case "wieczor": trudnosc = 2; break;
	    case "pozny wieczor": trudnosc = 2; break;
	    case "noc": trudnosc = 3; break;
        }
    }
    else
    if (pora_roku() == "zima")
    {
        switch(pora_dnia())
        {
	    case "swit": trudnosc = 5; break;
	    case "wczesny ranek": trudnosc = 4; break;
	    case "ranek": trudnosc = 3; break;
	    case "poludnie": trudnosc = 2; break;
	    case "popoludnie": trudnosc = 3; break;
	    case "wieczor": trudnosc = 4; break;
	    case "pozny wieczor": trudnosc = 5; break;
	    case "noc": trudnosc = 6; break;
        }
    }
    else
    if (pora_roku() == "wiosna")
    {
         switch(pora_dnia())
         {
	    case "swit": trudnosc = 3; break;
	    case "wczesny ranek": trudnosc = 2; break;
	    case "ranek": trudnosc = 2; break;
	    case "poludnie": trudnosc = 1; break;
	    case "popoludnie": trudnosc = 1; break;
	    case "wieczor": trudnosc = 2; break;
	    case "pozny wieczor": trudnosc = 2; break;
	    case "noc": trudnosc = 3; break;
         }
    }

    // To by bylo chyba dwa razy 'zaaplikowane' !! 
    //   this_player()->add_fatigue(-trudnosc);

    return trudnosc;
}

int
czy_dzien_noc()
{
  switch(pora_dnia())
        {
	    case "swit": return 0;
	    case "wczesny ranek": return 0;
	    case "ranek": return 0;
	    case "poludnie": return 0;
	    case "popoludnie": return 0;
	    case "wieczor": return 0;
	    case "pozny wieczor": return 1;
	    case "noc": return 1;
        }

}

string
opis_wycofany(string napis1,string napis2)
{
  if(czy_dzien_noc()==1) return (napis2);
  if(czy_dzien_noc()==0) return (napis1);
  return (" ");
}