Scriptname _00E_ArkanistenfieberWohltatSCN extends activemagiceffect  

Event OnEffectStart(Actor akTarget, Actor akCaster)

	If akTarget == Game.GetForm(0x14)
		akPlayer = akTarget
		fOldAV = -1*(akPlayer.GetActorValue("LastFlattered"))
	Else
		akPlayer = None
	EndIf

EndEvent

Event OnEffectFinish(Actor akTarget, Actor akCaster)

	If akPlayer
		fNewAV = -1*(akPlayer.GetActorValue("LastFlattered"))
		_00E_Player_sArcaneFeverIncreased.Show(fNewAV-fOldAV, fNewAV)
		_00E_ArkanistenfieberIMOD.Apply()
		_00E_FS_IncreaseArcaneFeverM.Play(akPlayer)
	EndIf
	
EndEvent

float fOldAV
float fNewAV

Actor akPlayer
ImageSpaceModifier Property _00E_ArkanistenfieberIMOD Auto
Sound Property _00E_FS_IncreaseArcaneFeverM Auto
Message Property _00E_Player_sArcaneFeverIncreased Auto