/*
 * Mieszkaniec Athel Loren by Tanis
 * Tancerz do napadu - Silvy
 */


#include "ogolne.h"

inherit "/d/Imperium/std/monster";

#define PRZYMIOTNIKI2 ({ ({"muskularny","muskularni"}), ({"mlody","mlodzi"}), ({"doswiadczony","doswiadczeni"}), \
                         ({"przystojny","przystojni"}), ({"urodziwy","urodziwi"}), ({"opalony","opaleni"}), \
                         ({"dlugoreki","dlugorecy"}), ({"dlugonogi","dlugonodzy"}), ({"wysoki","wysocy"}), \
                         ({"umiesniony","umiesnieni"}), ({"czujny","czujni"}), ({"ostrozny","ostrozni"}), \
                         ({"szybki","szybcy"}), ({"zwinny","zwinni"}), ({"opanowany","opanowani"}), \
                         ({"spokojny","spokojni"}) })
       

#define PRZYMIOTNIKI1 ({ ({"zielonowlosy","zielonowlosi"}), ({"czerwonowlosy","czerwonowlosi"}), \
                         ({"niebieskowlosy","niebieskowlosi"}), ({"pomaranczowowlosy","pomaranczowowlosi"}), \
                         ({"zoltowlosy","zoltowlosi"}), ({"purpurowowlosy","purpurowowlosi"}), \
                         ({"ognistowlosy","ognistowlosi"}), ({"granatowowlosy","granatowowlosi"}), \
                         ({"karmazynowowlosy","karmazynowowlosi"}), ({"zlotowlosy","zlotowlosi"}), \
                         ({"srebrnowlosy","srebrnowlosi"}), ({"miedzianowlosy","miedzianowlosi"}), })


#define LICZBA_PRZYMIOTNIKOW1 12
#define LICZBA_PRZYMIOTNIKOW2 16

