inherit "/std/monster.c";
#include <macros.h>
#include <stdproperties.h>
#include <ss_types.h>
#include <wa_types.h>
#include <../kislev.h>
#include "gwardia.h"

void
create_monster()
{
int a,b;
string *p1 = ({"snieznowlosy","potezny","lodowooki","duzy","silny",
		"mocny","srebrnooki"});
string *p2 = ({"snieznowlosi","potezni","lodowoocy","duzi","silni",
		"mocni","srebrnoocy"});

string *c1 = ({"opanowany","czujny","srogi","posepny","stanowczy",
	    "zdecydowany"});
string *c2 = ({"opanowani","czujni","srodzy","posepni","stanowczy",
	    "zdecydowani"});
	    

dodaj_nazwy(PL_MEZCZYZNA);
dodaj_nazwy(({"czlowiek","czlowieka","czlowiekowi","czlowieka","czlowiekiem",
	    "czlowieku"}),({"ludzie","ludzi","ludziom","ludzi","ludzmi",
	    "ludziach"}),PL_MESKI_OS);

ustaw_odmiane_rasy(({"gwardzista","gwardzisty","gwardziscie","gwardziste",
	    "gwardzista","gwardziscie"}),({"gwardzisci","gwardzistow",
	    "gwardzistom","gwardzistow","gwardzistami","gwardzistach"}),
	    PL_MESKI_OS);

    a=random(sizeof(p1));
    b=random(sizeof(c1));

    dodaj_przym(p1[a],p2[a]);
    dodaj_przym(c1[b],c2[b]);

    set_long("Masz przed soba odzianego w ciezki, lsniacy kirys "+
	    "zolnierza gwardii Kislevu w calosci oddanej Ulrykowi, "+
	    "bogowi wojny i zimy. Jego twarz jest zorana przez "+
	    "ciagle wiejace zimne wiatry, a czarne, dlugie wlosy opadaja "+
	    "mu na wilczy plaszcz, ktorym ma okryte plecy.\n");

    add_prop(LIVE_I_NEVERKNOWN,1);
    add_prop(CONT_I_WEIGHT,90000);
    add_prop(CONT_I_HEIGHT,180);
    
    set_stats(({90,90,100,1,1,90}));

    set_skill(SS_DEFENCE,75);
    set_skill(SS_PARRY,75);
    set_skill(SS_WEP_WARHAMMER,80);
    set_skill(SS_WEP_AXE,80);
    set_skill(SS_SHIELD_PARRY,70);

    add_armour(ZBROJE+"tarcza");
    add_armour(ZBROJE+"kirys");
    
    a=random(2);
	switch(a)
	    {
	    case 0:
	    add_weapon(BRONIE+"toporg");
	    break;
	    
	    case 1:
	    add_weapon(BRONIE+"mlotg");
	    break;
	    }

set_aggressive("@@atak");
}