Scriptname AddBerserkVoicesScript extends Quest

VoiceType Property MaleGuts  Auto

VoiceType Property FemaleCasca  Auto

VoiceType Property FemaleSchierke  Auto

FormList Property VoicePowerVoicesListNoDraugr  Auto

FormList Property VoicePowerVoicesListwithTsun  Auto

FormList Property VoicePowerVoicesList  Auto

FormList Property VoicesFollowerRough  Auto

FormList Property VoicesCommonCombatant  Auto

FormList Property VoicesPlayer  Auto

FormList Property VoicesCommonAdult  Auto

FormList Property DefaultNPCVoiceTypes  Auto

FormList Property VoicesNPCs  Auto

FormList Property VoicesFollowerNeutral  Auto

function addvoicetypesberserk()
	if !VoicePowerVoicesListNoDraugr.HasForm(MaleGuts)
		VoicePowerVoicesListNoDraugr.AddForm(MaleGuts)
	endif
	if !VoicePowerVoicesListNoDraugr.HasForm(FemaleCasca)
		VoicePowerVoicesListNoDraugr.AddForm(FemaleCasca)
	endif
	if !VoicePowerVoicesListNoDraugr.HasForm(FemaleSchierke)
		VoicePowerVoicesListNoDraugr.AddForm(FemaleSchierke)
	endif
	if !VoicePowerVoicesListWithTsun.HasForm(MaleGuts)
		VoicePowerVoicesListWithTsun.AddForm(MaleGuts)
	endif
	if !VoicePowerVoicesListWithTsun.HasForm(FemaleCasca)
		VoicePowerVoicesListWithTsun.AddForm(FemaleCasca)
	endif
	if !VoicePowerVoicesList.HasForm(MaleGuts)
		VoicePowerVoicesList.AddForm(MaleGuts)
	endif
	if !VoicePowerVoicesList.HasForm(FemaleCasca)
		VoicePowerVoicesList.AddForm(FemaleCasca)
	endif
	if !VoicePowerVoicesList.HasForm(FemaleSchierke)
		VoicePowerVoicesList.AddForm(FemaleSchierke)
	endif
	if !VoicesFollowerRough.HasForm(MaleGuts)
		VoicesFollowerRough.AddForm(MaleGuts)
	endif
	if !VoicesFollowerRough.HasForm(FemaleCasca)
		VoicesFollowerRough.AddForm(FemaleCasca)
	endif
	if !VoicesFollowerNeutral.HasForm(FemaleSchierke)
		VoicesFollowerNeutral.AddForm(FemaleSchierke)
	endif
	if !VoicesCommonCombatant.HasForm(MaleGuts)
		VoicesCommonCombatant.AddForm(MaleGuts)
	endif
	if !VoicesCommonCombatant.HasForm(FemaleCasca)
		VoicesCommonCombatant.AddForm(FemaleCasca)
	endif
	if !VoicesCommonCombatant.HasForm(FemaleSchierke)
		VoicesCommonCombatant.AddForm(FemaleSchierke)
	endif
	if !VoicesPlayer.HasForm(MaleGuts)
		VoicesPlayer.AddForm(MaleGuts)
	endif
	if !VoicesPlayer.HasForm(FemaleCasca)
		VoicesPlayer.AddForm(FemaleCasca)
	endif
	if !VoicesPlayer.HasForm(FemaleSchierke)
		VoicesPlayer.AddForm(FemaleSchierke)
	endif
	if !VoicesCommonAdult.HasForm(MaleGuts)
		VoicesCommonAdult.AddForm(MaleGuts)
	endif
	if !VoicesCommonAdult.HasForm(FemaleCasca)
		VoicesCommonAdult.AddForm(FemaleCasca)
	endif
	if !VoicesCommonAdult.HasForm(FemaleSchierke)
		VoicesCommonAdult.AddForm(FemaleSchierke)
	endif
	if !DefaultNPCVoiceTypes.HasForm(MaleGuts)
		DefaultNPCVoiceTypes.AddForm(MaleGuts)
	endif
	if !DefaultNPCVoiceTypes.HasForm(FemaleCasca)
		DefaultNPCVoiceTypes.AddForm(FemaleCasca)
	endif
	if !DefaultNPCVoiceTypes.HasForm(FemaleSchierke)
		DefaultNPCVoiceTypes.AddForm(FemaleSchierke)
	endif
	if !VoicesNPCs.HasForm(MaleGuts)
		VoicesNPCs.AddForm(MaleGuts)
	endif
	if !VoicesNPCs.HasForm(FemaleCasca)
		VoicesNPCs.AddForm(FemaleCasca)
	endif
	if VoicesNPCs.HasForm(FemaleSchierke)
		VoicesNPCs.AddForm(FemaleSchierke)
	endif
endfunction

Event OnInit()
	addvoicetypesberserk()
EndEvent