#pragma strict_types
inherit "/std/monster.c";

#include <macros.h>
#include <stdproperties.h>
#include <money.h>
#include <ss_types.h>
#include "../definicje.h"
string *losowy_przym()
 {
 string *lp;
 string *lm;
 int i;
 lp=({ "opalony"  ,"bialowlosy"  ,"chudy"  ,"wesoly"  ,"usmiechniety" ,
       "wredny" ,"kulejacy"});
 lm=({ "opaleni"  ,"bialowlosi"  ,"chudzi" ,"weseli"  ,"usmiechnieci"  ,
       "wredni" ,"kulejacy"});
 i=random(7);

 return ({ lp[i] , lm[i] });

 }
string *losowy_przym2()
 {
 string *lp;
 string *lm;
 int i;
 lp=({ "wysoki"  ,"piekny"  ,"mlody"  ,"zielonooki"  ,"zamyslony" ,
       "smukly" ,"nawiedzony"});
 lm=({ "wysocy"  ,"piekni"  ,"mlodzi" ,"zielonoocy"  ,"zamysleni"  ,
       "smukli" ,"nawiedzeni"});
 i=random(7);

 return ({ lp[i] , lm[i] });

 } 

void
create_monster()
{
    string *przm = losowy_przym();
    string *przm2 = losowy_przym2();
    ustaw_odmiane_rasy(PL_KOBIETA);
    set_gender(G_FEMALE);   
    set_restrain_path(({PATH}));
    set_long("Jest to szczupla kobieta sredniego wzrostu. Jej krotko sciete "+
    "wlosy stercza na wszystkie strony. Twarz ma nieco przybrudzona. Jej "+
    "pelne glebi oczy swieca sie wesolo. Gdy sie usmiecha to mozna zuwazyc "+
    "ze ma bardzo piekne biale zeby. Ma na sobie spodnice oraz kaftanik i "+
    "skurzane buty.\n");
    dodaj_przym( przm[0], przm[1] );		   
    dodaj_przym( przm2[0], przm2[1] );    
    set_act_time(10);
    add_act("emote rozglada sie wokol z wesolym wyrazem wymalowanym" +
        "twarzy.");
    add_act("emote podskakuje wesolo.");
    add_act("emote przymyka oczy i wygwizduje wesola melodie.");
    
    set_cchat_time(10);
    add_cchat("Ty gnido! Jak smiesz atakowac taka slaba kibiete jak ja.");
    add_cchat("Ty zawszony psie tylko powietrze zatuwasz!");
    add_cchat("A masz! Popamietasz co to znaczy plec piekna!");
    add_cchat("Za grosz poczucia estetyki, gustu, delikatnosci... Rzygac mi " +
	"sie chce!");
    
    set_chat_time(10);
    add_chat("Czy nie widziales zlotko tu gdzies ktoregos z moich przyjaciol ?");
    add_chat("Kocha, nie kocha, kocha, nie kocha, kocha...");
    add_chat("Ci kaplani to niznajda nigdy czasu dla milej dziewki !");
    set_stats ( ({ 15,14 ,15, 15, 15, 15 }) );    
    add_prop(LIVE_I_NEVERKNOWN, 1);    
    add_prop(CONT_I_WEIGHT, 61000); 
    add_prop(CONT_I_VOLUME, 62000); 
    add_prop(CONT_I_HEIGHT, 175);    
    set_random_move(25);
}