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

#include "silvy.h"

#define POSAG "/d/Imperium/Nuln/swiatynie/sigmar2.c"

void
create_monster()
{
//    ustaw_jak_daleko(0);

    dodaj_przym("schorowany","schorowani");
    dodaj_przym("stary","starzy");        
    
    set_long("Spogladasz na starego schorowanego czlowieka. Prawie caly czas "+
       " lezy on na pryczy ledwo majac sile co jakis czas zakaslac." +
       " Ubrany jest w brudne lachmany, ktorych pochodzenie wolalbys nie znac.\n");

    ustaw_odmiane_rasy(PL_CZLOWIEK);

    set_gender(G_MALE);

    add_prop(LIVE_I_NEVERKNOWN, 1);
    add_prop(IMPERIUM_LIVE_I_NULN_CITIZEN,1);

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

    set_skill(SS_UNARM_COMBAT, random(5));

    set_stats(({ 20, 3, 5, 40, 40, 10}));

    set_act_time(5);
    add_act("emote cos mruczy.");
    add_act("emote cicho kaszle pozostawiajac krwawe slady na poduszce.");
    add_act("emote modli sie po cichu do Shayli.");
    
    add_ask(({"mlot","sigmara","swiatynie"}),VBFC_ME("give_quest"));    

    set_odszedl("'Nikt nie chce mnie wysluchac.. O przebacz mi Sigmarze..");
    set_prop_name("_0_9_zapytal_sie_w_szpitalu");
    set_hint_bit(3,3);
    set_zajety("Jestem zbyt chory aby rozmawiac z dwoma osobami na raz...");
    set_namolny("Daj mi zlapac oddech a zaraz bede mowil dalej...");
    set_questbit(0,9);
    zrobiony("To znowu ty? Przyszedles mnie przesladowac?");

    dodaj_miedz(10+random(20));

    set_quest(({0.3,"emote wyraznie blednie gdy slyszy pytanie.",
        2.0,"'Nie zabijaj mnie i tak niedlugo umre....",
        4.0,"'Sigmar juz zadal mi sroga pokute...",
        1.5,"emote usmiecha sie kwasno.",
        5.0,"'Ale chce umrzec z czystym sumieniem...",
        1.5,"'Dlatego ty mi jestes potrzebny...",
        1.5,"emote przyglada ci sie uwaznie.",
        4.0,"'Wysluchaj mnie teraz uwaznie.",
        1.5,"'Tak, ukradlem krysztalowy mlot ze swiatyni...",
        1.5,"emote usmiecha sie, lecz nagle lapie go raptowny kaszel.", 
        1.5,"emote pluje krwia na posciel.",
        4.0,"'Jak widzisz Sigmar jest srogim bogiem...",
        1.5,"'Kiedy schodzilem z posagu polamalem sobie zebra...",
        1.5,"'Jedno z nich utkwilo obok serca... Nie mozna go wyjac...",
        1.5,"'Nie pociagne juz dlugo.....",
        1.5,"emote zaczyna krwawo kaslac.",
        4.0,"emote po chwili kontynuuje.",
        1.0,"'Mlot schowalem w kanalach pod miastem.",
        1.5,"'Powinien lezec w zaglebieniu przy rozwidleniu korytarza.",
        1.5,"emote znowu zaczyna krwawo kaslac.",
        1.5,"'A teraz juz idz i daj spokojnie doczekac konca."}));

}


int quest_is_open(object gracz)
{
 if(POSAG->query_mlot()) return 1;
 command("'Ktos juz zwrocil to co ukradlem...");
 return 0;
}