Scriptname SuH_sexES_petpvictim extends activemagiceffect  


SuH_Fun property _Fun auto

actor property SuH_actor_dog auto
actor property SuH_actor_wolf auto
actor property SuH_actor_horse auto
actor property SuH_actor_skeever auto
actor property SuH_actor_familiar auto
actor property SuH_actor_bear auto
actor property SuH_actor_sabrecat auto
actor property SuH_actor_draugr auto
actor property SuH_actor_troll auto
actor property SuH_actor_spriggan auto
actor property SuH_actor_horker auto
actor property SuH_actor_falmer auto
actor property SuH_actor_husky auto
actor property SuH_actor_bristle auto
actor property SuH_actor_seeker auto
actor property SuH_actor_gargoyle auto
actor property SuH_actor_netch auto
actor property SuH_actor_riekling auto

string petID

Event OnEffectStart(Actor akTarget, Actor akCaster)
	actor char = akTarget
	if char == SuH_actor_dog
		petID = "dog"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_wolf
		petID = "wolf"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_horse
		petID = "horse"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_skeever
		petID = "skeever"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_familiar
		petID = "familiar"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_bear
		petID = "bear"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_sabrecat
		petID = "sabrecat"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_draugr
		petID = "draugr"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_troll
		petID = "troll"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_spriggan
		petID = "spriggan"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_horker
		petID = "horker"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_falmer
		petID = "falmer"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_husky
		petID = "husky"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_bristle
		petID = "bristle"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_seeker
		petID = "seeker"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_gargoyle
		petID = "gargoyle"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_netch
		petID = "netch"
		RegisterForSingleUpdate(5.0)
	elseIf char == SuH_actor_riekling
		petID = "riekling"
		RegisterForSingleUpdate(5.0)
	endIf
endEvent

Event OnUpdate()
	_Fun.xpPet(petID, "v_p")
	RegisterForSingleUpdate(5.0)
endEvent