enderalse/source/scripts/_00e_arkanistenfieberwohltatscn.psc

32 lines
774 B
Plaintext

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