#pragma strict_types
inherit "/std/monster"; 

#include <ss_types.h>
#include <macros.h>
#include <stdproperties.h>
#include "../definicje.h"
#define TO    this_object()
#define MIECZ "/d/Faerun/examples/bronie/miecz.c"
#define BUTY  "/d/Faerun/examples/zbroje/buty.c"
#define ZBRO "/d/Faerun/examples/zbroje/kolczuga.c"
#define SPOD "/d/Faerun/examples/zbroje/spodnie.c"
#define TARCZA "/d/Faerun/examples/zbroje/tarcza.c"
#define HELM "/d/Faerun/examples/zbroje/helm.c"
string *losowy_przym()
 {
 string *lp;
 string *lm;
 int i;
 lp=({ "opalony"  ,"bialowlosy"  ,"chudy"  ,"gruby"  ,"barczysty" ,
       "stary" ,"kulejacy"});
 lm=({ "opaleni"  ,"bialowlosi"  ,"chudzi" ,"grubi"  ,"barczysci"  ,
       "starzy" ,"kulejacy"});
 i=random(7);

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

 }
string *losowy_przym2()
 {
 string *lp;
 string *lm;
 int i;
 lp=({ "wysoki"  ,"silny"  ,"mlody"  ,"zielonooki"  ,"zamyslony" ,
       "szybki" ,"zreczny"});
 lm=({ "wysocy"  ,"silni"  ,"mlodzi" ,"zielonoocy"  ,"zamysleni"  ,
       "szybcy" ,"zreczni"});
 i=random(7);

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

 } 

void
create_monster()
{
    string *przm = losowy_przym();
    string *przm2 = losowy_przym2();
    dodaj_nazwy(({ "straznik", "straznika", "straznikowi", "straznika", 
    		   "straznikiem", "strazniku" }), ({ "straznicy", 
    		   "straznikow", "straznika", "straznicy", "straznikami",
                   "straznikach" }), PL_MESKI_OS);

    dodaj_nazwy(PL_MEZCZYZNA);
    dodaj_przym( przm[0], przm[1] );		   
    dodaj_przym( przm2[0], przm2[1] );
    set_long("Jest to miejski straznik, mezczyzna niezwyklej sily i "+
    "wytrzymalosci. Wlosy jego skryte sa pod helmem. Czarne oczy swieca "+
    "jakims niezwyklym blaskiem. Rece ma smukle, a twarz harda. W jednej rece "+
    "trzyma miecz a w drugiej tarcze. Skorzane spodnie doskonale pasuja mu "+
    "do podkutych butow. Na kolczudze ma przypieta odznake straznika.\n");
//    ustaw_odmiane_rasy(PL_CZLOWIEK);
    ustaw_odmiane_rasy(({ "straznik", "straznika", "straznikowi", "straznika", 
    		   "straznikiem", "strazniku" }), ({ "straznicy", 
    		   "straznikow", "straznika", "straznicy", "straznikami",
                   "straznikach" }), PL_MESKI_OS);
    set_gender(G_MALE);
    add_prop(LIVE_I_NEVERKNOWN, 1);
    add_prop(CONT_I_WEIGHT, 75000);
    add_prop(CONT_I_HEIGHT, 175);   
    set_skill(SS_DEFENCE,20);
    set_skill(SS_WEP_SWORD,30+random(15));
    set_skill(SS_UNARM_COMBAT, 15 + random(5));
    set_skill(SS_PARRY, 15 + random(10));
    set_skill(SS_SHIELD_PARRY,15+random(10));
    set_stats(({ 30, 30, 30, 20, 20, 30}));
    
    set_chat_time(10);
    add_chat("Witaj, Przybyszu!");
    add_chat("Skad przybywasz?");
    add_chat("Ladna, pogoda, nieprawdaz?");

    set_cchat_time(5);
    add_cchat("A masz!");
    add_cchat("Zginiesz smiercia powolna i bolesna.");
    add_cchat("Za Candlekeep.");

    set_act_time(10);

    set_random_move(50);
    add_weapon(MIECZ);
    add_armour(ZBRO);
    add_armour(BUTY);
    add_armour(SPOD);
    add_armour(TARCZA);
    add_armour(HELM);
    set_restrain_path(({PATH}));
}

void
add_introduced(string imie)
{
    set_alarm(2.0, 0.0, "return_introduce", imie);
}



void
return_introduce(string imie)
{
    object osoba;
    
    osoba = present(imie, environment());

    if (osoba)
        command("powiedz Milo cie poznac, " + osoba->query_wolacz() + ".");
}