Lua Life drain spell

[Shawno0]

I've been toying with this spell for days, I want it to be an exori type spell tht deals death damage, but also heals the caster equal to that of the damage delt.. But at best i can only get it to hurt the caster... Can anyone fix this for me??

local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_DEATHDAMAGE)
setCombatParam(combat1, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_RED)
setCombatFormula(combat1, COMBAT_FORMULA_SKILL, 0.6, -90, 1.6, -50)

local area = createCombatArea(AREA_SQUARE1X1)
setCombatArea(combat1, area)

local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_HEALING)
setCombatParam(combat2, COMBAT_PARAM_EFFECT, CONST_ME_BATS)
setCombatParam(combat2, COMBAT_PARAM_AGGRESSIVE, 0)
setCombatFormula(combat1, COMBAT_FORMULA_SKILL, 0.6, -90, 1.6, -50)

local function onCastSpell1(parameters)
doCombat(parameters.cid, parameters.combat1, parameters.var)
end

local function onCastSpell2(parameters)
doCombat(parameters.cid, parameters.combat2, parameters.var)
end

function onCastSpell(cid, var)
local parameters = { cid = cid, var = var, combat1 = combat1, combat2 = combat2}
addEvent(onCastSpell1, 0, parameters)
addEvent(onCastSpell2, 100, parameters)
return TRUE
end

Rep++