/*
 * wilk by Kaes
*/

inherit "/d/Imperium/std/zwierze.c";
#include "kaes.h"

void
create_zwierze()
{
    ustaw_odmiane_rasy(({"wilk","wilka","wilkowi","wilka",
          "wilkiem","wilku"}),({"wilki","wilkow","wilkom",
          "wilki","wilkami","wilkach"}),PL_MESKI_NOS_ZYW);

    add_prop(LIVE_I_NEVERKNOWN, 1);

    set_gender(G_MALE);

    dodaj_przym("wyglodnialy","wyglodniali");
    dodaj_przym("szary","szarzy");
    
    set_long(" Szary, wyglodnialy i wychudzony wilk. Atakuje przewaznie "+
       "w nocy, razem ze swoja wataha. Potrafi szybko biegac, zwinnie "+
       "przemykajac sie pomiedzy skalami. Ma bardzo dobry wzrok, wech "+
       "oraz sluch, co czyni go groznym przeciwnikiem i dobrym mysliwym.\n");
        
    set_stats(({25,55,15,1,1,20}));
    add_prop(NPC_I_NO_FEAR, 1);
    
    set_act_time(5);
    add_act("emote wyje przeciagle.");
    add_act("emote siada na ziemi.");
    add_act("emote rozglada sie za swoim stadem.");
    add_prop(CONT_I_WEIGHT,35000);
    add_prop(CONT_I_HEIGHT,100);
        
    set_attack_unarmed(1, 12, 19,W_IMPALE, 40,"klami");
    
    set_hitloc_unarmed(1, ({4,4,5}), 30,"pysk");
    set_hitloc_unarmed(2, ({3,3,4}), 20,"lape");
    set_hitloc_unarmed(8, ({3,4,4}), 50,"tulow");

    set_aggressive(1);
   
    set_restrain_path(PATH);

    add_leftover(NPATH+"skora.c",({"skora","skory","skorze","skore","skora","skorze"}),
               ({"skory","skor","skorom","skory","skorami","skorach"}),
               PL_ZENSKI,1,0,1,1);

}

void
attack_object(object ob)
{
    set_follow(ob,0.5);
    ::attack_object(ob);
}

void
attacked_by(object ob)
{
    set_follow(ob,0.5);
    ::attacked_by(ob);
}