inherit "/d/Imperium/std/monster";
#include <ss_types.h>
#include <macros.h>
#include <stdproperties.h>
#include <seqaction.h>


void
create_monster()
{
    ustaw_shorty(({ "siwobrody kaplan", "siwobrodego kaplana",
                    "siwobrodemu kaplanowi", "siwobrodego kaplana",
                    "siwobrodym kaplanem", "siwobrodym kaplanie"}),
                 ({ "siwobrodzi kaplani", "siwobrodych kaplanow",
                    "siwobrodym kaplanom", "siwobrodych kaplanow",
                    "siwobrodymi kaplanami", "siwobrodych kaplanach" }),
                    PL_MESKI_OS);

    dodaj_nazwy(({ "kaplan", "kaplana", "kaplanowi", "kaplana",
                   "kaplanem", "kaplanie" }), ({ "kaplani",
                   "kaplanow", "kaplanom", "kaplanow", "kaplanami",
                   "kaplanach" }), PL_MESKI_OS);

    dodaj_przym("siwobrody","siwobrodzi");
    
    set_long("Wysoki siwobrody kaplan odziany w dlugi habit. W jego oczach " +
        "widzisz wielka madrosc, ktora nabyc mozna tylko poprzez wieloletnie " +
        "studia i zycie pelne doswiadczen. "
           + "Zauwazasz, ze obserwuje cie juz od dluzszego czasu, co chwile jednak zerkajac "
           + "znaczaco na marmurowa urne.\n");

    ustaw_odmiane_rasy(PL_CZLOWIEK);

    set_gender(G_MALE);

    add_prop(LIVE_I_NEVERKNOWN, 1);

    add_prop(CONT_I_WEIGHT, 73000);
    add_prop(CONT_I_HEIGHT, 180);

    set_skill(SS_UNARM_COMBAT, 1 + random(2));
    set_skill(SS_PARRY, 1 + random(1));

    set_stats(({ 5, 5, 5, 5, 5, 5}));

    set_act_time(5);
    add_act("emote mowi: Wloz do urny zbroje lub jakas bron, a Sigmar bedzie ci wdzieczny.");
    add_act("emote mowi: Z urny mozesz wyjac tylko jeden przedmiot na raz.");
    add_act("emote mowi: Ta urna to wyraz naszej solidarnosci z innymi tego swiata.");
    add_act("emote mowi: Jedna zbroja i jedna bron, to wszystko co mozesz wziac i niechaj " +
        "ci one dobrze sluza.");
    add_act("emote mowi: Jesli ukazesz swoje milosierdzie, Sigmar to zauwazy, badz pewien!");     
    add_act("emote patrzy sie na ciebie znaczaco.");
    add_act("emote usmiecha sie.");
    add_act("emote gladzi sobie brode.");
    add_act("emote wznosi oczy ku niebu.");
    
    "/d/Imperium/kylo/swiatynia/log/log_sh.c"->shadow_me(this_object());
}