[SPELL] Little bug

[180319]

So, i created this spell with SpellCreator

And i have two problems:
1 - its healing.. its supposed to deal holy damage
2 - when i cast the spell it keeps shooting from the initial cast location and i want it to follow me and shoot as i walk.

Spoiler

-- SpellCreator generated.

-- =============== COMBAT VARS ===============
-- Areas/Combat for 0ms
local combat0_Brush = createCombatObject()
setCombatParam(combat0_Brush, COMBAT_PARAM_EFFECT, CONST_ME_HOLYDAMAGE)
setCombatParam(combat0_Brush, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatArea(combat0_Brush,createCombatArea({{1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0},
{0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{1, 0, 0, 1, 0, 0, 1, 0, 1, 0, 1},
{0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0},
{0, 1, 0, 0, 1, 2, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0},
{0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1},
{1, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1}}))
setCombatFormula(combat0_Brush, COMBAT_FORMULA_SKILL, 15, 10, 15, 10)
local dfcombat0_Brush = {CONST_ANI_HOLY,4,4,3,5,3,-2,3,-1,4,1,5,-2,4,-5,0,-5,3,-4,-3,-4,-5,-2,0,-3,-4,0,-4,2,-3,3,-3,4,0,5,1,3,-1,3,-2,-2,-1,0,1,1,1,-2,5,3,5,5,-5,4,-5,-5}local combat0_Brush_3 = createCombatObject()
setCombatParam(combat0_Brush_3, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatArea(combat0_Brush_3,createCombatArea({{1, 1, 1},
{0, 2, 1},
{1, 1, 0}}))
setCombatFormula(combat0_Brush_3, COMBAT_FORMULA_SKILL, 15, 5, 15, 5)

-- Areas/Combat for 500ms
local combat5_Brush_3 = createCombatObject()
setCombatParam(combat5_Brush_3, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatArea(combat5_Brush_3,createCombatArea({{1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 0},
{1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1},
{1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1},
{1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 1},
{1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1},
{1, 0, 0, 1, 0, 2, 0, 1, 1, 1, 1},
{1, 1, 0, 1, 0, 0, 0, 0, 1, 1, 0},
{0, 1, 0, 1, 0, 1, 1, 1, 1, 1, 1},
{1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1},
{1, 1, 0, 1, 1, 0, 1, 0, 1, 1, 1},
{0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1}}))
setCombatFormula(combat5_Brush_3, COMBAT_FORMULA_SKILL, 15, 5, 15, 5)local combat5_Brush_2 = createCombatObject()
setCombatParam(combat5_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_HOLYDAMAGE)
setCombatParam(combat5_Brush_2, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatArea(combat5_Brush_2,createCombatArea({{0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 1},
{0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0},
{0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0},
{0, 1, 0, 0, 0, 1, 0, 0, 1, 0, 0},
{0, 0, 0, 0, 1, 1, 1, 1, 0, 1, 0},
{0, 1, 0, 0, 1, 2, 1, 0, 0, 0, 0},
{0, 0, 1, 0, 1, 1, 1, 1, 0, 0, 1},
{1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0},
{0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 0},
{1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0}}))
setCombatFormula(combat5_Brush_2, COMBAT_FORMULA_SKILL, 0, 0, 0, 0)
local dfcombat5_Brush_2 = {CONST_ANI_HOLY,4,3,2,1,2,4,-1,2,5,-5,-4,-5,-5,2,3,5,5,1,1,-4,-4,-3,3,-4,0,4,-4,0,-2,-3,2,-1,-3,4,-3,1,-2,-5,3,-2,4,-1,0,-2,-4,-2,-1,-1,0,-1,1,-1,1,0,0,1,1,1,-1,1,-1,0,-5,5}

-- Areas/Combat for 1000ms
local combat10_Brush = createCombatObject()
setCombatParam(combat10_Brush, COMBAT_PARAM_EFFECT, CONST_ME_HOLYDAMAGE)
setCombatParam(combat10_Brush, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatArea(combat10_Brush,createCombatArea({{1, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1},
{0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0},
{1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 1},
{0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{1, 0, 0, 0, 0, 2, 0, 0, 0, 1, 0},
{0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 1},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0},
{0, 1, 0, 0, 1, 0, 1, 0, 0, 0, 0},
{1, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1}}))
setCombatFormula(combat10_Brush, COMBAT_FORMULA_SKILL, 15, 10, 15, 10)
local dfcombat10_Brush = {CONST_ANI_HOLY,5,5,-5,5,-5,-5,5,-5,3,-2,3,1,5,1,3,3,1,4,-4,4,-4,-1,-3,-4,0,-5,3,-4,5,-2,-1,-3,2,-2,-3,1,-3,3,-1,3,-1,4,0,5,2,5,1,3,-5,0,-5,-3,-2,-2,2,-5,4,0,-1,1}local combat10_Brush_3 = createCombatObject()
setCombatParam(combat10_Brush_3, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatArea(combat10_Brush_3,createCombatArea({{1, 1, 1, 0, 0, 0},
{1, 2, 1, 0, 0, 0},
{0, 1, 1, 0, 0, 0},
{0, 0, 1, 1, 0, 1},
{0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1}}))
setCombatFormula(combat10_Brush_3, COMBAT_FORMULA_SKILL, 15, 5, 15, 5)

-- Areas/Combat for 1500ms
local combat15_Brush_2 = createCombatObject()
setCombatParam(combat15_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_HOLYDAMAGE)
setCombatParam(combat15_Brush_2, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatArea(combat15_Brush_2,createCombatArea({{0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0},
{1, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0},
{0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1},
{0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0},
{1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1},
{0, 1, 0, 0, 0, 2, 0, 0, 0, 0, 0},
{1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1},
{0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0},
{1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0},
{0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1}}))
setCombatFormula(combat15_Brush_2, COMBAT_FORMULA_SKILL, 0, 0, 0, 0)
local dfcombat15_Brush_2 = {CONST_ANI_HOLY,5,5,3,5,0,5,-3,4,3,3,0,3,-5,3,-2,2,5,1,3,1,-5,1,-4,0,5,-1,-2,-1,-5,-1,0,-2,3,-2,5,-3,-3,-3,-5,-4,2,-4,4,-5,0,-5,-3,-4}local combat15_Brush_3 = createCombatObject()
setCombatParam(combat15_Brush_3, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatArea(combat15_Brush_3,createCombatArea({{1, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1},
{0, 1, 0, 0, 1, 1, 1, 0, 1, 1, 1},
{1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0},
{1, 1, 1, 1, 1, 0, 1, 1, 0, 1, 1},
{0, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0},
{1, 0, 1, 1, 1, 3, 1, 1, 1, 1, 1},
{0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0},
{1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1},
{0, 1, 1, 1, 1, 0, 1, 1, 0, 1, 1},
{1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1},
{1, 1, 1, 1, 1, 0, 1, 1, 0, 1, 0}}))
setCombatFormula(combat15_Brush_3, COMBAT_FORMULA_SKILL, 15, 5, 15, 5)

-- =============== CORE FUNCTIONS ===============
local function RunPart(c,cid,var,dirList,dirEmitPos) -- Part
if (isCreature(cid)) then
doCombat(cid, c, var)
if (dirList ~= nil) then -- Emit distance effects
local i = 2;
while (i < #dirList) do
doSendDistanceShoot(dirEmitPos,{x=dirEmitPos.x-dirList,y=dirEmitPos.y-dirList[i+1],z=dirEmitPos.z},dirList[1])
i = i + 2
end
end
end
end

function onCastSpell(cid, var)
local startPos = getCreaturePosition(cid)
RunPart(combat0_Brush,cid,var,dfcombat0_Brush,startPos)
RunPart(combat0_Brush_3,cid,var)
addEvent(RunPart,500,combat5_Brush_3,cid,var)
addEvent(RunPart,500,combat5_Brush_2,cid,var,dfcombat5_Brush_2,startPos)
addEvent(RunPart,1000,combat10_Brush,cid,var,dfcombat10_Brush,startPos)
addEvent(RunPart,1000,combat10_Brush_3,cid,var)
addEvent(RunPart,1500,combat15_Brush_2,cid,var,dfcombat15_Brush_2,startPos)
addEvent(RunPart,1500,combat15_Brush_3,cid,var)
return true
end

can someone fix it? thanks.. and sorry for the engrish again