/*
 *  Plik:         dowodcab.c
 *  Autor:        Aleksy
 *  Data:         06.12.1998
 *  Last Update:  07.12.1998
 *  Opis:         Georg Hegel, byly Dowodca Strazy, szkielet.
 */

inherit "/d/Imperium/std/monster.c";
#include "zamek.h"
#include <pl.h>
#include <ss_types.h>
#include <stdproperties.h>


void
create_monster()
{
	ustaw_nazwe(({"Georg", "Georga", "Georgowi",
				   "Georga", "Georgiem", "Georgu"})),

	dodaj_nazwy(({"dowodca", "dowodcy", "dowodce",
				  "dowodcy", "dowodca", "dowodce"}),
			    ({"dowodcy", "dowodcow", "dowodcom",
				  "dowodcow", "dowodcami", "dowodcach"}),
				  PL_MESKI_OS);

	dodaj_nazwy (({"szkielet", "szkieleta", "szkieletowi",
				   "szkieleta", "szkieletem", "szkieletu"}),
    		  allocate(6),
			   PL_MESKI_OS);

	dodaj_nazwy (({"georg", "georga", "georgowi",
				   "georga", "georgiem", "georgu"}),
    		  allocate(6),
			   PL_MESKI_OS);

	dodaj_nazwy (({"Georg Hegel", "Georga Hegelego",
				   "Georgowi Hegelowi", "Georga Hegelego",
				   "Georgiem Hegelem", "Georgu Hegelu"}),
    		  	   allocate(6),
				   PL_MESKI_OS);

	ustaw_odmiane_rasy(PL_CZLOWIEK);
	set_gender(G_MALE);

	dodaj_przym("czarny", "czarni");
	dodaj_przym("brudny", "brudni");

	set_long("W zasadzie niewiele mozna powiedziec na temat postaci, ktora wlasnie stoi "
		+ "przed toba. Jest to po prostu kupa kosci grzechoczacych wewnatrz zbroi.\n");

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

	set_skill(SS_SHIELD_PARRY, 30);
	set_skill(SS_DEFENCE, 35);
    set_skill(SS_AWARENESS, 45);
	set_skill(SS_WEP_CLUB, 65);
	set_skill(SS_WEP_SWORD, 65);
	set_skill(SS_PARRY, 25);

	set_act_time(12 + random(20));
	add_act("emote krzyczy: Idz stad! Zamalo miejsca tu dla nas!\n");
	add_act("emote mowi: Eeeeh, pamietam jak to kiedys bylo ...\n");
	add_act("emote mowi: Co tu jeszcze robisz? Odejdz stad!\n");
	add_act(({"usmiech lekko", "wzdrygnij sie"}));

	set_cact_time(4 + random(3));
    add_cact("emote mowi: Odwazyles sie mnie zaatakowac? Wiec zgieniesz!\n");
    add_cact("emote krzyczy: Zaatakowales mnie ... nawet " +
        "sobie nie wyobrazasz jaki to blad!\n");
	add_cact("emote krzyczy: Nie odejdziesz stad zywy ...\n");
	add_cact("emote mowi: Juz po tobie!\n");

	
	switch (random(1))
        {
		case 0:
			add_weapon(BRONIE + "korb_m.c");
            break;
		case 1:
			add_weapon(BRONIE + "miecz_p.c");
			break;
		}
	add_armour(ZBROJE + "kolcz_m.c");
	add_armour(ZBROJE + "helm_m.c");
	add_armour(ZBROJE + "tarcza_m.c");
	add_armour(ZBROJE + "nogawice.c");

	dodaj_srebro(10);
	dodaj_zloto(random(3));

}

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

string
query_presentation()
{
	return "Georg Hegel, byly Dowodca Strazy, szkielet";
}

void
return_introduce(string kto)
{
    command("przedstaw sie " + OB_NAME(find_living(kto, 0)));
}