inherit "/d/Imperium/std/monster.c";
#include <stdproperties.h> 
#include <ss_types.h>
#include <macros.h>
#include <seqaction.h>
#include <pl.h>
object gracz;
void
create_monster()
{ 
    ustaw_nazwe(({"iria","irii","irii","irie","iria","irii"}),
        ({"irie","irii","iriom","irie","iriami","iriach"}), PL_ZENSKI);
    dodaj_nazwy(({ "kaplanka", "kaplanki", "kaplance", "kaplanki",
                   "kaplanka", "kaplance" }), ({ "kaplanki",
                   "kaplanek", "kaplankom", "kaplanek", "kaplankami",
                   "kaplankach" }), PL_ZENSKI);
    set_gender(G_FEMALE); 
    ustaw_odmiane_rasy(PL_CZLOWIEK);
    dodaj_przym("mlody","mlodzi");
    dodaj_przym("spokojny","spokojni");
    
        add_prop(CONT_I_WEIGHT, 60000);
        add_prop(CONT_I_HEIGHT, 178);
            
    set_long("Mloda kobieta ubrana jest w dluga, plocienna suknie siegajaca" +
        " kostek. Swojego rodzaju habit jest snieznobialy, a na piersi, po" +
        " stronie serca, wyhaftowany jest, zlota nicia, symbol Shallyi." +
        " Twarz tej dziewczyny jest tak piekna, ze dziwisz sie decyzji wstapienia do"+
        " zakonu. Alabastrowa, gladka skora, dlugie, proste, czarne jak kruk, wlosy"+
        " i duze, zielone jak soczysta, swieza trawa, oczy sprawiaja, ze moglaby"+
        " konkurowac z uroda niejednej elfki.\n");
    add_item("symbol","Jest to misternie wyhaftowane serce i kropla krwi.\n");
    set_stats(({35,33,40,76,80,49}));
    set_skill(SS_DEFENCE, 25);
    set_skill(SS_PARRY, 8);
    set_skill(SS_UNARM_COMBAT, 25);
    
    
    set_act_time(10 + random(3));
    add_act("emote usmiecha sie szczerze.");
    add_act("emote mowi: Nigdy nie watp w milosierdzie..");
    add_act("emote przycina krzaczki.");
    add_act("emote w zamysleniu patrzy na niebo.");
    add_act("emote wyciera czolo.");
    add_act("emote wyprostowuje suknie.");
    add_act("emote patrzy na ciebie.");
    add_act("emote mowi: Shallyia chroni cie. Pamietaj o niej.");
    add_act("emote mowi: Jezeli ktos zapomni o tobie, na pewno nie bedzie to Shallyia.");
    add_act("emote dotyka cie delikatnie.");
    
    set_cact_time(7);
    add_cact("emote krzyczy: Moja smierc bedzie poczatkiem twojej kleski!.");
    add_cact("emote krzyczy: Pomocy!");
    add_cact("emote podnosi lewa reke w gore, zaslaniajac twarz.");
    add_cact("emote krzyczy: Klatwa Shallyi dopadnie cie kiedys !!!");
    add_prop(NPC_M_NO_ACCEPT_GIVE," mowi zostaw to dla siebie.\n");
}
string
query_presentation()
{
    return"Iria nowicjatka, dziecko Shallyi, czlowiek";
}
varargs void 
return_intro(string kto)
{
    command("przedstaw sie " + find_player(kto)->query_real_name(PL_CEL));
}
void
add_introduced(string imie)
{
    set_alarm(2.0,0.0,"return_intro", imie);
}