/* Flisak */

#include "tanis.h"

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

#define PRZYMIOTNIKI ({({"podchmielony", "podchmieleni"}), ({"zarosniety", "zarosnieci"}), \
                ({"dlugoreki", "dlugorecy"}), ({"nieokrzesany", "nieokrzesani"}), \
                ({"potezny","potezni"})})

#define LICZBA_PRZYMIOTNIKOW 5

void
create_monster()
{
        int i, j;

    jak_pojawiac_sie(" nadchodzi zataczajac sie.");
    jak_znikac(" ochodzi kolyszac sie na boki.");
    jak_znikac_podczas_walki(" ucieka zataczajac sie.");

        set_random_move(50,0);

        ustaw_nazwe(({"flisak", "flisaka", "flisakowi", "flisaka",
                "flisakiem", "flisaku"}), ({"flisacy", "flisakow",
                "flisakom", "flisakow", "flisakami", "flisakach"}), 
                PL_MESKI_OS);
                
    add_prop(LIVE_I_NEVERKNOWN,1);
    
        set_long("Flisak jest silnym, wysokim mezczyzna. Jest podchmielony i "
           + "ogolnie sprawia wrazenie, jakby wlasnie przechulal miesieczna pensje. "
           + "Jest ubrany w szerokie spodnie i skorzana kamizelke. Na glowie "
           + "ma czerwona chuste, spod ktorej wystaja kosmyki brazowych "
           + "wlosow. Rysy jego twarzy zdradzaja tileanskie pochodzenie.\n");
                
        
        ustaw_odmiane_rasy(PL_CZLOWIEK);
        set_gender(G_MALE);        
        i = random(LICZBA_PRZYMIOTNIKOW);
        j = random(LICZBA_PRZYMIOTNIKOW - 1);
        if(j >= i)
          ++j;
        dodaj_przym(PRZYMIOTNIKI[i][0], PRZYMIOTNIKI[i][1]);
        dodaj_przym(PRZYMIOTNIKI[j][0], PRZYMIOTNIKI[j][1]);
        
        set_stats(({40+random(20), 30+random(20), 45+random(30), 35, 35, 25+random(30)}));
        
        set_skill(SS_DEFENCE, 20 + random(5));
        set_skill(SS_UNARM_COMBAT, 20 + random(5));
        set_skill(SS_SWIM, 25);
        set_skill(SS_PARRY, 15 + random(4));
        set_skill(SS_WEP_CLUB, 20 + random (8));

        add_prop(IMPERIUM_LIVE_I_KREUTZ_CITIZEN, 1);
        
        add_prop(CONT_I_WEIGHT, 95000);
        add_prop(CONT_I_HEIGHT, 185);
        
        set_cact_time(8);
        set_act_time(23 + random(20));
        
        
        add_cact("emote wola: Spadaj ! I tak jestem silniejszy !");
        add_cact("emote mowi: Ha ! Zaraz uciekniesz gdzie pieprz rosnie !");
        add_cact("emote zatacza sie.");
        
        add_act("emote spoglada tesknie do pustej butelki przy pasie.");
        add_act("emote rozglada sie za kims chetnym do bitki.");
        add_act("emote zatacza sie, prawie upadajac.");
        add_act("emote wzdycha: Ach ... Koniec wina.");
        add_act("emote jeczy: Czy nie ma ktos odrobiny wina ?");
        add_act("emote mruczy: Zaraz, zaraz ... Gdzies tutaj byl port ...");
        add_act("emote mowi: Jutro bedzie burza, lepiej nie wyplywac w taka pogode.");
        
    add_weapon(BRPATH + "palka.c"); 
    
    set_whimpy(50);    

    dodaj_srebro(10+random(15));
    dodaj_miedz(20+random(20));
}    

void
emote_hook(string emote, object wykonujacy, string przyslowek)
{
    switch (emote)
    {
        case "kopnij": 
        case "spoliczkuj" :
        case "szturchnij":
        case "opluj" : set_alarm(2.0, 0.0, "zly", wykonujacy);
        	    break;
        	    
        case "zasmiej": set_alarm(2.0, 0.0, "return_laugh", wykonujacy);
        	      break;
        case "pocaluj":
        case "przytul": set_alarm(2.0, 0.0, "dobry", wykonujacy);
    }
}

void
return_laugh(object kto) 
{
    switch (random(5)) 
    {
      case 0 : command("zasmiej"); break;
      case 1 : command("emote rechocze pijacko."); break;
      case 2 : command("powiedz eee .. z czego sie smiejesz ?"); break;
      default:
        command("hmm");
    }
}

void
zly(object kto)
{
    command("powiedz Jak smiesz ! Zaraz mnie bedziesz przepraszac !");
    command("zabij " + OB_NAME(kto));

}

void
dobry(object kto) 
{
    int los;
    
    if(kto->koncowka("chlop","baba")=="chlop") zly(kto);
    else
      {
        los = random(5);
    
        switch (los) 
        {
          case 0 : command("emote patrzy sie blednym wzrokiem wokolo."); break;
          case 1 : command("emote robi sie jeszcze bardziej czerwony niz w tej chwili."); break;
          case 2 : command("emote mowi: Eeep ! Napijesz sie ze mna malutka ?"); break;
          case 3 : command("pocaluj " + OB_NAME(kto));
          case 4 : zly(kto);
        }
      }
}