// Nathaniel (c) 1999
// Kowal w Altdorfie
// Engine kowala by Aslan
 

inherit "/d/Imperium/std/kowal";
#include "nath.h"

void
create_kowal()
{
    ustaw_imie(({"akhad", "akhada", "akhadowi", "akhada", "akhadem",
        "akhadzie"}), PL_MESKI_NZYW);
    ustaw_odmiane_rasy(PL_KRASNOLUD);
    set_gender(G_MALE); 
    dodaj_przym("krepy", "krepy");
    dodaj_przym("czarnobrody", "czarnobrodzi");
    set_alignment(0);

    set_long("Niski, ale krepy krasnolud z pewnoscia jest miejscowym kowalem. "+
        "Wlosy splecione w warkocze kleja sie do poteznego, spoconego karku. "+
        "Jego krotkie, ale mocarne rece pracuja rytmicznie, sprawiajac, ze bezladne "+
		"kawalki stali staja sie znakomita bronia i zbroja.\n");
    
    
    set_stats(({ 80, 40, 60, 40, 40, 60 }));

    set_skill(SS_DEFENCE, 20);
    set_skill(SS_CLIMB, 40);
    set_skill(SS_LOC_SENSE, 30);
    set_skill(SS_TRADING, 25);
    set_skill(SS_WEP_WARHAMMER, 50);
    
    add_weapon(NPATH + "bronie/mlotkow.c");

    set_act_time(20 + random(20));
    add_act("emote mowi: Czy cos sobie rzyczysz ?\n");
    add_act("emote odklada na chwile mlot i odpoczywa.\n");
    add_act("emote przyglada sie z zadowoleniem swojej pracy.\n");
    add_act("emote .wpatruje sie przez w mlot.\n");

    set_cact_time(5);
    add_cact("emote mowi: Zginiesz, zostane pomszczony !\n");
    add_cact("emote krzyczy: STRAZE RATUNKU !\n");
    add_cact("emote mowi: Zaraz przyjdzie straz. Umrzesz w lochach w meczarniach.\n");

    dodaj_miedz(20+random(50));
    dodaj_srebro(20+random(20));
   
    
    ustaw_co_robimy(({
      NPATH + "bronie/halabardakow",
      NPATH + "bronie/mieczkow",
      NPATH + "zbroje/kolczugakow"
     // NPATH + "zbroje/rekawicekow"
      }));
}

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

varargs void 
return_intro(string kto)
{
    command("przedstaw sie " + find_player(kto)->query_real_name(PL_CEL));
}

string
query_presentation()
{
    return"Akhad, Mistrz Cechu Kowali z Altdorfu, krasnolud.";
}