inherit "/std/act/action";
inherit "/std/monster.c";
#include <filter_funs.h>
#include <macros.h>
#include <stdproperties.h>
#include <money.h>
#include <ss_types.h>
#include <wa_types.h>

string *losowy_przym()
 {
 string *lp;
 string *lm;
 int i;
 lp=({ "wesoly"  ,"zaciekawiony"  ,"znuzony"  ,"chytry"  ,"smierdzacy"  ,"gruby" ,"mily"});
 lm=({ "weseli"  ,"zaciekawieni"  ,"znuzeni" ,"chytrzy"  ,"smierdzacy"  ,"grubi" ,"mili"});
 i=random(7);
 return ({ lp[i] , lm[i] });
 }

 string *losowy_przym2()
 {
 string *lp2;
string *lm2;
 int j; 
 lp2=({"czarnowlosy"  ,"zielonooki"  ,"zarosniety"  ,"lysy"  ,"dlugonosy"  ,"blady"  ,"grozny"});
 lm2=({"czarnowlosi"  ,"zielonoocy"  ,"zarosnieci"  ,"lysi"  ,"dlugonosi"  ,"bladzi"  ,"grozni"});
 j = random(7);
 return ({lp2[j],lm2[j]});
 } 

void
create_monster()
{
   string *przm = losowy_przym();
   string *przm2 = losowy_przym2();
   ustaw_odmiane_rasy(PL_MEZCZYZNA);

    set_long("Mieszczanie to ludzie, ktorzy nie maja nic ciekawego do roboty. "+
"Walesaja sie po calym miescie bez celu szukajac latwego pieniadza. "+
"Zaczepiaja podroznych, choc robia to tylko z nudow przebywanie wciaz "+  
"slumsow oraz dzielnice portowa choc czasem zapuszczaja "+
"w tym samym miescie jest troche nuzace. Czesto udaja wazniakow. "+
"Ich ubior jest bardzo charakterystyczny, bez problemu mozna ich "+
"rozpoznac. Ubrani w obcisle, zazwyczaj ciemne spodnie i luzna, "+
"podobna do spodni koszule. Sporadycznie ktorys z nich pojawia sie w "+
"jakims nakryciu glowy, lecz zdarza sie to rzadko.\n");

    set_act_time(10);
    add_act("emote usmiecha sie wesolo.");
    add_act("emote patrzy na ciebie z zaciekawieniem.");
    add_act("emote wsadza reke do kieszeni poczym wyjmuje klka monet.");
    add_act("emote zastanawia sie gdzie teraz pojsc.");
    MONEY_MAKE_CC(random(10))->move(this_object());  

    add_act("'Jak Ci sie podoba w swiecie wizarda");
    add_act("'Uwazaj na zlodzieji cienia sa niemal wszedzie.");

    set_cchat_time(10);
    add_cchat("Ratunkuuu!Mordercaaaaa!");
    add_cchat("Czemu mnie bijesz? Nic nie mam przecierz.");
    add_cchat("Zostaw mnie nikczemniku");
    set_chat_time(10);

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

    set_skill(SS_UNARM_COMBAT, 11);

    add_prop(LIVE_I_NEVERKNOWN, 1);
    dodaj_przym( przm[0], przm[1] );
    dodaj_przym( przm2[0], przm2[1] );
    add_prop(CONT_I_WEIGHT, 5000); 
    add_prop(CONT_I_VOLUME, 5000); 
    add_prop(CONT_I_HEIGHT, 40);

}