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>
#include <money.h>
void
create_monster()
{
    add_prop(LIVE_I_NEVERKNOWN,1);


    ustaw_odmiane_rasy( ({"widlonog", "widlonoga", "widlonogowi", "widlonoga",
                "widlonogiem", "widlonogu"}), ({"widlonogi", "widlonogow",
                "widlonogom", "widlonogi", "widlonogami", "widlonogach"}), PL_MESKI_NOS_NZYW);

    dodaj_przym("smokopodobny", "smokopodobni");
    dodaj_przym("najezony", "najezony");


    set_long("Jest to pewnie ostatni drakonid w promieniu tysiaca mil. "+
             "Niewatpliwie jego widok budzi groze.\n");

    set_gender(G_MALE);
    set_aggressive(1);
    set_exp_factor(249);
    add_prop(CONT_I_WEIGHT, 14000); 
    add_prop(CONT_I_HEIGHT, 800);   

    set_attack_unarmed(1, 240, 650, W_IMPALE,  50, "smoczym kolcowatym ogonem");
    set_attack_unarmed(4, 240, 650, W_BLUDGEON, 50, "ostrymi zabkami");

    set_hitloc_unarmed(0, 490, 25, "gadzi leb");
    set_hitloc_unarmed(1, 490, 50, "luskowate cielsko");
    set_hitloc_unarmed(4, 490, 25, "kolcowaty ogon");

    set_stats(({170, 130, 220, 190, 201, 124}));

    set_skill(SS_BLIND_COMBAT, 100);
    set_skill(SS_DEFENCE,60);
    set_alignment(-100);

    set_cact_time(5);
    add_cact("emote macha zwodniczo kolczastym ogonem.");
    add_cact("emote podskakuje szykujac sie do kolejnego ataku.");
    add_cact("emote syczy przerazliwie.\n");

}