inherit "/d/Imperium/std/monster.c";
#include <stdproperties.h>
#include <ss_types.h>
#include <macros.h>
#include "local.h"
#include <wa_types.h>
#include <filter_funs.h>
#define PEN_SPECJALA 400
#include "/d/Imperium/funkcje/specjal1.c"
create_monster()
{
    set_long("Zdecydowanie jeden z wiekszych ogrow jakie zdarzylo ci sie spotkac. Czerwone, " +
             "male slepka wwiercaja sie w ciebie i powoduja, ze ciarki podarzaja wzdluz twojego " +
             "kregoslupa. Ogromny mlot bojowy trzymany przez niego wydaje dziwny buczacy odglos. " +
             "W tym momencie oprocz wpatrywania sie w ciebie przeglada jakies papiery na stole " +
             "stojacym po srodku namiotu.\n");
             
    ustaw_nazwe(({"glabruz","glabruza","glabruzowi","glabruza","glabruzem","glabruze"}),
                ({"","","","","",""}),PL_MESKI_NZYW);
    ustaw_odmiane_rasy(PL_OGR);
    
    dodaj_przym("gigantyczny","gigantyczni");  
    dodaj_przym("mocarny","mocarni");
    set_gender(G_MALE);
      
    set_stats(({200,120,200,50,53,200}));
    set_skill(SS_DEFENCE, random(10)+100);
    set_skill(SS_PARRY, random(10)+100);
    set_skill(SS_WEP_WARHAMMER,random(50)+100);
    add_prop(LIVE_I_SEE_INVIS, 20);
    set_chat_time(2+random(10));
    set_act_time(5+random(10));
    
    add_act("emote przyglada sie jakims papierom i kreci powoli glowa.");
    add_act("emote wpatruje sie w ciebie przenikliwie.");
    add_act("emote lapie jakiegos przebiegajacego obok snotlinga i na twoich oczach odgryza mu " +
            "wszystkie konczyny. Jedna po drugiej. Reka, noga, druga noga. Snotling wrzeszczy i wije sie " +
            "w agonii. Ogr wyrzuca piszczacy kadlubek na ziemie i z ogromna sila, przy towarzystwie ochydnego " +
            "mlasniecia, rozgniata korpus i brzuch. Kawalek, chyba watroby, uderzyl cie w twarz...");
    add_act("emote mowi: Tym razem nam sie uda do kurwy nendzy...");
    add_act("emote mowi: Jak ten Slartz jeszcze raz wejdzie mi w droge i bedzie sie madrzyl...to mu przyjebie.");
    add_cact("emote mowi: Hahaha no nie...nastepny twardziel.");
    add_cact("emote mowi: Wiesz co? Lepiej juz stad idz...");
    add_cact("emote mowi: Zjeeem twoj mooozg, zjeeem twoj mooozg naaanananananaaa!!!");
    add_cact("emote mowi: Urwe ci jaja i zrobie z nich kolczyki. O ile masz jaja.");
    add_cact("emote krzyczy: Ejj chlopaki. Jak juz mu wklepie to go wyruchamy co?");
    add_cact("emote zagryza wargi i widzisz wylatujaca z jego ust struge krwi.");
    add_cact("emote warczy wsciekle!!!");
    set_alignment(-900);
    add_weapon("/d/Imperium/alkin/mlot");
    add_armour("/d/Imperium/alkin/orki/bronie/mshield");
    add_armour("/d/Imperium/alkin/orki/bronie/mplyta");
    add_armour("/d/Imperium/alkin/orki/bronie/mczacha");
}
void
add_introduced(string imie)
{
    set_alarm(2.0,0.0,"return_intro",imie);
}
varargs void
return_intro(string kto)
{
    command("przedstaw sie " + find_player(kto)->query_real_name(PL_CEL));
}
string
query_presentation()
{
    return"Glabruz 'Zjem twoj mozg i nasram ci do szyi' Grobaginss, Pan i Wladca Zgniataczy Czaszek";
}
                                          
public void
pomocy()
{
    (all_inventory(environment(this_object())) - ({ this_object() }))->wesprzyj(this_object());
}
void
attacked_by(object wrog)
{
    command("krzyknij Zabiiic!!");
    set_alarm(2.0, 0.0, "pomocy");
    return ::attacked_by(wrog);
}