/*
 *    Plik includowany przez fryzjera i fryzurke, zawierajacy opisy i liste fryzur.
 *
 *  UWAGA : Skopanie owocuje skopaniem wszysciutkich fryzur graczy na calym mudzie ( po ponownym zalogowaniu ) :)
 *
 *     by Tanis - maj 1998
 */

/* 
 * UWAGA : Element 0 kazdej z ponizszych tablic powinien byc w miare neutralny,
 *         bo jest on wyswietlany w razie jakiejs awarii ( fryzury maja parametry
 *         ustawione na 0)
 */

string *wszystkie_kolory_wlosow=({"bezbarwne",
		"kruczoczarne",
		"czarne",
		"ciemnobrazowe",
		"brazowe",
		"jasnobrazowe",
		"zlocistobrazowe",
		"kasztanowe",
		"orzechowe",
		"ciemnoszare",
		"szare",
		"jasnoszare",
		"ciemnoniebieskie",
		"niebieskie",
		"jasnoniebieskie",
		"ciemnozielone",
		"zielone",
		"jasnozielone",
		"wisniowe",
		"ciemnoczerwone",
		"purpurowe",
		"czerwone",
		"ognistoczerwone",
		"jasnoczerwone",
		"karmazynowe",
		"rude",
		"ognistorude",
		"pomaranczowe",
		"blond",
		"srebrzyste",
		"srebrne",
		"zlociste",
		"zlote",
		"ogniste",
		"biale",
		"snieznobiale"});

string *wszystkie_dlugosci_wlosow=({"sredniej dlugosci",
                "bardzo krotkie",
		"krotkie",
		"sredniej dlugosci",
		"dlugie",
		"bardzo dlugie",
		"siegajace szyi",
		"siegajace ramion",
		"siegajace pasa"});






mixed *wszystkie_typy_wlosow=({ ({"0","nieuczesane wlosy"}),
                ({"1","wlosy na jeza"}),
                "luzno rozpuszczone wlosy",
                "wlosy elegancko uczesane",
                "wlosy upiete w ciasny kok",
                "wlosy upiete w kok z pasmami wokol twarzy",
                "wlosy upiete w wysoki kok",
                "wlosy upiete w luzny kok",
                "wlosy zaplecione w warkocze",
                "wlosy zaplecione w warkocz",
                "wlosy w ksztalcie korony z warkoczy",
                "wlosy upiete w konski ogon",
                "wlosy upiete w kitke",
                "wlosy upiete w dwie kitki",
                "wlosy luzno zwiazane z tylu",
                "wlosy zaczesane do tylu",
                "wlosy zaczesane na boki",
                "wlosy zaczesane na lewa strone",
                "wlosy zaczesane na prawa strone",
                "wlosy zaczesane naokolo glowy",
                "wlosy z grzywka opadajaca na oczy",
                "gladkie wlosy z loczkami",
                "calkowicie proste wlosy",
                "lekko falujace wlosy",
                "wlosy skrecone w ciasne loki",
                "wlosy spiete spinka",
                "wlosy spiete klamerkami",
                "odgarniete na bok wlosy",
                "wlosy ulozone w fale",
                "falujace wlosy zczesane do tylu",
                "proste, wywiniete na zewnatrz wlosy",
               
                "czesciowo wyrwane wlosy",
                "pokryte zastarzala krwia przeciwnikow wlosy",
                "lsniaco czyste wlosy",
                "brudne, zaniedbane wlosy",
                "wlosy przeplecione kwieciem i ziolami",
                "wlosy postawione na sztorc wokol glowy",
                "wlosy postawione na sztorc na czubku glowy",
                "wlosy w strakach po jednej stronie twarzy",
                "wlosy z wplecionymi piorami ptakow",
                "wlosy niechlujnie przyciete",
                "blyszczace wlosy",
                "aksamitnie matowe wlosy",
                "miekkie i puszyste wlosy",
                "mocno przerzedzone wlosy",
                "szpakowate wlosy",
                "przypruszone siwizna wlosy",
                "gladko przylizane wlosy"});



                

string *wszystkie_opisy_typow=({"wlosy sa nieuczesane",
                "wlosy sa ostrzyzone na jeza",
                "wlosy sa zaplecione w konski ogon",
                "wlosy sa upiete w kok",
                "wlosy sa zaplecione w warkocz",
                "wlosy sa zaplecione w warkoczyki",
                "sa luzno rozpuszczone",
                "wlosy sa elegancko uczesane"});












