inherit "/std/monster";
inherit "/std/act/add_things";
inherit "/cmd/std/command_driver";

#include "../wieza.h"



void
create_monster()
{


    ustaw_odmiane_rasy(PL_CZLOWIEK);
    dodaj_przym("dziwny","dziwni");
    dodaj_przym("czarny", "czarni");
    set_living_name("NORM");

    set_long("Jest to dziwny typ.\n");

    set_gender(G_MALE);

    add_prop(CONT_I_HEIGHT,175);
    add_prop(CONT_I_WEIGHT,80000);
    add_prop(NPC_M_NO_ACCEPT_GIVE,1);


    set_aggressive(1);

    set_skill(SS_UNARM_COMBAT, 150);
    set_skill(SS_DEFENCE, 150);
    set_skill(SS_PARRY, 150);
    set_skill(SS_BLIND_COMBAT, 150);
    set_skill(SS_WEP_KNIFE, 150);
    set_skill(SS_2H_COMBAT, 150);
    set_stats(({700, 700, 700, 200, 200, 200, 200}));

    add_weapon(OBJ+"dziwny_sztylet");
    add_weapon(OBJ+"dziwny_sztylet");

    
}

void
attacked_by(object ob)
{
    if (ob != this_object()->query_follow())
    {
        if(ob->query_prop("_live_i_is"))
        {
            set_alarm(0.01, 0.0, &set_follow(ob, 0.01));
            ::attacked_by(ob);
            return;
        }
        else        
           set_alarm(0.01, 0.0, &set_follow(ob, 0.01));
    }
    ::attacked_by(ob);
}

void
attack_object(object ob)
{
    if (ob != this_object()->query_follow())
    {
        if(ob->query_prop("_live_i_is"))
        {
            set_follow(ob, 0.01);
            ::attack_object(ob);
            return;
        }
        set_follow(ob, 0.01);
    }

    ::attack_object(ob);
}