Scriptname VampireBloodPointsScript extends ActiveMagicEffect  

PlayerVampireQuestScript Property PlayerVampireQuest  Auto
GlobalVariable Property EnableVampireBloodPoints Auto

Int Property CurrentBloodPointCost Auto

Event OnEffectStart(Actor Target, Actor Caster)

	If Caster == Game.GetPlayer() && EnableVampireBloodPoints.GetValue() == 10000
		PlayerVampireQuest.VampireBloodPoints(CurrentBloodPointCost)
	EndIf	
		
EndEvent
