/* Plik:        nietoperz.c
 * Autor:       Dushin
 * Data:         
 * Last Update: 
 * Opis:
 */

inherit "/d/Imperium/std/zwierze.c";
#include "zamek.h"

#define A_ZABKI  0
#define A_PAZURKI 1
#define A_BLONA_LOTNA 2

#define H_GLOWA 0
#define H_TULOW 1
#define H_BLONA_LOTNA 2

string *losowy_przym()
{
    string *lp;
    string *lm;
    int i;
    lp=({ "szarobrazowy"  ,"czarny"  ,"maly"  ,"krwiozerczy"  ,"duzy" ,
        "nienasycony" });
    lm=({ "szarobrazowi"  ,"czarni"  ,"mali" ,"krwiozercy"  ,"duzi"  ,
        "nienasyceni"});
    i=random(6);

    return ({ lp[i] , lm[i] });

 }


create_creature()
{
    string *przm = losowy_przym();
    
    ustaw_odmiane_rasy(({"nietoperz","nietoperza","nietoperzowi",
        "nietoperza","nietoperzem","nietoperzu"}),
        ({"nietoperze","nietoperzy","nietoperzy","nietoperze",
        "nietoperzami","nietoperzach"}),PL_MESKI_NOS_ZYW); 
       
    add_prop(LIVE_I_NEVERKNOWN, 1);
    
    set_gender(G_MALE);

    dodaj_przym( przm[0], przm[1] );
    
    set_long("Paskudny nietoperz, rzadny krwi potwor.\n");

    set_stats(({ 20, 40, 30, 10, 10, 99}));

    set_act_time(60);
    add_act("emote porusza sie niespokojnie.");
    add_act("emote piszczy.");
    add_act("emote wisi spokojnie przyczepiony do sklepienia.");
    add_act("emote koluje nad glowa.");
    
    set_hp(query_max_hp());

    set_skill(SS_DEFENCE, 5);

    set_attack_unarmed(A_ZABKI,   2,   5, W_IMPALE, 40, "zabkami");
    set_attack_unarmed(A_PAZURKI, 15, 15, W_BLUDGEON,  50, "pazurkami");

    set_hitloc_unarmed(H_GLOWA, ({ 10, 20, 15 }), 20, "glowe");
    set_hitloc_unarmed(H_TULOW, ({ 5,  10, 20 }), 80, "tulow");
    set_hitloc_unarmed(H_BLONA_LOTNA, ({ 15, 20, 15 }),30, "blone lotna");

    jak_pojawiac_sie("wlatuje szybko i krazy pod sklepieniem.");
    jak_znikac("zrywa sie, koluje pod sklepieniem i szybko znika.");
    jak_znikac_podczas_walki("znika w poplochu.");
}

void
atakuj(object kogo)
{
    command("zabij "+OB_NAME(kogo));
}

