/* Lowca nagrod ( z Nuln ) */

#include "tanis.h"

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

#define PRZYMIOTNIKI ({({"wysoki", "wysocy"}), ({"ostrozny", "ostrozni"}), \
                       ({"opanowany", "opanowani"}), ({"muskularny", "muskularni"}) })
#define LICZBA_PRZYMIOTNIKOW 4

void
create_monster()
{
    int i,j;
    
    jak_pojawiac_sie(" nadchodzi.");
    jak_znikac(" odchodzi bacznie rozgladajac sie na boki.");
    jak_znikac_podczas_walki(" wycofuje sie na z gory upatrzone pozycje i szybko znika "
          + "w oddali.");
    
        ustaw_nazwe(({"lowca", "lowcy", "lowcy", "lowce", "lowca", "lowcy"}),
                       ({"lowcy", "lowcow", "lowcom", "lowcow", "lowcami",
                       "lowcach"}), PL_MESKI_OS);

        ustaw_odmiane_rasy(PL_CZLOWIEK);
    set_gender(G_MALE);

    add_prop(LIVE_I_NEVERKNOWN,1);

        add_prop(CONT_I_WEIGHT, 90000);
        add_prop(CONT_I_HEIGHT, 185);

    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_random_move(180,0); 

    set_long("Czlowiek ubrany jest w solidne, skorzane ubranie. "
           + "Jest wysoki i wyglada na bardzo silnego. Porusza sie powoli, jakby "
           + "leniwie, jednak sprawia wrazenie, ze moze sie poruszac "
           + "bardzo szybko i sprawnie. Ma ogorzala, poznaczona "
           + "bliznami twarz. Wyglada na lowce nagrod.\n");

        set_stats(({65,65,55,45,45,65}));

        set_skill(SS_PARRY,14);
        set_skill(SS_WEP_SWORD, 20 + random(20));
        set_skill(SS_DEFENCE, 20 + random(5));

        add_prop(IMPERIUM_LIVE_I_KREUTZ_CITIZEN, 1);



        set_cact_time(4);
        add_cact("emote mowi: Za twoja glowe na pewno jest jakas nagroda.");
        add_cact("emote sapie: Jestes godnym przeciwnikiem.");
        add_cact("emote krzyczy: Straz !! Straz !!");
        add_cact("emote warczy: Gin, psie !!");

        set_act_time(21 + random(20));
        add_act("emote wola: Strzezcie sie ! Kiedys i za wasze glowy bedzie jakas nagroda !");
        add_act("emote przeglada list goncze, porownujac cie z podobiznami bandytow.");        
        add_act("emote mruczy pod nosem: On gdzies tu musi byc ...");
        add_act("emote mowi: Czy ja cie juz gdzies nie widzialem .. Hmm ..");
        add_act("emote mruczy: I kto by pomyslal, ze w takim miasteczku znajde "
                + "takie typy.");

     add_weapon(BRPATH + "miecz_lowcy.c");
     add_armour(ZBRPATH + "plaszcz_lowcy.c");
 
   dodaj_zloto(random(2));
   dodaj_srebro(10+random(50));
   dodaj_miedz(25);

   set_whimpy(40);
}

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;
      default:
        command("hmm");
    }
}

void
zly(object kto)
{
    command("powiedz Wlasnie " + kto->koncowka("znalazles","znalazlas") + " sie na mojej liscie !");
    command("zabij " + OB_NAME(kto));
}

void
dobry(object kto) 
{
    int los;

    if(kto->koncowka("chlop","baba")=="chlop") zly(kto);
    else
      {
        los = random(4);
    
        switch (los) 
        {
          case 0 : command("emote mowi: Phi !"); break;
          case 1 : command("emote czerwieni sie lekko."); break;
          case 2 : command("emote mowi: No coz, sa i takie ..."); break;
          case 3 : zly(kto);
        }
      }
}