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

#include <ss_types.h>
#include <stdproperties.h>
#include <macros.h>
#include "nath.h"

void
create_monster()
{ 
    
    ustaw_imie( ({"irwin", "irwina", "irwinowi", "irwina", "irwinem", 
        "irwinie" }), PL_MESKI_OS);
        
    dodaj_nazwy(({ "karczmarz", "karczmarza", "karczmarzowi",
        "karczmarza", "karczmarzem", "karczmarzu" }), ({ "karczmarze",
        "karczmarzy", "karczmarzom", "karczmarzy", "karczmarzami",
        "karczmarzach" }), PL_MESKI_OS);
    
    
    dodaj_przym("otyly","otyli");
	dodaj_przym("niski", "niscy");

    set_long("Masz przed soba nikiego, grubego barmana o puculowatej twarzy, lysiejacej glowie "+
		"i przerzedzonych wasach. Zywo gestykuluje rozdajac rozkazy sluzbie i kelnerkom, ale sam"+
		"takze obsluguje gosci zrecznie nalewajac trunki i podajac dania. Jest ubrane w koszule z krotkim "+
		"rekawem odslaniajacym jego duze ramiona oraz bialy niegdys fartuch, na ktorym widnieja teraz "+
		"liczne plamy. Przez jedna reke ma przewieszony recznik, ktorym ociera sobie rece i blaty.\n");

    ustaw_odmiane_rasy(PL_CZLOWIEK);
    set_gender(G_MALE);
        
    add_prop(CONT_I_WEIGHT, 70000);
    add_prop(CONT_I_HEIGHT, 165);
    
    set_skill(SS_DEFENCE, 15 + random(10));
    set_skill(SS_UNARM_COMBAT, 20 + random(10));
    set_skill(SS_PARRY, 10 + random(10));
    
    set_stats(({75, 40, 75, 50, 50, 60}));
    
    set_chat_time(25);
    add_chat("Co podac ?");
    add_chat("Slucham bardzo...zyczysz sobie cos ?");
    add_chat("Nieociagac sie!");
    add_chat("Polecam znakomite trunki w najslynijeszych piwnic.");
    
    set_cchat_time(10);
    add_cchat("Straze ! Bija !");
    
    set_act_time(21);
    add_act("emote strofuje kelnerke, ze wylane piwo.");
    add_act("emote rozglada sie po klinteli.");
    add_act("emote usmiecha sie mechanicznie w Twoim kierunku.");
    add_act("emote kloci sie z kims o niezaplacone piwo."); 


    set_default_answer(VBFC_ME("odpowiedz_standardowa"));



}


void
add_introduced(string imie)
{
    set_alarm(2.0,0.0,"return_intro", imie);
}

varargs void 
return_intro(string kto)
{
    command("przedstaw sie " + find_player(kto)->query_real_name(PL_CEL));
}


 
string
odpowiedz_standardowa()
{
     command("emote drapie sie po glowie.");
     command("powiedz Nie mam pojecia o co ci chodzi.");
     return "";
}     

string
query_presentation()
{
    return"Irwin Karczmarz i Gospodarz, czlowiek";
}