/*
 * Nazwa pliku: kleofas.c
 * Autor:	Kylo
 * Data:	14.11.97
 * Last Update:	14.11.97
 * Opis:	Kleofas - Kucharz zajazdu Czarny Kon
 */

#include "local.h"

// Dziedziczenie standartowego ncpa Imperium
inherit "/d/Imperium/std/monster.c"; 

// Dziedziczenie pliku questowego
inherit LPATH + "monster_quest.c";

// Dolaczenie pliku naglowkowego
#include "kleofas.h"

/*
 * Nazwa funkcji: create_monster()
 * Opis:	  Inicjalizacja glownej funkcji ncp'a
 * Argumenty:	  Brak
 * Zwraca:	  Nic nie zwraca
 */

void  
create_monster()
{
    // Ustalenie odmiany imienia
    ustaw_shorty(({"gruby kucharz", "grubego kucharza", "grubemu kucharzoiw",
        "grubego kucharza", "grubym kucharzem", "grubym kucharzu"}),
        ({ "grubi kucharze", "grubych kucharzy", "grubym kucharzom",
         "grubych kucharzy", "grubymi kucharzami", "grubych kuczarzach" }),
         PL_MESKI_OS);
    ustaw_nazwe(({"kucharz", "kucharza", "kucharzoiw",
        "kucharza", "kucharzem", "kucharzu"}),
        ({ "kucharze", "kucharzy", "kucharzom",
         "kucharzy", "kucharzami", "kuczarzach" }),
         PL_MESKI_OS);
/*    ustaw_nazwe(({"kleofas","kleofasa","kleofasowi","kleofasa",
	"kleofasem","kleofasie"}),
	 ({"kleofasy","kleofasow","kleofasom","kleofasow",
	"kleofasami","kleofasach"}), PL_MESKI_OS);
 */
    
    // Dodanie przymiotnika
    dodaj_przym("gruby","grubi");
    dodaj_przym("niski","niscy");
    
    // Ustalenie dlugiego opisu
    set_long("Gruby niski osobnik wygladajacy na okolo 40 lat, " +
	"kreci sie po calej kuchni dogladajac przygotowywanych potraw. " +
        "Co chwile ktoreja proboje i ewentualnie doprawia. Jego okragla " +
	"tlusta twarz przypomina troche glowe prosiaka, wlasciwie cala " +
	"postac przypomina dobrze wypasionego wieprzyka. Tylko poco swini " +
	"bialy fartuch. " +
	"\n");
	
	
    // Ustalenie odmiany rasy
    ustaw_odmiane_rasy(PL_CZLOWIEK); 

    // Ustalenie rasy			                                                           
    set_gender(G_MALE); 
    
    // Ustalenie podstawowych cech i wspolczynnikow
    set_stats(({50,52,45,46,46,52}));
    
    // Ustalenie rozmiarow Albrechta
    add_prop(CONT_I_WEIGHT,121500);
    add_prop(CONT_I_HEIGHT,160);
    
    // Ustalenie umiejetnosci
    set_skill(SS_DEFENCE, 20);
    set_skill(SS_PARRY, 5);
    set_skill(SS_WEP_KNIFE, 60); 
    set_skill(SS_UNARM_COMBAT, 20);
    
    // Ustalenie czestotliwosci wypowiedzi   
    set_chat_time(15);
    // Ustalenie czestotliwosci wykonywanych akcji 
    set_act_time(40);
    
    // Ustalenie wykonywanych akcji
    add_act("emote miesza zupe w garku.");
    add_act("emote proboje jednej z potraw.");
    add_act("emote przyprawia jakas potrawe.");
    add_act("emote proboje potrawy i cmoka z zadowoleniem.");
    add_act("emote sypie nieco soli do garka.");
    
    // Ustalenie wypowiedzi Albrechta
    add_chat("Posyp majerankiem kurczka chlopcze.");
    add_chat("Szybciej kroj te warzywa.");
    add_chat("Postaw tu ten garnek.");
    add_chat("Podaj mi bazylie.");
    add_chat("Przestaw ten rondel na bok.");
    
    // Ustalenie wypowiedzi podczas walki
    add_cchat("Ratunku!");
    add_cchat("RAAAATUNKUUU!!");
    add_cchat("Pomocy! Pomocy!");
    add_cchat("A MASZ!!!");
    add_cchat("Zeby tak starego szlowieka traktowac.");
    
    // Ustalenie domyslnej odpowiedzi
    set_default_answer("Wyjdz stad, przeszkadzasz mi.");
    
    add_reakcja( ({"konia","czarnego konia"}), ({
        0.9,"hmm",
        1.8,"Nazwa zajazdu wziela sie od konia wlasciciela. ",
        1.2,"Dobra jak kazda inna. ",
        1.3,"Kiedys zajazd nazywal sie inaczej. ",
        1.5,"Przyszedl nowy wlasciciel i nazwa sie zmienila. ",
        1.2,"emote zamysla sie na chwilke. ",
        2.5,"Zreszta to juz hisoria, a ja musze wracac do pracy. ",
        1.5,"emote odchodzi zamieszac zupe. " }) );
    add_reakcja( ({"medalion"}),({
        0.5,"Co zgubil go ?",
        1.4,"A jeszcze kilka godzin temu widzialem go. ",
        1.5,"No coz, nie sadze abys znalazl go tutaj. ",
        1.2,"W kuchni raczej go nie zostawil. ",
        1.3,"Ale jak chcesz mozesz sie rozejrzec. " }) );

    dodaj_miedz(5+random(12));
}

int
czy_mozna()
{
    if ((!this_player()->query_prop("_kylo_i_quest_zajazd")) && (Reakcja_Nr==2))
    {
        command_say("Wyjdz stad, przeszkadzasz mi. ",this_player());
        return 0;
    }
    return 1;
}
// koniec funkcji create_monster()

/*
 * Nazwa funkcji: add_introduced()
 * Opis:	  Funkcja wywolywana gdy ktos w pomiszczeniu sie przedstawi
 * Argumenty:	  Imie gracza ktory sie przedstawil
 * Zwraca:	  Nic nie zwraca
 */
  
void 
add_introduced(string imie)
{
//    set_alarm(2.0, 0.0, "zapoznanie", find_player(imie));
}
// koniec funkcji add_introduced

/*
 * Nazwa funkcji: zapoznanie()
 * Opis:	  Reakcja ncp'a na przedstawienie sie
 * Argumenty:	  gracz ktory sie przedstawil
 * Zwraca:	  Nic nie zwraca
 */
 
void
zapoznanie(object gracz)
{
    command("powiedz Witaj panie. ");
    command("przedstaw sie " + gracz->query_real_name(PL_CEL));
    command("powiedz A teraz wyjdz stad i nie przeszkadzaj mi, " +
	"jestem zajety.");
}
// koniec funkcji zapoznanie()