Super Heal Area

-- SpellCreator generated.

-- =============== COMBAT VARS ===============
-- Areas/Combat for 800ms
local combat8_Healing = createCombatObject()
setCombatParam(combat8_Healing, COMBAT_PARAM_EFFECT, 87)
setCombatParam(combat8_Healing, COMBAT_PARAM_TYPE, COMBAT_HEALING)
setCombatArea(combat8_Healing,createCombatArea({{1, 1, 1, 1, 1},
{1, 1, 1, 1, 1},
{1, 1, 2, 1, 1},
{1, 1, 1, 1, 1},
{1, 1, 1, 1, 1}}))
function getDmg_Healing(cid, level, maglevel)
	return (100000),(150000)
end
setCombatCallback(combat8_Healing, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Healing")

local con___combat8_Healing = createConditionObject(0)
setCombatCondition(combat8_Healing, con___combat8_Healing)

local con_curando__combat8_Healing = createConditionObject(0)
setCombatCondition(combat8_Healing, con_curando__combat8_Healing)
local dfcombat8_Healing = {61,-1,1,-1,0,-1,-1,0,-1,1,-1,2,-1,2,0,2,1,1,1,1,0,0,1,-2,1,-2,0,-2,-1,-2,-2,-1,-2,0,-2,1,-2,2,-2,2,2,1,2,0,2,-1,2,-2,2}

-- Areas/Combat for 900ms
local combat9_Brush_4 = createCombatObject()
setCombatParam(combat9_Brush_4, COMBAT_PARAM_EFFECT, CONST_ME_LOSEENERGY)
setCombatParam(combat9_Brush_4, COMBAT_PARAM_TYPE, COMBAT_NONE)
setCombatArea(combat9_Brush_4,createCombatArea({{1, 1, 1, 1, 1},
{1, 1, 1, 1, 1},
{1, 1, 3, 1, 1},
{1, 1, 1, 1, 1},
{1, 1, 1, 1, 1}}))
function getDmg_Brush_4(cid, level, maglevel)
	return (10)*-1,(20)*-1
end
setCombatCallback(combat9_Brush_4, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush_4")

local con___combat9_Brush_4 = createConditionObject(0)
setCombatCondition(combat9_Brush_4, con___combat9_Brush_4)
local dfcombat9_Brush_4 = {CONST_ANI_SPEAR,1,1,0,1,-1,1,-2,1,-2,0,-2,-1,-1,0,-1,-1,-1,-2,-2,-2,0,-2,1,-2,1,-1,2,-1,2,0,2,1,2,2,1,2,0,2,-1,2,-2,2,1,0,0,-1,0,0,2,-2}

-- =============== 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[i],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)
	addEvent(RunPart,800,combat8_Healing,cid,var,dfcombat8_Healing,startPos)
	addEvent(RunPart,900,combat9_Brush_4,cid,var,dfcombat9_Brush_4,startPos)
	return true
end