/*
 * Mieso zwierzat z Lasu Loren
 * 
 * by Tanis
 */


inherit "/std/food";

#include <stdproperties.h>
#include <macros.h>

int wartosc;

 
konfiguruj(string *nazwy, mixed *pnazwy, mixed *adj, int weight, int volume,
          int value, string long, int rodzaj)
{
    int i;

    if (pointerp(pnazwy))
     ustaw_nazwe(nazwy,pnazwy,rodzaj);
    else
     ustaw_nazwe(nazwy,rodzaj);
    
    if (adj)
    {
        i = sizeof(adj[0]);
        
        while(i-- > 0)
            dodaj_przym(adj[0][i], adj[1][i]);    
    }    
    
    set_long(long);
    add_prop(OBJ_I_WEIGHT,weight);
    add_prop(OBJ_I_VOLUME,volume);
//    set_skora_value(value);
}

void
create_mieso()
{
    string rasa;
    
    if (previous_object() && pointerp(previous_object()->query_prop(CORPSE_M_RACE)))
      rasa=previous_object()->query_prop(CORPSE_M_RACE)[0];
    
    if (!rasa)
     return;
    switch (rasa)
    {
        case "niedzwiedz":
          konfiguruj ( ({"skora","skory","skorze","skore","skora","skorze"}),
          ({"skory","skor","skorom","skory","skorami","skorach"}),
          ({ ({"niedzwiedzi"}),({"niedzwiedzi"}) }),
          12000,10000,400,"Jest to gruba, wlochata i ciepla skora z niedzwiedzia"+
          " . Ma brunatny kolor i jest miekka w dotyku.\n",
          PL_ZENSKI );
        case "niedzwiadek":   
          konfiguruj ( ({"skora","skory","skorze","skore","skora","skorze"}),
          ({"skory","skor","skorom","skory","skorami","skorach"}),
          ({ ({"miekki","niedzwiedzi"}),({"mieccy","niedzwiedzi"}) }),
          573,530,300,"Widzisz miekka, brazowa skore. Zostala ona zdjeta z "+
          "mlodego niedzwiadka.\n",
          PL_ZENSKI );
        break;
        case "wilk":   
        case "wilczyca":
          konfiguruj ( ({"skora","skory","skorze","skore","skora","skorze"}),
          ({"skory","skor","skorom","skory","skorami","skorach"}),
          ({ ({"wilczy"}),({"wilczy"}) }),
          2220,1020,40,"Jest to skora wilka. Szarobrunatna siersc jest w wielu miejscach przetarta.\n",
          PL_ZENSKI );
        break;
        case "sarna":   
          konfiguruj ( ({"skora","skory","skorze","skore","skora","skorze"}),
          ({"skory","skor","skorom","skory","skorami","skorach"}),
          ({ ({"brazowy","delikatny"}),({"brazowi","delikatni"}) }),
          1000,1000,150,"Jest to cienka, delikatna skora z mlodej sarenki.\n",
          PL_ZENSKI );
        break;
        case "jelen":   
          konfiguruj ( ({"skora","skory","skorze","skore","skora","skorze"}),
          ({"skory","skor","skorom","skory","skorami","skorach"}),
          ({ ({"brazowy","delikatny"}),({"brazowi","delikatni"}) }),
          3000,3000,700,"Cienka, lecz lsniaca i wytrzymala skora dorodnego jelenia.\n",
          PL_ZENSKI );
        break;
        case "lis":   
          konfiguruj ( ({"skora","skory","skorze","skore","skora","skorze"}),
          ({"skory","skor","skorom","skory","skorami","skorach"}),
          ({ ({"brazowy","delikatny"}),({"brazowi","delikatni"}) }),
          1000,1000,500,"Jest to przepiekne, rude i lsniace lisie futro.\n",
          PL_ZENSKI );
        break;
        case "dzik":   
          konfiguruj ( ({"skora","skory","skorze","skore","skora","skorze"}),
          ({"skory","skor","skorom","skory","skorami","skorach"}),
          ({ ({"brazowy","delikatny"}),({"brazowi","delikatni"}) }),
          3000,3000,120,"Gruba, ciezka skora jakiegos dzika.\n",
          PL_ZENSKI );
        break;
        case "kot":   
          konfiguruj ( ({"skora","skory","skorze","skore","skora","skorze"}),
          ({"skory","skor","skorom","skory","skorami","skorach"}),
          ({ ({"pregowany","gladki"}),({"pregowani","gladcy"}) }),
          1000,1000,200,"Gladka, pregowana skora jakiegos duzego, dzikiego kota.\n",
          PL_ZENSKI );
        break;
        case "zajac":   
          konfiguruj ( ({"skora","skory","skorze","skore","skora","skorze"}),
          ({"skory","skor","skorom","skory","skorami","skorach"}),
          ({ ({"brazowy","delikatny"}),({"brazowi","delikatni"}) }),
          200,200,30,"Skora jest szara i choc nieduza, jest dosyc ciepla. Nalezala do jakiegos zajaca.\n",
          PL_ZENSKI );
        break;
        case "kon":   
          konfiguruj ( ({"skora","skory","skorze","skore","skora","skorze"}),
          ({"skory","skor","skorom","skory","skorami","skorach"}),
          ({ ({"mocny","aksamitny"}),({"mocni","aksamitni"}) }),
          2500,2500,200,"Aksamitna, wytrzymala skora jakiegos konia.\n",
          PL_ZENSKI );
        break;
        case "wiewiorka":   
          konfiguruj ( ({"skora","skory","skorze","skore","skora","skorze"}),
          ({"skory","skor","skorom","skory","skorami","skorach"}),
          ({ ({"rudy","puszysty"}),({"rudzi","puszysci"}) }),
          70,70,10,"Mala, puszysta skorka jakiejs biednej wiewiorki.\n",
          PL_ZENSKI );
        break;
        case "borsuk":   
          konfiguruj ( ({"skora","skory","skorze","skore","skora","skorze"}),
          ({"skory","skor","skorom","skory","skorami","skorach"}),
          ({ ({"rudy","puszysty"}),({"rudzi","puszysci"}) }),
          1000,1000,150,"Niezbyt duzy plat bialoszarej, borsuczej skory.\n",
          PL_ZENSKI );
        break;
        case "zubr":   
          konfiguruj ( ({"skora","skory","skorze","skore","skora","skorze"}),
          ({"skory","skor","skorom","skory","skorami","skorach"}),
          ({ ({"rudy","puszysty"}),({"rudzi","puszysci"}) }),
          20000,15000,1000,"Mala, puszysta skorka jakiejs biednej wiewiorki.\n",
          PL_ZENSKI );
        break;
        case "jednorozec":   
          konfiguruj ( ({"skora","skory","skorze","skore","skora","skorze"}),
          ({"skory","skor","skorom","skory","skorami","skorach"}),
          ({ ({"snieznobialy","aksamitny"}),({"snieznobiali","akasmitni"}) }),
          2500,2500,1500,"Delikatna, snieznobiala skora jednorozca.\n",
          PL_ZENSKI );
        break;
        default:
          konfiguruj ( ({"skora","skory","skorze","skore","skora","skorze"}),
          ({"skory","skor","skorom","skory","skorami","skorach"}),
          ({ ({"gruby"}),({"grubi"}) }),
          1420,800,60,"Jest to gruba skora jakiegos zwierzecia.\n",
          PL_ZENSKI );
    }
}

public void
leftover_init(string *lp,string *lmn,int rodzaj,string *rasa,int rodzaj_r)
{
    create_mieso();
}