/* Zwykly mieszkaniec Kreutzhofen */

#include "tanis.h"

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

#define PRZYMIOTNIKI ({ ({"podstarzaly","podstarzali"}), ({"mlody","mlodzi"}), ({"sedziwy","sedziwi"}), \
                        ({"przygruby","przygrubi"}), ({"wychudly", "wychudli"}), ({"potezny","potezni"}), \
                        ({"umiesniony","umiesnieni"}), ({"muskularny","muskularni"}), ({"cherlawy","cherlawi"}), \
                        ({"wysoki","wysocy"}), ({"niski","niscy"}), ({"niewysoki","niewysocy"}), \
                        ({"przystojny","przystojni"}), ({"ohydny","ohydni"}), ({"niebrzydki","niebrzydcy"}), \
                        ({"dlugoreki","dlugorecy"}), ({"dlugonogi","dlugonodzy"}), ({"przygarbiony","przygarbieni"}), \
                        ({"blady","bladzi"}), ({"opalony","opaleni"}), ({"opalony","opaleni"}), \
                        ({"jasnowlosy","jasnowlosi"}), ({"ciemnowlosy","ciemnowlosi"}), ({"lysy","lysi"}), \
                        ({"smutny","smutni"}), ({"przyjacielski","przyjacielscy"}), ({"roztargniony","roztargnieni"}) })

#define LICZBA_PRZYMIOTNIKOW 27

void
create_monster()
{
    int i,j;
    
    jak_pojawiac_sie(" przybywa.");
    jak_znikac(" odchodzi spokojnie.");
    jak_znikac_podczas_walki(" ucieka.");
    
        ustaw_nazwe(({"mieszczanin", "mieszczana", "mieszczanowi", "mieszczana", "mieszczanem", "mieszczanie"}),
                       ({"mieszczanie", "mieszczan", "mieszczanom", "mieszczan", "mieszczanami",
                       "mieszczanach"}), PL_MESKI_OS);

    ustaw_odmiane_rasy(PL_CZLOWIEK);
    set_gender(G_MALE);

    add_prop(LIVE_I_NEVERKNOWN,1);

        add_prop(CONT_I_WEIGHT, 100000);
        add_prop(CONT_I_HEIGHT, 170);


    i = random(LICZBA_PRZYMIOTNIKOW);
    j = random(LICZBA_PRZYMIOTNIKOW);
    while(!(j>(i+2) || j<(i-2)) ) j = random(LICZBA_PRZYMIOTNIKOW);
   
    dodaj_przym(PRZYMIOTNIKI[i][0], PRZYMIOTNIKI[i][1]);
    dodaj_przym(PRZYMIOTNIKI[j][0], PRZYMIOTNIKI[j][1]);
    
    set_random_move(250,0); 

    set_long("Widzisz typowego mieszkanca tego miasta. Jego stroj, na ktory "+
             "skladaja sie skorzane buty, spodnie, pas i kamizela stnowia  "+
             "zloty srodek miedzy elegancja a wygoda. Nie wydaje ci sie "+
             "zeby powodzilo im sie tu szczegolnie zle.\n");

        set_stats(({45,45,45,45,45,45}));

        set_skill(SS_PARRY,10);
        set_skill(SS_WEP_KNIFE, 12 + random(20));
        set_skill(SS_DEFENCE, 15 + random(5));

        add_prop(IMPERIUM_LIVE_I_KREUTZ_CITIZEN, 1);

        set_cact_time(4);
        add_cact("emote mowi: Doigrales sie !");
        add_cact("emote sapie: I tak sobie z toba poradze !");
        add_cact("emote krzyczy: Straz !! Straz !!");
        add_cact("emote warczy: Nie wart nawe wzywac strazy na ciebie !");

        set_act_time(21 + random(20));
        add_act("emote pyka sobie fajeczke.");
        add_act("emote rozglada sie za okazja na latwy zarobek.");        
        add_act("emote wysmiewa sie z degeneracji szlachty.");
        add_act("emote mowi: Czy my sie nie znamy ?");
        add_act("emote grzebie w kieszeni.");

    set_alignment(350);
    set_whimpy(50);  

    add_weapon(BRPATH + "noz.c");
 
   dodaj_srebro(10+random(10));
   dodaj_miedz(10+random(25));
}

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 radosnie."); break;
      case 2 : command("powiedz Cicho ! To nie las !"); break;
      default:
        command("hmm");
    }
}

void
zly(object kto)
{
    command("powiedz Co ty sobie wogole wyobrazasz ?!");

    command("szturchnij " + 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 caly czerwony rozglada sie ostroznie."); break;
          case 1 : command("emote czerwieni sie."); break;
          case 2 : command("emote mowi: Wiesz, mam niedaleko stad przytulna chalupe ..."); break;
          case 3 : zly(kto);
        }
      }
}