inherit "/d/Imperium/std/monster";

#include "tanis.h"

void
create_monster()
{
    if (!IS_CLONE)
      return;

    ustaw_nazwe(({"karczmarz", "karczmarza", "karczmarzowi", "karczmarza", 
    		  "karczmarzem", "karczmarzu"}), 
    		({"karczmarze", "karczmarzy", "karczmarzom", "karczmarzy", 
    		  "karczmarzami", "karczmarzach"}),PL_MESKI_OS);
    
    ustaw_imie(({"Ralf Gross","Ralfa Grossa","Ralfowi Grossowi","Ralfa Grossa","Ralfem Grossem","Ralfowi Grossowi"}),PL_MESKI_OS);
    set_long("Karczmarz jest grubym, opaslym mezczyzna. "
             + "Ma na sobie brudny, poplamiony fartuch, kiedys prawdopodobnie bialy. "
             + "Wyglada na ociezalego i wiecznie znudzonego czlowieka, "
             + "ktoremu niespecjalnie zalezy na klientach.\n"); 
    
    ustaw_odmiane_rasy(PL_MEZCZYZNA);

    dodaj_przym(({"spocony","opasly"}),({"spoceni","opasli"}));
    set_gender(G_MALE);
    
    add_prop(LIVE_I_NEVERKNOWN, 1);
    add_prop(LIVE_I_NO_CORPSE, 1);
    
    add_prop(CONT_I_WEIGHT, 70000);
    add_prop(CONT_I_HEIGHT, 185);
    
    set_skill(SS_DEFENCE, 15 + random(10));
    set_skill(SS_UNARM_COMBAT, 20 + random(10));
    set_skill(SS_PARRY, 10 + random(10));
    
    set_stats(({45, 38, 70, 41, 35, 60}));
    
    set_chat_time(12);
    add_chat("Ktos czegos chce ?");
    
    set_act_time(15);
    add_act("emote szacuje cie wzrokiem.");
    add_act("emote wyciera blat brudna scierka.");
    add_act("emote przyglada sie lakomie twojej sakiewce.");
    add_act("emote oblizuje sie.");
}

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, "zly", wykonujacy);
    }
}

void
add_introduced(string imie)
{
    set_alarm(2.0, 0.0, "return_introduce", find_player(imie));
}

void
return_introduce(object kto)
{
	
    if (kto) command("przedstaw sie");
}
string
query_presentation()
{
     return "Ralf Gross, wlasciciel najlepszej karczmy w miescie!";
}
void
return_laugh(object kto) 
{
    switch (random(5)) 
    {
      case 0 : command("zasmiej"); break;
      case 1 : command("emote rechocze glosno."); break;
      case 2 : command("powiedz he, he, he ...."); break;
      default:
        command("hmm");
    }
}

void
zly(object kto)
{
    command("powiedz Wynos sie !");
    command("opluj " + OB_NAME(kto));
}