/* Autor: Mezon  */
/* goblinek */

inherit "/d/Imperium/std/monster.c";
#include "mezon.h"
#include <wa_types.h>

 
#define H_GLOWA 0
#define H_CIALO 1

void
create_monster()
{
ustaw_odmiane_rasy(({"goblin","goblina","goblinowi","goblina","goblinem","goblinie"}),
            ({"gobliny","goblinow","goblinom","gobliny","goblinami","goblinach"}),PL_MESKI_NOS_ZYW);

        set_gender(G_MALE);
       

        dodaj_przym("wysoki","wysocy");
        dodaj_przym("bezwzgledny","bezwzgledni");
 
        set_long("Wydawac by sie moglo, ze masz przed soba typowego przedstawiciela "+
                 "goblinow. Okolo czterech stopy wzrostu, lekko zielony odcien "+
                 "chropowatej skory, spiczaste uszy, oraz, wydawac by sie moglo, "+
                 "slaba postura, to wszystko co cechuje te najtchorzliwsze z goblinoidow. "+
                 "Jednak to, co szybko rzuca sie w oczy, to jego ufarbowane na jaskrawo "+
                 "nieliczne wlosy na czubku glowie, oraz to, iz na rekach i twarzy "+
                 "posiada rytualne tatuaze, przedstawiajace dziwne i zawile symbole. "+
                 "Nie ma watpliwosci, ze jest to jeden z Zabojcow Krasnoludow, goblin, "+
                 "ktory porzucil swoje plemie, by zginac w walce, polujac na "+
                 "znienawidzone krasnoludy.\n");

 
       set_stats(({95+random(10),50+random(10),50,4,10,50}));

       set_hp(query_max_hp());

      
       set_skill(SS_DEFENCE, 95);
       set_skill(SS_PARRY, 80);
       set_skill(SS_BLIND_COMBAT, 80);
       set_skill(SS_AWARENESS, 90);
     
       set_skill(SS_WEP_AXE, 95);
      
       add_prop(LIVE_I_NEVERKNOWN, 1);

      
//       set_hitloc_unarmed(H_GLOWA,25,25,"glowe");
//       set_hitloc_unarmed(H_CIALO,20,80,"tors");
//       set_aggressive(0);
     
       set_alignment(-200);
       
       add_item(({"tatuaze goblina","goblinie tatuaze"}),("Jego twarz i rece pokryte sa "+
        "czarnymi kolistymi tatuazami, ktore wydaja sie poruszac sie wraz z kazdym ruchem. \n"));

       add_item(({"elfke","ognistowlosa elfke","zlotooka elfke","zmaltretowana elfke",
         "zmasakrowana elfke"}),"Pod sciana widzisz zmasakrowana elfke, przykuta do pregieza.\n");       
      
       add_cmd_item("elfke",({"odwiaz","uwolnij","odczep"}),"Nie mozesz tego zrobic "+
         "poki "+short(PL_MIA)+" jest w poblizu.\n");
      
       set_cact_time(5);
      
       add_cact("emote wrzeszczy: Pozalujesz t'go psie!!"); 
            
      set_act_time(10+random(70));

      add_act("emote wklada ognistowlosa zlotooka elfke do Zelaznej Dziewicy!!\n" 
        + "Ognistowlosa zlotooka elfka krzyczy: AAA!! POMOCY!! RATUNKU!! NIECH MI KTOS POMOZE!");

      add_act("emote bije ognistowlosa zlotooka elfke po twarzy.\n" +
         "Elfka zaczyna krwawic.");

      add_act("emote przypina kajdanami elfke do pregieza...\n"
        + "Ognistowlosa zlotooka elfka krzyczy glosno, wolajac o pomoc!\n");

      add_act("emote patrzy lubieznie na zmaltretowana ognistowlosa zoltooka elfke.\n" 
        + "Ognistowlosa zoltooka elfka bezskutecznie probuje sie uwolnic.");

      add_act("emote bierze rozgrzany pret i przypala stopy ognistowlosej zlotookiej elfce!!!\n" 
        +"Slychac syk i swad przypalanej skory!\n"
        +"Ognistowlosa zlotooka elfka wyje z bolu!!!");
                                                                                                                                                                                                
      add_act("emote biczuje zmasakrowana ognistowlosa zlotooka elfke!\n"
        +"Ognistowlosa zlotooka elfka traci przytomnosc z bolu.");
      
  add_armour(NPATH + "zbroje/karacena.c");
  add_armour(NPATH + "zbroje/kol_rekawice.c");
  add_weapon(NPATH + "bronie/szer_topor.c");

}

void
do_die(object killer)
{
  tell_room(environment(this_object()),"Ognistowlosa, zlotooka elfka uwalnia sie z wiezow i ucieka krzyczac z oddali: 'Dziekuje, kimkolwiek jestes!'\n"); 
  ::do_die(killer);
}