/*
 * Kozica gorska by Kaes
*/

inherit "/d/Imperium/std/zwierze.c";
#include "kaes.h"

#define PRZYMIOTNIKI ({({"zwinny","zwinni"}),({"szybki","szybcy"}), \
           ({"jasno-brazowy","jasno-brazowi"}),({"duzy","duzi"}), \
           ({"wychudzony","wychudzeni"}),({"plochy","plosi"})})
#define LICZBA_PRZYMIOTNIKOW 6

void
create_zwierze()
{
   int i, j;  
 
    ustaw_odmiane_rasy(({"kozica","kozicy","kozicy","kozice",
          "kozica","kozicy"}),({"kozice","kozic","kozicom",
          "kozice","kozicami","kozicach"}),PL_ZENSKI);

    add_prop(LIVE_I_NEVERKNOWN, 1);

    set_gender(G_FEMALE);

    i=random(LICZBA_PRZYMIOTNIKOW - 1);
    j=random(LICZBA_PRZYMIOTNIKOW - 2);
    if (j == i) j++;
    dodaj_przym(PRZYMIOTNIKI[i][0], PRZYMIOTNIKI[i][1]);
    dodaj_przym(PRZYMIOTNIKI[j][0], PRZYMIOTNIKI[j][1]);
    
    set_random_move(10);

    set_long(" Widzisz duza, piekna kozice gorska. Wystepuje ona w tych "+
      "okolicach raczej czesto, jest doskonale przystosowana do gorskich "+
      "warunkow. Ma specjalne, ostre kopyta dzieki ktorym moze szybko i "+
      "zwinnie przemieszczac sie po skalach. Zywi sie nieliczna roslinnascia "+
      "ktora porasta te nagie i surowe zbocza. Ma nieduze rogi, ktorymi "+
      "w razie potrzeby potrafi sie calkiem niezle bronic.\n");
        
    set_stats(({30,40,40,1,1,10}));

    set_act_time(5);
    add_act("emote grzebie kopytem wsrod kamieni.");
    add_act("emote przypatruje ci sie badawczo.");
    add_act("emote pochyla glowe, probujac odstraszyc cie swoimi rogami.");
    add_prop(CONT_I_WEIGHT,60000);
    add_prop(CONT_I_HEIGHT,150);
        
    set_attack_unarmed(1, 7, 11,W_IMPALE, 60,"rogami");
    set_attack_unarmed(4, 8, 10,W_BLUDGEON, 40,"kopytami");

    set_hitloc_unarmed(1, ({4,4,5}), 30,"leb");
    set_hitloc_unarmed(2, ({2,3,4}), 20,"jedna z nog");
    set_hitloc_unarmed(8, ({3,4,4}), 50,"tulow");

    set_alignment(0);

    set_aggressive(0);

    ustaw_whimpy(90, 2);
    set_random_move(50);
    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);

}

