/* Krasnozwierz,
 * napisane przez Alfena
 */


#include "local.h"
#include <pl.h>

inherit TPATH + "std/mutant";


void
create_chaotyk()
{
	int i;
	int *s = allocate(6);
	
	set_long("To wspaniale polaczenie krasnoluda ze zwierzeciem "+
		"stanowi nie lada wyzwanie dla oczu kazdego konesera. "+
		"Zadziwiajaca mocne szczeki, dlugie kly, sterczace uszy "+
		"oraz wspaniale owlosione wezlaste miesnie przecza czajacej "+
		"sie malenkiej glowce inteligencji. "+opis+"\n");
	wylosuj_przymiotniki();
	ustaw_odmiane_rasy( ({"krasnozwierz","krasnozwierza","krasnozwierzowi",
		"krasnozwierza","krasnozwierzem","krasnozwierzu"}),
		({"krasnozwierzami","krasnozwierzy","krasnozwierzom",
		"krasnozwierze","krasnozwierzami","krasnozwierzach"}),
		PL_MESKI_NOS_ZYW);
	for (i=0; i < 6; i++)
		s[i] = query_stat(i);
	set_stats(({ s[0] + random(50), s[1] + random(30), s[2] + random(55),
		s[3], s[4], s[5] + random(30)}) );
	for (i=0; i < 100; i++)
		if (query_skill(i) > 0)
			set_skill(i, query_skill(i) + random(20));
	ustaw_krotki_opis();
}