void
create_monster()
{
    int i,j;
    
        ustaw_nazwe(({"tancerz wojny", "tancerza wojny", "tancerzowi wojny", "tancerza wojny",
                "tancerzem wojny", "tancerzu wojny"}), ({"tancerze wojny", "tancerzy wojny",
                "tancerzom wojny", "tancerzy wojny", "tancerzami wojny", "tancerzach wojny"}), 
                PL_MESKI_OS);

        dodaj_nazwy(({"tancerz wojny", "tancerza wojny", "tancerzowi wojny", "tancerza wojny",
                "tancerzem wojny", "tancerzu wojny"}), ({"tancerze wojny", "tancerzy wojny",
                "tancerzom wojny", "tancerzy wojny", "tancerzami wojny", "tancerzach wojny"}), 
                PL_MESKI_OS);

    ustaw_odmiane_rasy(PL_ELF);

    set_gender(G_MALE);

    add_prop(LIVE_I_NEVERKNOWN,1);

    i = random(LICZBA_PRZYMIOTNIKOW1);
    j = random(LICZBA_PRZYMIOTNIKOW2);
 
    dodaj_przym(PRZYMIOTNIKI1[i][0], PRZYMIOTNIKI1[i][1]);
    dodaj_przym(PRZYMIOTNIKI2[j][0], PRZYMIOTNIKI2[j][1]);
    
        set_long("Jest to jeden z owianych legenda Tancerzy Wojny. "
           + "Jego kolorowa fryzura i tatuaze wywoluja ciekawosc i podziw, jednak "
           + "na polu bitwy staja sie przerazajace. Zastanawiasz sie, ilu to juz "
           + "niegodziwcow tuz przed smiercia widzialo takie tatuaze i taka fryzure... "
           + "Mina tego elfa mowi ci, ze calkiem sporo. Ten Tancerz wyglada, "
           + "jakby w pelni zaslugiwal na miano elitarnego wojownika. Jego ruchy "
           + "sa pelne gracji, a jednoczesnie bardzo szybkie, sprezyste i dokladne. "
           + "Wyglada tez na bardzo silnego i wytrzymalego, jakby przebiegniecie "
           + "calego lasu wzdluz i wszerz nie bylo dla niego specjalnym problemem...\n");   

        add_ask(({"Tancerzy Wojny","tancerzy wojny"}),VBFC_ME("tancerze_odp"));

        set_stats(({58,66,46,55,65,56}));
        
        set_skill(SS_DEFENCE, 70 + random(30));
        set_skill(SS_UNARM_COMBAT, 60 + random(5));
        set_skill(SS_SWIM, 15);
        set_skill(SS_PARRY, 70 + random(30));
        set_skill(SS_WEP_SWORD, 70 + random(30));
        set_skill(SS_2H_COMBAT, 70 + random(30));
        
        add_prop(CONT_I_WEIGHT, 62000);
        add_prop(CONT_I_HEIGHT, 190);
        
        add_prop(NPC_I_NO_FEAR, 1);
 
        set_cact_time(random(10));
        add_cact("emote wola: Aep es Valares!");
        add_cact("emote mowi: Ep erge nurge!");
        add_cact("emote wykonuje niesamowity piruet.");

        set_act_time(10 + random(20));
        add_act("emote rozglada niespokojnie.");
        add_act("emote rozglada sie uwaznie.");
        add_act("emote przyglada sie bacznie otoczeniu, jakby szukajac zasadzek.");
        add_act("emote wciaga powietrze gleboko w pluca i usmiecha sie z zadowoleniem.");
        add_act("powiedz Czuje smrod ogra!");
        add_act("powiedz W gorach urzadzily swa kryjowke smierdzace ogry. Trzeba je bedzie "+
          "wykurzyc.");
        add_act("powiedz Mowie wam. Ogry to tajni agenci chaosu!");
        add_act("powiedz Powinnismy wybic do nogi plugawe i smierdzace ogry. "+
          "Gdyby to ode mnie zalezalo to juz by ich tu nie bylo.");
        add_act("powiedz Kazdy ogr to smierdziel!");

    add_weapon(PATH + "bronie/t_miecz.c");
    add_weapon(PATH + "bronie/t_miecz.c"); 
 
    dodaj_zloto(random(1));
    dodaj_srebro(random(10));
    dodaj_miedz(random(20));

}

string
tancerze_odp()
{
      set_alarm(2.0, 0.0, "command","powiedz Tancerze Wojny to my. Wybacz, nie moge powiedziec wiecej...\n");
      return "";
}

void
smiech(object kto)
{
    switch (random(5)) 
    {
      case 0 : command("zasmiej"); break;
      case 1 : command("emote smieje sie cicho"); break;
      case 2 : command("powiedz Jest tu cos smiesznego?");
      default:
        command("hmm");
    }
}

void
bardzo_zly(object kto)
{
    command("powiedz Czy wiesz, ze to oznacza smiertelna obraze!!!?");
}

void
zly(object kto)
{
    command("powiedz Nie bedziesz mnie obrazac!!");
}

void
zadowolony(object kto)
{
    int los;

    los = random(40);
    
    switch (los) 
      {
          case 1-10 : command("emote czerwieni sie az po same uszy."); break;
          case 11-20 : command("emote usmiecha sie radosnie."); break;
          case 21-30 : command("pocaluj " + OB_NAME(kto)); break;
          default : zly(kto);
      }
}

public void
wesprzyj(object ob)
{
    if (query_attack())
    {
        return ;
    }
    
    command("wesprzyj " + OB_NAME(ob));
    
    if (query_attack())
    {
        switch(random(5))
        {
            case 0: command("krzyknij Z nami chcesz sie mierzyc?"); break;
            case 1: command("krzyknij Wybrales!"); break;
            case 3: command("krzyknij Twoj wybor!"); break;
            case 4: command("krzyknij Karnos!!"); break;
        }
        return ;
    }
}

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

void
attacked_by(object wrog)
{
    command("krzyknij Formacja!!");
    set_alarm(0.1, 0.0, "pomocy");
    return ::attacked_by(wrog);
}