/* 
 * Kupiec
 */

#include "ellentir.h"

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

#define PRZYMIOTNIKI ({ ({"grubawy", "grubawi"}), ({"brodaty","brodaci"}), \
                        ({"pijany","pijani"}), ({"bogaty","bogaci"}), ({"rubaszny","rubaszni"}) })

#define LICZBA_PRZYMIOTNIKOW 5

void
create_monster()
{
	int i, j;

    jak_pojawiac_sie(" przychodzi.");
    jak_znikac(" odchodzi ulica.");
    jak_znikac_podczas_walki(" ucieka niezdarnie.");           

        set_random_move(200,0);

	ustaw_nazwe(({"kupiec", "kupca", "kupcowi", "kupca",
		"kupcem", "kupcu"}), ({"kupcy", "kupcow",
		"kupcom", "kupcow", "kupcami", "kupcach"}),
		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("Masz od czynienia z czlowiekiem dochodzacym piecdziesiatki. "+
                 "Jego ubranie jest nienagannie czyste, a sakiewka zapewne  "+
                 "pelna. Mowi z nietutejszym akcentem. Jest jednym z wielu "+
		 "kupcow przebywajacych w tych okolicach.\n"); 
	
        ustaw_odmiane_rasy(PL_CZLOWIEK);
	
        add_prop(IMPERIUM_LIVE_I_KREUTZ_CITIZEN, 1);
	add_prop(CONT_I_HEIGHT, 175);
	add_prop(CONT_I_WEIGHT, 85000);

	set_stats(({ 51, 55, 52, 55, 60, 43 }));

        set_skill(SS_WEP_KNIFE,20);
        set_skill(SS_PARRY,20);
        set_skill(SS_DEFENCE,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("NA POMOC !!!! ");
	add_cchat("STRAZ !!! RATUNKU !!!");
	add_cchat("Zostaw mnie! Nie wiesz z kim masz do czynienia!");

        set_alignment(320);

        add_weapon(BRPATH + "sztylet.c");
    
        dodaj_miedz(10+random(20));
        dodaj_srebro(10+random(20));
        dodaj_zloto(random(2));

        set_whimpy(90);    
}

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 Co tez cie tak strasznie rozsmieszylo ?"); break;
      default:
        command("hmm");
    }
}

void
zly(object kto)
{
    command("powiedz A odczep sie ode mnie !");
    command("kopnij " + 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 mruczy: Ach ... Gdyby te dziesiec lat mniej..."); break;
          case 1 : command("emote czerwieni sie."); break;
          case 2 : command("emote mowi: Jestem wystarczajaco bogaty dla nas obojga !"); break;
          case 3 : zly(kto);
        }
      }
}