inherit "/std/monster";     
inherit "/std/combat/unarmed";  
#include <filter_funs.h>
#include <ss_types.h>
#include <stdproperties.h>
#include <wa_types.h>
#include <cmdparse.h>
#include <macros.h>
#include <pl.h>
#include <options.h>
#include <macros.h>
#include <formulas.h>
void
create_monster()
{
    add_prop(LIVE_I_NEVERKNOWN,1);


    ustaw_odmiane_rasy( ({"kikimora", "kikimory", "kikimorze", "kikimore",
                "kikimora", "kikimorze"}), ({"kikimory", "kikimor",
                "kikimorom", "kikimory", "kikimorami", "kikimorach"}), PL_ZENSKI);

    dodaj_przym("zakrwawiony", "zakrwawieni");
    dodaj_przym("pajakowaty", "pajakowaci");


    set_long("Potwor ten ma pajakowaty, obciagniety zeschla, ciemna skora ksztalt. "+
             "Niezwykle wrazenia budzi szkliste oko z pionowa zrenica. Ale najbardziej "+
             "zlowieszczo prezentuja sie iglowate kly w zakrwawionej paszczy - stwor pewnie "+
             "przed chwila cos upolowal. Lubi malo uczeszczane miejsca z dala od halasu i "+
             "zgielku, lekko wilgotne i zacienione, gdzie urzadza swe zasadzki.\n");

    set_gender(G_FEMALE);
    set_aggressive(1);  
    set_exp_factor(150);
    add_prop(CONT_I_WEIGHT, 23000); 
    add_prop(CONT_I_HEIGHT, 40);   

    set_attack_unarmed(1, 60, 45, W_IMPALE,  30, "iglowatymi klami");
    set_attack_unarmed(4, 60, 40, W_BLUDGEON, 70, "brudnymi pazurami");

    set_hitloc_unarmed(0, 90, 20, "wlochaty leb");
    set_hitloc_unarmed(1, 90, 30, "gruby odwlok");
    set_hitloc_unarmed(2, 90, 10, "pajakowate odnoze");
    set_hitloc_unarmed(3, 90, 10, "pajakowate odnoze");
    set_hitloc_unarmed(4, 90, 30, "pokryty sierscia grzbiet");

    set_stats(({170, 430, 120, 90, 101, 124}));

    set_skill(SS_DEFENCE,40);
    set_skill(SS_BLIND_COMBAT, 100);
set_alignment(-100);
    set_alignment(-190);
setuid();
seteuid(getuid());
clone_object("/d/Standard/gems/kam.c")->move(this_object());

    set_cact_time(5);
    add_cact("emote prycha na ciebie jakas substancja.");
    add_cact("emote podskakuje na osmiu pajakowatych nogach");
    add_cact("emote szykuje ostre kly do ataku");

}
