inherit "/d/Imperium/std/monster";
#include "local.h"

#define PRZYMIOTNIKI ({({"niski","niscy"}), ({"czarnobrody","czarnobrodzi"}), \
               ({"barczysty","barczysci"}), ({"zasepiony","zasepieni"}),({"mezny","mezni"})})
#define LICZBA_PRZYMIOTNIKOW 5

void
create_monster()
{

        int i, j;

    ustaw_nazwe(({ "straznik", "straznika", "straznikowi", "straznika",
        "straznikiem", "strazniku" }), ({ "straznicy", "straznikow",
        "straznikom", "straznikow", "straznikami", "straznikach" }),
        PL_MESKI_OS);
    set_living_name("straznik_gildii_zabojcow");
    ustaw_odmiane_rasy(PL_KRASNOLUD);
    set_gender(G_MALE); 

    set_random_move(10);
    set_restrain_path(PATH);

    add_prop(LIVE_I_NEVERKNOWN,1);
       
        i = random(LICZBA_PRZYMIOTNIKOW);
        j = random(LICZBA_PRZYMIOTNIKOW - 1);
        if(j >= i)
          ++j;

        dodaj_przym(PRZYMIOTNIKI[i][0], PRZYMIOTNIKI[i][1]);
        dodaj_przym(PRZYMIOTNIKI[j][0], PRZYMIOTNIKI[j][1]);

    set_alignment(50);

    set_long("Jest to straznik pilnujacy porzadku w Karak-Varn. Widac ze jest "+
    "doswiadczonym wojownikiem, przyzwyczajonym do walki w ciasnych tunelach "+
    "podziemnego miasta.\n");

    set_stats(({ 60+random(30), 40+random(15), 45+random(20), 40, 40, 40  }));

      set_skill(SS_BLIND_COMBAT, 30);
      set_skill(SS_WEP_WARHAMMER, 50+random(40));
      set_skill(SS_DEFENCE, 50+random(40));
      set_skill(SS_CLIMB, 25);

    set_act_time(12 + random(20));
    add_act("emote gladzi swoja brode.");
    add_act("emote rozglada sie ostroznie, badajac otoczenie.");
    

    set_cact_time(5);
    add_cact("emote mowi: Zginiesz jak pies.");
    add_cact("emote mowi: Pozalujesz swego czynu.");
    add_cact("emote zrecznym ruchem ociera pot z czola.");

    add_weapon(MPATH + "mlot.c");
    add_armour(MPATH + "kubrak.c");
    
   dodaj_miedz(35);
   dodaj_srebro(5);

}

public void
wesprzyj(object ob)
{
    if (query_attack())
    {
/*
        switch(random(3))
        {
            case 0: command("emote syczy glosno."); break;
            case 1: command("krzyknij Besssstio!"); break;
            case 2: command("krzyknij Ku chwale gadow!"); break;
        }
*/        
        return ;
    }
    
    command("wesprzyj " + OB_NAME(ob));
    
    if (query_attack())
    {
        switch(random(5))
        {
            case 0: command("krzyknij Zgin Bestio!"); break;
            case 1: command("krzyknij Do broni!"); break;
            case 2: command("krzyknij Krasnoludow sie bic zachcialo, A?");
break;
            case 3: command("krzyknij Zgin pomiocie Chaosu!"); break;
            case 4: command("krzyknij Na smierc!"); break;
        }
        return ;
    }

}

public void
pomocy()
{
    (all_inventory(environment(this_object())) - ({ this_object() }))->wesprzyj(this_object());
}

void
attacked_by(object wrog)
{
    command("krzyknij Do boju!");
    set_alarm(0.1, 0.0, "pomocy");
    return ::attacked_by(wrog);
}

void
notify_you_killed_me()
{
    set_alarm(0.2,0.0,"ograbiamy");  
}    

void
ograbiamy()
{
    command("wez wszystko z ciala");
}