Scriptname SuH_sp_succubusprowlScript extends activemagiceffect  

GlobalVariable Property SuH_PCSdesireMulti auto

int effectDone

float aMOD

Event OnEffectStart(Actor akTarget, Actor akCaster)
	float pDesireMulti = SuH_PCSdesireMulti.GetValue()
	pDesireMulti += 1
	SuH_PCSdesireMulti.SetValue(pDesireMulti)
endEvent

Event onEffectFinish(Actor akTarget, Actor akCaster)
	float pDesireMulti = SuH_PCSdesireMulti.GetValue()
	pDesireMulti -= 1
	SuH_PCSdesireMulti.SetValue(pDesireMulti)
endEvent