inherit "/d/Imperium/std/monster";
inherit "/std/combat/humunarmed";
#include <money.h>
#include <ss_types.h>
#include <wa_types.h>
#include <macros.h>
#include <pl.h>
#include <stdproperties.h>

void
create_monster()
{ 
    ustaw_odmiane_rasy(PL_CZLOWIEK);

    dodaj_przym("barczysty","barczysci");
    dodaj_przym("wytatuowany","wytatuowani");

    ustaw_imie(({"zargoth","zargotha","zargothowi","zargotha","zargothem",
      "zargothrze"}),PL_MESKI_OS);
    
    set_long("Jest to wysoki, a zarazem przy tuszy mezczyzna, ktory "+
"wiele juz lat pracuje w swoim zawodzie, o czym swiadcza jego fachowe ruchy. "+
"Pod gesta, ciemna grzywa dostrzegasz male oczka ciagle szukajace swych zabawek.\n");
    
    set_alignment(0);
    set_living_name("kowal_z_norski");

    set_gender(G_MALE);
   
    add_prop(CONT_I_WEIGHT, 7000);
    add_prop(CONT_I_HEIGHT, 215);
    add_prop(NPC_M_NO_ACCEPT_GIVE, 1);

    add_weapon("/d/Imperium/Norska/bronie/mlot2.c");

    set_skill(SS_PARRY, 60);    
    set_skill(SS_DEFENCE, 60);
    set_skill(SS_UNARM_COMBAT, 50);
    set_skill(SS_WEP_WARHAMMER, 90);

    set_stats(({140, 100, 170, 40, 50, 90}));
    
    set_chat_time(9);
    add_chat("Bez mlota to nie robota.");
    add_chat("Od malego mnie uczyli mlotem dobrze machac.");
    add_chat("Nie ma to jak porzadny kawalek stali.");
    
    set_cchat_time(5);
    add_cchat("Jak cie przez ramie trzepne..");
    add_cchat("Zebys nie pozalowal, skurczybyku.");
    
    set_act_time(13);
    add_act("emote siada na chwile odpoczywajac od trudow zawodu.");
    add_act("emote wyciera rece w brudny juz fartuch.");
    add_act("emote uderza w rozrzazony metal."); 
}

string
query_presentation()
{
  return "Zargoth, Rzemieslnik z Norski, mezczyzna";
}

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

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