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

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

void
create_monster()
{
    ustaw_imie (({"Henry", "Henrego","Henremu", "Henrego","Henrym", "Henrym"}));

    ustaw_odmiane_rasy (PL_CZLOWIEK);

    dodaj_przym (({"maly","zasuszony"}),({"mali","zasuszeni"}));

    dodaj_nazwy( ({"kartograf","kartografa","kartografowi","kartografa",
    		   "kartografem","kartografie"}),
    		 ({"kartografowie","kartografow","kartografom","kartografow",
                        "kartografami","kartografach"}),PL_MESKI_OS);
    dodaj_nazwy( ({"henry","henrego","henremu","henrego","henrym","henremu"}),
    		 PL_MESKI_OS);


    set_long ("Jest to maly, zasuszony czlowieczek, ktory "
             +"prawdopodobnie cale zycie spedzil na kopiowaniu cudzych "
             +"osiagniec. Co chwila przeciera zmeczone oczy i gleboko "
             +"wzdycha. Pioro w jego reku skrzypi posuwajac sie po papierze, "
             +"a kiedy prysnie tusz, marnujac robote, kartograf mruczy jakies "
             +"przeklenstwa pod nosem.\n");


    set_gender(G_MALE);

    add_prop(CONT_I_WEIGHT, 100000);
    add_prop(CONT_I_HEIGHT, 160);

    set_skill(SS_DEFENCE, 25 + random(5));
    set_skill(SS_WEP_SWORD, 25 + random(10));
    set_skill(SS_UNARM_COMBAT, 15 + random(5));
    set_skill(SS_PARRY, 15 + random(10));

    set_stats(({ 40, 42, 38, 55, 62, 50}));

    set_chat_time(13);
    add_chat("Chcesz kupic mape?");
    add_chat("Mam najlepsza mape Nuln!");

    set_act_time(10);
    add_act("echo Pioro kartografa skrzypi po papierze.");
    add_act("emote przeciera zmeczone oczy.");
    add_act("popatrz uwaznie");

}

void
add_introduced(string imie)
{
    set_alarm(2.0, 0.0, "return_introduce", imie);
}

void
powiedz(string co)
{
        command("powiedz " + co);
}

string
query_presentation()
{
    return "Henry Schmidt, Kartograf, czlowiek";
}

void
return_introduce(string kto)
{
    command("przedstaw sie " + OB_NAME(find_living(kto, 0)));
}