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

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





void
create_monster()
{ 
    
    ustaw_imie( ({"ivan", "ivana", "ivanowi", "ivana", "ivanem", 
        "ivanie" }), PL_MESKI_OS);
        
    dodaj_nazwy(({ "karczmarz", "karczmarza", "karczmarzowi",
        "karczmarza", "karczmarzem", "karczmarzu" }), ({ "karczmarze",
        "karczmarzy", "karczmarzom", "karczmarzy", "karczmarzami",
        "karczmarzach" }), PL_MESKI_OS);
    
    
    dodaj_przym("zapity","zapici");

    set_long("Zapity barman to osoba w srednim wieku, cieszaca sie wsrod bywalcow " +
        "karczmy wyraznym respektem. W jego oczach non stop widzisz pragnienie kolejnych " +
        "procentow. Kroza plotki ze ten czlek przepil kiedys cala kompanijie krasnoludow... "+
        "pewno dlatego zwia go 'Szalony'\n");
    ustaw_odmiane_rasy(PL_CZLOWIEK);
    set_gender(G_MALE);
        
    add_prop(CONT_I_WEIGHT, 70000);
    add_prop(CONT_I_HEIGHT, 185);
    
    set_skill(SS_DEFENCE, 15 + random(10));
    set_skill(SS_UNARM_COMBAT, 20 + random(10));
    set_skill(SS_PARRY, 10 + random(10));
    
    set_stats(({75, 40, 75, 50, 50, 60}));
    
    set_chat_time(25);
    add_chat("Piwo?");
    add_chat("Chcesz sie czegos napic?");
    add_chat("Chcesz mnie pokonac w piciu wodki?");
    add_chat("Znowu na kredyt? Poshlo stad");
    add_chat("A kiedys to nawet pilem z.. hic... carem ..hic!");
    add_chat("VODKI VODKI!!!");
    
    set_cchat_time(10);
    add_cchat("Oz ty!");
    add_cchat("Bijesz barmana? Srogo tego pozalujesz!");
    add_cchat("Spadaj frajerze!");
    add_cchat("Straz!!!!");
    
    set_act_time(21);
    add_act("emote szuka ofiary z ktora moglby sie zmierzyc w alkoholowym pojedynku.");
    add_act("emote przysypia.");
    add_act("emote czysci szklanki.");
    add_act("emote usmiecha sie krzywo."); 

    
}


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"Ivan 'Szalony' Karczmarz, czlowiek";
}