inherit "/std/monster";
inherit "/std/act/add_things";
inherit "/lib/skill_raise.c";
#include "../pal.h";

void create_monster()
{
    ustaw_imie(({"emerald","emeralda","emeraldowi","emeralda","emeraldem","emeraldzie"}),
                PL_MESKI_OS);

    ustaw_odmiane_rasy(PL_CZLOWIEK);
    dodaj_przym("postawny","postawni");
    dodaj_przym("krzepki","krzepcy");
	
    set_long("Wysoki, postawny czlowiek, przestepuje nerwowo z nogi na noge. "+
      "Na jego poteznym ciele widzisz liczne blizny, slady po stoczonych "+
      "walkach. Najwieksza szrama biegnie przez prawa czesc jego twarzy, "+
      "oko, dochodzac az do warg i powodujac na nich dziwny grymas. Z cala "
      +"pewnoscia czlowiek ten zna sie na rzeczy i umie nauczyc sie bic.\n");
	
    set_gender(G_MALE);
	
    add_prop(CONT_I_HEIGHT,195);
    add_prop(CONT_I_WEIGHT,100000);
    add_prop(NPC_M_NO_ACCEPT_GIVE,1);
	
    set_skill(SS_UNARM_COMBAT, 80);
    set_skill(SS_DEFENCE, 40);
    set_skill(SS_PARRY, 60);
    set_skill(SS_BLIND_COMBAT, 40);
    set_skill(SS_WEP_CLUB, 80);
	
    set_stats(({96, 65, 66, 60, 50, 75, 60}));

  	sk_add_train(SS_WEP_SWORD,35);   
  	sk_add_train(SS_UNARM_COMBAT,40);   
  	sk_add_train(SS_SWIM,30);
  	sk_add_train(SS_PARRY,40);
  	sk_add_train(SS_DEFENCE,40);
  	sk_add_train(SS_WEP_AXE,40);
  	sk_add_train(SS_SHIELD_PARRY,40);
}

void
add_introduced(string kto)
{
     set_alarm (2.0,0.0,"intro",find_player(kto));
}

void
intro(object ob)
{
    if (objectp(ob)) 
        command ("przedstaw sie "+OB_NAME(ob));
}

void
init_living()
{
    init_skill_raise();
    ::init_living();
}