inherit "/d/Imperium/std/monster";

#include <stdproperties.h>
#include <macros.h>
#include <ss_types.h>
#include <wa_types.h>

#define TO this_object()
#define TP this_player()

void
create_monster()
{

ustaw_odmiane_rasy(({"krasnolud","krasnoluda","krasnoludowi","krasnoluda",
                        "krasnoludem","krasnoludzie"}),({"krasnoludy","krasnoludow","krasnoludom",
"krasnoludy","krasnoludami","krasnoludach"}),PL_MESKI_NOS_ZYW);

    set_long("Masz przed soba typowego przedstawiciela wynioslej  " +
             "rasy krasnoludow.Niska postac szeroka w barach,  " +
             "muskularne dlonie zacisniete na rekojesci " +
             "broni.Widok ktory soba reprezentuje wskazuje na " +
             "to iz jest on z pewnoscia wspanialym wojownikiem.\n");

    dodaj_przym("potezny","potezne");
    dodaj_przym("jednooki","jednookie");

    set_gender(G_MALE);
    
    add_prop(LIVE_I_NEVERKNOWN, 1);
    
    add_prop(CONT_I_WEIGHT, 10000);
    add_prop(CONT_I_HEIGHT, 20);

    set_skill(SS_DEFENCE, 90 + random(10));
    set_skill(SS_UNARM_COMBAT, 20 + random(10));
    set_skill(SS_PARRY, 90 + random(10));
    set_skill(SS_WEP_AXE, 100);
    set_skill(SS_2H_COMBAT,100);
    set_stats(({320, 250, 410, 250, 250, 200}));
    add_armour("/d/Imperium/lester/Veteran/kolczuga.c");
    add_weapon("/d/Imperium/lester/Veteran/topor.c");
    add_weapon("/d/Imperium/lester/Veteran/topor.c");
}



void
special_attack( object enemy )
{
object para;
int r = random(50);
    if ( r < 15 )
        {
        say("Wydaje sie ze "+QIMIE(TO,PL_DOP)+" ignoruje wszystkie rany.\n");
        TO->heal_hp(300)+random(600);
        }
    if ( r < 7 )
        {
        enemy->catch_msg("Potezny jednooki krasnolud perfekcyjnie unika twojego ciosu " +
"i rabie cie na z doskoku swymi toporami.\n");
        say("Nagle potezny jednooki krasnolud perfekcyjnie unika ciosow i z lekkiego " +
            "doskoku rabie "+QIMIE(enemy,PL_DOP)+" swymi toporami.\n");    
        enemy->reduce_hit_point(600)+random(600);
        }
}