/*  
 * Imperium projekt: lesne zwierzatka, niedzwiedz. 
 * Napisal Pshoddy, styczen '98	    
 */

inherit "/d/Imperium/std/zwierze.c";

#include "zwierz.h"


create_zwierze()
{
    int i,j;
    
    set_long("Ten niedzwiedz to ogromna masa tluszczu i miesni porosnieta "+
    "gestym, brunatnym futrem. Olbrzymie rozmiary sprawiaja, ze czujesz sie "+
    "przy nim bardzo niepewnie.\n");            
        
    ustaw_odmiane_rasy(({"niedzwiedz", "niedzwiedzia", "niedzwiedziowi",
        "niedzwiedzia", "niedzwiedziem", "niedzwiedziu"}), ({"niedzwiedzie", 
        "niedzwiedzi", "niedzwiedziom", "niedzwiedzie", "niedzwiedziami",
        "niedzwiedziach"}), PL_MESKI_NOS_ZYW);

    i=(random(LICZBA_PRZYM_NIEDZIA)*2); j=(random(LICZBA_PRZYM_NIEDZIA)*2);
    while (i==j) j=(random(LICZBA_PRZYM_NIEDZIA)*2);
    
    dodaj_przym(NIEDZ_PRZYM[i], NIEDZ_PRZYM[i+1]);
    dodaj_przym(NIEDZ_PRZYM[j], NIEDZ_PRZYM[j+1]);
    
    set_gender(G_MALE);

    set_stats(({110,35,100,1,1,100}));
    		
    set_skill(SS_AWARENESS, 30);    		
  
    set_act_time(15+random(10));
    add_act("emote pomrukuje cicho.");
    add_act("emote staje na tylnych lapach i weszy.");
    add_act("emote drapie pazurami swoj bok.");
    
    set_attack_unarmed(A_PYSK, 12, 25, W_IMPALE, 20, "klami");
    set_attack_unarmed(A_LEWA_LAPA, 7, 13, W_SLASH, 40, "lewa lapa");    
    set_attack_unarmed(A_PRAWA_LAPA, 7, 13, W_SLASH, 40, "prawa lapa");     

    set_hitloc_unarmed(H_GLOWA, ({8, 8, 7}), 20, "glowe");
    set_hitloc_unarmed(H_CIALO, ({12, 13, 12}), 40, "cialo");
    set_hitloc_unarmed(H_PRAWA_LAPA, ({10, 9, 10}), 20, "prawa lape");
    set_hitloc_unarmed(H_LEWA_LAPA, ({10, 9, 11}), 20, "lewa lape");

    set_aggressive(1);
    set_random_move(20);
    set_restrain_path(DIR);

    add_prop(LIVE_I_NEVERKNOWN, 1);
    add_prop(CONT_I_HEIGHT, 75);
    add_prop(CONT_I_WEIGHT, 155000+random(10000));
    add_prop(CONT_I_VOLUME, 55000+random(10000));

    add_leftover(DIR+"skora.c",({"skora","skory","skorze","skore","skora","skorze"}),
               ({"skory","skor","skorom","skory","skorami","skorach"}),
               PL_ZENSKI,1,0,1,1);
setuid();
seteuid(getuid());
    clone_object("/d/Imperium/Szare/Ogry/obj/korbacz")->move(this_object());
}