function desentir()
	print("Desentirs!");
	CreatureList = {CREATURE_PEASANT,
					CREATURE_MILITIAMAN,
					CREATURE_ARCHER,
					CREATURE_MARKSMAN,
					CREATURE_FOOTMAN,
					CREATURE_SWORDSMAN,
					CREATURE_PRIEST,
					CREATURE_CLERIC,
					CREATURE_CAVALIER,
					CREATURE_PALADIN};
	for i=1,14 do
		if GetHeroCreatures("Hafad",CreatureList[i]) > 5 then
			if i <= 4 then
				quantity = 1+random(6);
			end;
			if i > 4 and i <=10 then
				quantity = 1+random(2);
			end;
			if i > 10 then
				quantity = 1;
			end;
			RemoveHeroCreatures("Hafad",CreatureList[i],quantity);
			print("Hafad lost ",quantity," creatures. Creature ID = ",CreatureList[i]);
		else
			print("Hero has less then 6 creatures this type. Creature ID = ",CreatureList[i]);
		end;
	end;
	sleep(10);
	Trigger(NEW_DAY_TRIGGER,"desentir");
end;