I try to infect the character "Sangvinare Vampiris" in my quest with the following code:
While (Game.GetPlayer().HasMagicEffect(DisDamageHealthVampire)) == False
Game.GetPlayer().AddSpell(DiseaseSanguinareVampiris, abVerbose = False)
EndWhile
SPELL Property DiseaseSanguinareVampiris Auto
MagicEffect Property DisDamageHealthVampire Auto
But the character does not become infected (magical effect it is not present) Please Help.