inherit "/d/Imperium/std/monster.c";
#include "local.h"

create_monster()
{

 ustaw_imie(({"richard","richarda","richardowi","richarda","richardem","richardzie"}),
                PL_MESKI_OS);
 dodaj_nazwy(({"kapitan","kapitana","kapitanowi",
               "kapitana","kapitanem","kapitanie"}),
            ({"kapitanowie","kapitanow","kapitanom",
              "kapitanow","kapitanami","kapitanach"}), PL_MESKI_OS);
 
 set_gender(G_MALE);
 ustaw_odmiane_rasy(PL_CZLOWIEK);
 add_prop(CONT_I_WEIGHT, 75000);
 add_prop(CONT_I_HEIGHT, 175);
 
 dodaj_przym("rudobrody","rudobrodzi");
 dodaj_przym("jednooki","jednoocy");
 set_alignment(100);
 set_long("@@dlugi_opis");
 set_stats(({60,60,50,55,60,50}));
 set_skill(SS_LANGUAGE,30);
 set_skill(SS_LOC_SENSE,30);
 set_skill(SS_SWIM,90);
 set_skill(SS_PARRY,99);
 set_skill(SS_DEFENCE, 99);
 set_skill(SS_WEP_SWORD,99);
 set_skill(SS_AWARENESS, 100);
 
 set_act_time(5+random(8));
 add_act("krzyknij Ahoj szczury ladowe!");
 add_act("emote nuci pod nosem zeglarska piosenke.");
 add_act("emote spluwa z niesmakiem na ziemie.");
 add_act("emote klnie na czym swiat stoi.");
 add_act("emote smarcze nos w palce.");
 set_aggressive(0);
 set_act_time(5);
 add_cact("emote mowi: No to juz po tobie, chlystku!");
 add_cact("emote rechocze diabelsko.");
 add_cact("krzyknij Na wszystkie demony morza!");

 set_default_answer(QCIMIE(this_object(), PL_MIA)+" mowi: Nie bardzo wiem o czym mowisz.\n");
}
string dlugi_opis()
{
 return("Widzisz jednookiego czlowieka okolo piecdziesiatki. Uwage zwraca jego promienno-ruda "+
   "broda oraz sniada cera. Wyglada na starego wilka morskiego, ktory z niejednego pieca chleb "+
   "jadl i na niejednym statku juz plywal. Widocznie na starosc zapragnal zaznac troche "+
   "spokoju i stad jego obecne zajecie.\n");
}

add_introduced(string imie)
{
 set_alarm(1.0,0.0,"return_info",imie);
}

varargs void return_info(string kto)
{
  command("przedstaw sie "+find_player(kto)->query_real_name(PL_CEL));
}

string query_presentation()
{
 return("Richard Le Crua, Stary Wilk Morski, Kapitan 'El Mondo', czlowiek");
}  
 
