Code:
Begin OnActivate
	if Player.GetGold >= 10000
		Player.removeitem "Gold001" 10000
		Player.additem BlackSoulGem 1     ;
	else
                        message "Du hast nicht genügend Gold"
            endif
	If Player.GetItemCount 'GroßerSeelenstein' != 0
		Player.RemoveItem 'GroßerSeelenstein' 1
                        Player.ModActorValue2 Health -100
	else
 		Message "Du brauchst einen großen Seelenstein"
            endif
end
Eher so
Bei deinem Script wird dem player bei jedem Aktivieren 100 Leben entzogen, selbst wenn er keinen Seelenstein hat