/* skaven */
/* Vaktoth 1997 */

inherit "/d/Imperium/std/chaos";
#include "defs.h"
#include <stdproperties.h>
#include <macros.h>
#include <ss_types.h>
#include <wa_types.h>

#define PRZYMIOTNIKI ({({"szalony", "szaleni"}), ({"odrazajacy", "odrazajacy"}), \
            ({"okrutny", "okrutni"}), ({"barbarzynski", "barbarzynscy"}), \
        ({"bezlitosny", "bezlitosni"}), ({"zdradziecki", "zdradzieccy"}), ({"niebezpieczny", "niebezpieczni"})})
#define PRZYMIOTNIKI2 ({({"ostronosy", "ostronosi"}), ({"ciemnoskory", "ciemnoskorzy"}), \
        ({"zoltooki", "zoltoocy"}), ({"czerwonooki", "czerwonoocy"}), \
        ({"teponosy", "teponosi"}), ({"zwinny", "zwinni"}), ({"ciemnooki","ciemnoocy"})})

#define LICZBA_PRZYMIOTNIKOW 7

#define BRON      BRONIE + miecz()
#define ZBROJA    ZBROJE + "skavzbr.c"


#define PEN_SPECJALA 3*random(query_stat(SS_STR))
#include "/d/Imperium/funkcje/specjal1.c"

string
miecz()
{
        return "skavmie1.c";
}        


void
create_chaos()
{
        int i, j;       

         i = random(LICZBA_PRZYMIOTNIKOW);
         j = random(LICZBA_PRZYMIOTNIKOW);
        
         dodaj_przym(PRZYMIOTNIKI2[i][0], PRZYMIOTNIKI2[i][1]);
         dodaj_przym(PRZYMIOTNIKI[j][0], PRZYMIOTNIKI[j][1]);
         set_long("Przed toba stoi jedna z obrzydliwszych kreatur Starego Swiata" +
             " - skaven. Szczurza morda, dlugie i zwinne lapy zakonczone ostrymi" +
                 " pazurami, wlochate cialo - oto jak wyglada ten sluga chaosu." +
                 " Smiertelni w boju, zdradzieccy i podstepni sa plaga kanalow" +
         " wszelkich miast, siejac tam choroby, smierc i zniszczenie.\n");

     ustaw_odmiane_rasy(({"skaven", "skavena", "skavenowi", "skavena",
                "skavenem", "skavenie"}), ({"skaveni", "skavenow",
                "skavenom", "skavenow", "skavenami", "skavenach"}), PL_MESKI_OS); 
         set_gender(G_MALE);
          
     set_skill(SS_DEFENCE, 30 + random(20));
     set_skill(W_SWORD, 30 + random(20));
     set_skill(W_KNIFE, 20 + random(20));    
     set_skill(SS_PARRY, 30 + random(15));
     set_skill(SS_BLIND_COMBAT, 30 + random(30));
     set_skill(SS_AWARENESS, 40 + random(20));
    
     set_all_hitloc_unarmed(4); /* gruboskorny skubaniec */     
     set_alignment(-100);    
     add_prop(CONT_I_HEIGHT, 150 + random(30));
     add_prop(CONT_I_WEIGHT, 55000 + random(20000));
     add_prop(LIVE_I_NEVERKNOWN,1);
     add_prop(IMPERIUM_I_STWOR_CHAOSU, 1);
     
     add_armour(ZBROJA);
     add_weapon(BRON);     
     set_default_answer(VBFC_ME("odpowiedz_zazwyczaj"));
     set_act_time(5);

     add_prop(LIVE_I_NEVERKNOWN, 1);    

     set_stats(({130 + random(10), 130 + random(20), 130 + random(15), 130, 135, 130 }));
        
        set_chat_time(15 + random(15));
        set_act_time(20 + random(10));
        set_cchat_time(6);
        

        add_chat("Nooo, podejdz blizej, zapchlona pokrako!");
        add_chat("Dzis na obiad bede jadl swieze mieso - ciebie!");

        
        add_act("emote patrzy sie na ciebie wyglodnialym wzrokiem.");
        add_act("emote mamrocze cos w nieznanym tobie jezyku.");
        add_act("emote ziewnal, ukazujac swe zolte kly w pelnej krasie.");
        add_act("emote patrzy w twoja strone, usmiechajac sie okrutnie.");

        add_cchat("HARRRAGHH!!! WYBILA TWOJA OSTATNIA GODZINA CHLYSTKU!");
        add_cchat("Czy ty naprawde myslisz, ze zdolasz mnie pokonac?");
        add_cchat("Tylko sobie nie zrob krzywdy ta bronia. Lepiej mi ja oddaj.");
        add_cchat("Uczta dla naszego Pana! Krwi! Krwi! Wiecej krwi!");

}


string
odpowiedz_zazwyczaj()
   {
   command("'Nic o tym nie wiem, kundlu. Zabieraj sie stad!");
   command("'Jeszcze tu jestes??");
   return"";
   }

public void
wesprzyj(object ob)
{
    command("wesprzyj " + OB_NAME(ob));
}

public void
pomocy()
{
    (all_inventory(environment(this_object())) - ({ this_object() }))->wesprzyj(this_object());
}

void
attacked_by(object wrog)
{
    set_alarm(2.0, 0.0, "pomocy");
    return ::attacked_by(wrog);
}

void
notify_you_killed_me()
{
    set_alarm(0.2,0.0,"ograbiamy");  
}    

void
ograbiamy()
{
    command("wez wszystko z ciala");
}