/*
 * by mamusia Shivi dla Riva.
 */

inherit "/std/creature";
inherit "/std/combat/unarmed";

inherit "/std/act/action";

#include <wa_types.h>
#include <ss_types.h>
#include <macros.h>
#include <filter_funs.h>
#include <stdproperties.h>

/*
 * Definiujemy to dla wlasnej wygody
 */
#define A_ZEBY  0
#define A_KOPYTA 1

#define H_GLOWA 0
#define H_TULOW 1

int
poglaszcz()
{
  if ( this_player()->query_imie(this_player(), PL_MIA)=="Shiviana")
  {
    saybb(QCIMIE(this_player(), PL_MIA) + " spokojnie klepie swojego konia po karku.\n");
    write("Klepiesz lagodnie swojego konia po karku.\n");
  }
  else
  {
    saybb(QCIMIE(this_player(), PL_MIA) + " probuje dotknac konia lecz "+
          "ten staje deba i z szalonym rzeniem mloci kopytami powietrze.\n");
    write("Podchodzisz do konia lecz raptownie staje on deba i z szalonym "+
        "rzeniem mloci kopytami powietrze. Chyba nie zaryzykujesz poglaskania go.\n");
  }
  return 1;
}

create_creature()
{


     ustaw_odmiane_rasy( ({"kon","konia","koniowi","konia","koniem","koniu"}),
       ({"konie","koni","koniom","konie","konmi","koniach"}), PL_MESKI_OS);

    add_prop(LIVE_I_NEVERKNOWN, 1);

    set_gender(G_MALE);

     dodaj_przym("mroczny", "mroczne");
     dodaj_przym("czarny", "czarne");

    set_long("Ciemnosc patrzy na ciebie z grzbietu tego stworzenia, albowiem z "+
            "niej sie narodzil. Smolistym okiem dostrzega kazdy twoj ruch, kazde "+
            "drgnienie, szerokie chrapy rozchylaja sie szeroko, owiewajac cie "+
            "goracym oddechem. Stalowe kopyta grzmoca ziemie jak echo "+
            "nadciagajacej burzy, pasma dlugiego ogona targa wiatr. Kiedy kon "+
            "potrzasa lbem, upodabnia sie do upiora - grzywa podrywa sie szalenczo "+
            "wraz z oblakanym podmuchem. Stworzenie dziko podrzuca lbem gdy probujesz "+
            "otworzyc usta, powoli opetuje cie, wdrapuje sie podstepnie do umyslu. "+
            "Wiesz ze jesli pozwolisz mu nad soba zawladnac, mrok zawladnie twa dusza. "+
            "Przeciagly szept sunie po czarnej siersci konia...\n");

    set_stats(({ 40, 50, 30, 5, 5, 20}));

    set_act_time(100);
    add_act("emote podrzuca lbem.");
    add_act("emote parska donosnie, az dreszcze przechodza ci po skorze.");
    add_act("emote spoglada na ciebie swymi czarnymi jak noc oczyma.");
    add_act("emote unosi noge gniewnie.");
    add_act("emote potrzasa grzywa.");

    add_cmd_item("konia", "poglaszcz", poglaszcz);

    set_hp(query_max_hp());

    set_skill(SS_DEFENCE, 10);

    set_attack_unarmed(A_ZEBY, 2, 5, W_IMPALE, 40, "zebami");
    set_attack_unarmed(A_KOPYTA, 15, 15, W_BLUDGEON,  30, "kopytami");

    set_hitloc_unarmed(H_GLOWA, ({ 10, 20, 15 }), 20, "glowe");
    set_hitloc_unarmed(H_TULOW, ({ 5,  10, 20 }), 80, "bok");
}