/*
 * Nazwa pliku: dziewka_2.c
 * Autor:	Kylo
 * Data:	17.11.97
 * Last Update:	17.11.97
 * Opis:	Dziewka zajazdu Czarny Kon
 */

#include "local.h"

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

// I nie tylko tego
inherit LPATH + "monster_quest.c";

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

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

void  
create_monster()
{
    ustaw_shorty(({"otyla dziewka", "otylej dziewki", "otylej dziewce",
    "otyla dziewke", "otyla dziewka", "otylej dziewce"}),
    ({"otyle dziewki", "otylych dziewek", "otylym dziewkom",
    "otyle dziewki", "otylymi dziewkami", "otylych dziewkach"}),
    PL_ZENSKI);
    ustaw_nazwe(({"dziewka", "dziewki", "dziewce",
    "dziewke", "dziewka", "dziewce"}),
    ({"dziewki", "dziewek", "dziewkom",
    "dziewki", "dziewkami", "dziewkach"}),
    PL_ZENSKI);
    // Ustalenie odmiany imienia
/*    ustaw_nazwe(({"oliwia", "oliwi", "oliwi", "oliwie",
        "oliwia", "oliwi"}),
        ({"oliwie", "oliwi", "oliwiom", "oliwie",
        "oliwiami", "oliwiach"}),
	PL_ZENSKI);
 */
    
    // Dodanie przymiotnika
    dodaj_przym("otyly","otyli");
    dodaj_przym("niski","niscy");
    
    // Ustalenie dlugiego opisu
    set_long("Okolo 35-letnia kobieta raczej niska i do tego po prostu gruba, " +
	"ociezale przemieszcza sie od stolu do stolu obslugujac gosci. " +
        "Krotkie kosmyki czarnych wlosow wystaja spod zalozonego czepka, " +
	"jej twarz jest pospolita bez zadnych charakterystycznych cech." +
	"\n");
	
    // Ustalenie odmiany rasy
    ustaw_odmiane_rasy(PL_CZLOWIEK);

    // Ustalenie rasy			                                                           
    set_gender(G_FEMALE); 
    
    // Ustalenie podstawowych cech i wspolczynnikow
    set_stats(({35,36,40,42,32,31}));
    set_hp(250);
    
    // Ustalenie rozmiarow Albrechta
    add_prop(CONT_I_WEIGHT,99500);
    add_prop(CONT_I_HEIGHT,155);
    
    // Ustalenie umiejetnosci
    set_skill(SS_DEFENCE, 5);
    set_skill(SS_PARRY, 5);
    set_skill(SS_WEP_KNIFE, 5); 
    set_skill(SS_UNARM_COMBAT, 10);
    
    // Ustalenie czestotliwosci wypowiedzi   
    set_cact_time(7);
    // Ustalenie czestotliwosci wykonywanych akcji 
    set_act_time(40);
    
    // Ustalenie wykonywanych akcji
    add_act("emote podaje zamowione potrawy.");
    add_act("emote z trudem przeciska sie kolo stolu.");
    add_act("emote odchodzi w rog sali.");
    add_act("emote stawia na sasiednim stole dwa kufle piwa.");
    
    // Ustalenie wypowiedzi kuchcika
    add_chat("Zaraz podam.");
    add_chat("Co sie glupio usmiechasz?");
    add_chat("Ciszej tam bo zawolam wlasciciela.");
    add_chat("Niestety nie podajemy tego u nas.");
    
    // Ustalenie wypowiedzi podczas walki
    add_cact("krzyknij Ratunku!");
    add_cact("krzyknij RAAAATUNKUUU!!");
    add_cact("krzuknij Pomocy! Pomocy!");
    add_cact("krzyknij Bezbronna kobieta bijesz!");
    add_cact("krzyknij Nie dostaniesz mnie tak latwo!");

    add_reakcja( ({"medalion"}),({
        1.5,"emote zastanawia sie. ",
        2.5,"Nie moge ci pomoc, nie pamietam kiedy widzialam " +
            "medalion poraz ostatni. ",
        1.5,"emote wraca do pracy. " }) );
    add_reakcja( ({"konia","czarnego konia"}), ({
        1.4,"To ulubione zwierze wlasciciela. ",
        0.5,"emote usmiecha sie. ",
        1.2,"Ma na jego punkcie chopla. ",
        0.5,"Myslicie ze skad sie wziela nazwa tego zajazdu. ",
        0.6,"Ha ! Wlasnie ! " }) );
       
    // Ustalenie domyslnej odpowiedzi
    set_default_answer("Prosze porozmawiac o tym z wlascicielem. ");
    ustaw_odzywki("Pomoz mi !!!",2);
    ustaw_odzywki("Podstepna bestia z ciebie.",3);
    ustaw_odzywki("Pomuz mi !!!",4);
    ustaw_odzywki("Podstepna bestia z ciebie.",5);
    
    dodaj_miedz(121+random(23));
    dodaj_srebro(5+random(8));

}
// koniec funkcji create_monster()

int 
czy_mozna()
{
   if (this_player()->query_prop("_kylo_i_quest_zajazd"))
       return 1;
   if (Reakcja_Nr==2)
       return 1;
   command_say("Prosze porozmawiac na ten temat z wlascicielem. ",this_player());
   return 0;
}

/*
 * 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));
}
// koniec funkcji zapoznanie()