/* 
 * Handlarz
 */

#include "tanis.h"

inherit "/d/Imperium/std/monster.c";

#define PRZYMIOTNIKI ({ ({"niewysoki", "niewysocy"}), ({"gadatliwy","gadatliwii"}), \
                        ({"gruby","grubi"}), ({"prosty","prosci"}), ({"wesoly","weseli"}), \
                        ({"jasnowlosy","jasnowlosi"}), })

#define LICZBA_PRZYMIOTNIKOW 6

void
create_monster()
{
	int i, j;

    jak_pojawiac_sie(" przychodzi.");
    jak_znikac(" odchodzi powoli ulica.");
    jak_znikac_podczas_walki(" ucieka pospiesznie.");              

        set_random_move(200,0);

	ustaw_nazwe(({"handlarz", "handlarza", "handlarzowi", "handlarza",
		"handlarzem", "handlarzu"}), ({"handlarze", "handlarzy",
		"handlarzom", "handlarzy", "handlarzami", "handlarzach"}),
		PL_MESKI_OS);

        set_gender(G_MALE);
        add_prop(LIVE_I_NEVERKNOWN,1);		
	i = random(LICZBA_PRZYMIOTNIKOW);
	j = random(LICZBA_PRZYMIOTNIKOW - 1);
	if(j >= i)
	  ++j;
 	dodaj_przym(PRZYMIOTNIKI[i][0], PRZYMIOTNIKI[i][0]);
	dodaj_przym(PRZYMIOTNIKI[j][0], PRZYMIOTNIKI[j][1]);

	set_long("Jest to niewysoki, podstarzaly mezczyzna. Mimo, ze jest raczej gruby, "
                 + "nie jest brzydki i sprawia sympatyczne wrazenie. Nosi skorzane ubranie, "
                 + "i sprzedaje rozne miejscowe wyroby.\n"); 
	
        ustaw_odmiane_rasy(PL_CZLOWIEK);
	
        add_prop(IMPERIUM_LIVE_I_KREUTZ_CITIZEN, 1);
	add_prop(CONT_I_HEIGHT, 170);
	add_prop(CONT_I_WEIGHT, 80000);

	set_stats(({ 48, 47, 45, 40, 42, 43 }));

        set_skill(SS_WEP_POLEARM,20);
	
	set_act_time(8 + random(25));
	set_cchat_time(7);
	

	add_act("emote rozglada sie po ulicy.");
	add_act("emote mruczy: Malo klientow, oj malo !");
        add_act("emote zaczyna targowac sie zawziecie z jakims klientem.");
	add_act("emote nachyla sie w strone jakiegos jegomoscia, cos mu pokazujac.");
		
	add_cchat("RATUNKU !!!! ");
	add_cchat("MORDUJA !!! STRAZ !!");
	add_cchat("Przestan natychmiast !");

        set_alignment(320);

        add_weapon(BRPATH + "kij.c");
    
        dodaj_miedz(50+random(20));
        dodaj_srebro(random(20));

        set_whimpy(55);    
}

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 smieje sie glosno."); break;
      case 2 : command("powiedz nie przeszkadzaj mi w pracy !"); break;
      default:
        command("hmm");
    }
}

void
zly(object kto)
{
    command("powiedz Nie obrazaj mnie !");

    command("opluj " + 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 nie przeszkadzaj mi w interesach !"); break;
          case 1 : command("emote zakrywa twarz usilujac ukryc zmieszanie."); break;
          case 2 : command("emote mowi: Czy spotkamy sie jeszcze ?"); break;
          case 3 : zly(kto);
        }
      }
}