let TraitRemovalArray := ar_construct array
let TraitRemovalArray := glta 86

array_var iter

foreach iter <- TraitRemovalArray
	let rPerkRef := *iter
	if (IsTrait rPerkRef) && (Player.HasPerk rPerkRef)
		player.removeperk rPerkRef
	EndIf
Loop