mixed *sprzeczne_pary=({ ({6,1}), ({7,1}), ({8,1}), ({5,1}), ({4,1}), ({8,3}), ({7,3}), ({6,3}), ({5,3}) });




string
opis_fryzury(int dlugosc, int kolor, int typ)
{
  return(wszystkie_dlugosci_wlosow[dlugosc]+", "+wszystkie_kolory_wlosow[kolor]+" "+wszystkie_opisy_typow[typ]);
}

int
znajdz_dlugosc(string jaka_dlugosc)
{
  int a;
  for(a=1;a<sizeof(wszystkie_dlugosci_wlosow);a++) // Celowo nie zprawdzamy 0 elementu tablicy, gdzy jest to tylko element "alarmowy"
     {
       if(jaka_dlugosc==wszystkie_dlugosci_wlosow[a])
         {
           return a;
         }
     }
  return 0;
}

int
znajdz_kolor(string jaki_kolor)
{
  int a;
  for(a=1;a<sizeof(wszystkie_kolory_wlosow);a++) // Celowo nie zprawdzamy 0 elementu tablicy, gdzy jest to tylko element "alarmowy"
     {
       if(jaki_kolor==wszystkie_kolory_wlosow[a])
         {
           return a;
         }
     }
  return 0;
}

int
znajdz_typ(string jaki_typ)
{
  int a;
  for(a=1;a<sizeof(wszystkie_typy_wlosow);a++) // Celowo nie zprawdzamy 0 elementu tablicy, gdzy jest to tylko element "alarmowy"
     {
       if(jaki_typ==wszystkie_typy_wlosow[a][0] || jaki_typ==wszystkie_typy_wlosow[a][1])
         {
           return a;
         }
     }
  return 0;
}

string
zwroc_dlugosc(int numer)
{
  return wszystkie_dlugosci_wlosow[numer];
}

string
zwroc_kolor(int numer)
{
  return wszystkie_kolory_wlosow[numer];
}

string
zwroc_typ(int numer)
{
  return wszystkie_typy_wlosow[numer][1];
}

int
zwroc_ilosc_dlugosci()
{
  return sizeof(wszystkie_dlugosci_wlosow);
}

int
zwroc_ilosc_kolorow()
{
  return sizeof(wszystkie_kolory_wlosow);
}

int
zwroc_ilosc_typow()
{
  return sizeof(wszystkie_typy_wlosow);
}

/*
 * Funkcja sprawdza poprawnosc fryzury. Sprzeczne pary typ - dlugosc sa w tablicy 
 *           mixed *sprzeczne_pary
 * Nie powinno przeciez byc fryzurek typu : "Siegajace do pasa, brazowe wlosy ostrzyzone na jeza."
 *
 */

int
sprawdz_poprawnosc(int jaka_dlug, int jaki_typ) 
{
  int a;

  for(a=0;a<sizeof(sprzeczne_pary);a++)
     {
        if(sprzeczne_pary[a][0]==jaka_dlug && sprzeczne_pary[a][1]==jaki_typ) return 0;
     }
  return 1;
}

string
zwroc_dlugosci_wlosow()
{
  string napis="";
  int a;

  napis="\n   Dlugosci wlosow : \n";

  for(a=1;a<sizeof(wszystkie_dlugosci_wlosow);a++)
     {
	if(a!=1)
          {
            napis=napis+", ";
            napis=napis+wszystkie_dlugosci_wlosow[a];
          }
        else napis=napis+capitalize(wszystkie_dlugosci_wlosow[a]);
     }

   napis=napis+".\n";

  return napis;
}

string
zwroc_kolory_wlosow()
{
  string napis="";
  int a;

  napis="\n   Kolory wlosow : \n";

  for(a=1;a<sizeof(wszystkie_kolory_wlosow);a++)
     {
	if(a!=1)
          {
            napis=napis+", ";
            napis=napis+wszystkie_kolory_wlosow[a];
          }
        else napis=napis+capitalize(wszystkie_kolory_wlosow[a]);
     }

   napis=napis+".\n";

  return napis;
}

string
zwroc_typy_wlosow()
{
  string napis="";
  int a;

  napis="\n   Typy fryzur : \n";

  for(a=1;a<sizeof(wszystkie_typy_wlosow);a++)
     {
        napis = napis + wszystkie_typy_wlosow[a][0] +". "+ capitalize(wszystkie_typy_wlosow[a][1])+"\n";
     }

  return napis;
}