
inherit "/std/monster";

#include "../defs.h"


    void
dobywaj()
{
TO->command("dobadz wszystkich broni");
}

void
create_monster()
{
   

    ustaw_odmiane_rasy(({"ghoul", "ghoula", "ghoulowi",
                "ghoula", "ghoulem", "ghoulu"}),
                ({"ghoule", "ghouli", "ghoulom",
                "ghouli", "ghoulami", "ghoulach"}),
                PL_MESKI_OS);

    add_prop(LIVE_I_NEVERKNOWN,1);
    set_gender(G_MALE);




    dodaj_przym("przerazajacy","przerazajacy");
    dodaj_przym("monstrualny","monstrualni");

    set_long("Ten ghoul jest conajmiej dwa razy wiekszy od wszystkich innych tutaj. "+
             "Prawdopodobnie ma on silna wiez z magia tych okolic a pozatym dochdozisz "+
             "do wniosku ze jest on kanibalem. Z jego oczu bije bezdenna pustka a cialo "+
             "mimo zgnilosci wydaje sie byc naprawde poteznie zbudowane.\n");


    add_prop(LIVE_I_UNDEAD, 1);
    add_prop(CONT_I_HEIGHT, 180);
    add_prop(CONT_I_WEIGHT, 75000);

    set_stats(({200+random(70),160+random(100),200+random(70),20,35,300}));

    set_skill(SS_DEFENCE, 90+random(40));
    set_skill(SS_PARRY, 90+random(25));
    set_skill(SS_UNARM_COMBAT, 90+random(40));
    set_skill(SS_WEP_CLUB, 90+random(40));

    set_act_time(23 + random(15));
    set_cchat_time(5 + random(4));

    add_act("emote wyje: Jeeeessc!!");
    add_act("emote syczy potepienczo");
    add_act("emote przesuwa sie w twoim kierunku z wypisanym glodem na twarzy.");
    add_act("emote wydlubuje jakiegos robaka z ziemi poczym go zjada.");

    enable_commands();
    
    setuid();
    seteuid(getuid());
    clone_object("/d/Imperium/Sylvania/bronie/maczugag.c")->move(TO);

    set_alarm(1.0,0.0,"dobywaj");  
    


    set_aggressive(1);
    set_restrain_path("/d/Imperium/Sylvania/lokacje/las/");
    set_alignment(-1200);

}

