local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, 36)
setAttackFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 1, -20, 1, -55, 5, 5, 4.0, 7.0)

local combat2 = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, 4)
 
function onGetFormulaValues(cid, level, maglevel)
	local min = -((level/5)+(maglevel*4.0)+20)
	local max = -((level/5)+(maglevel*7.0)+55)
	return min, max
end
 
setCombatCallback(combat, CALLBACK_PARAM_LEVELMAGICVALUE, "onGetFormulaValues")
 
local area = createCombatArea(AREA_SQUAREWAVE5, AREADIAGONAL_SQUAREWAVE5)
setCombatArea(combat, area)
setCombatArea(combat2, area)
 
function onCastSpell(cid, var)
    doCombat(cid, combat, var)
    doCombat(cid, combat2, var)
end

Bugou huahaua, nao sai nem as words, e fica sem exaust e nao solta os 2 efeitos

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, 36)
setAttackFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 1, -20, 1, -55, 5, 5, 4.0, 7.0)
local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_EFFECT, 4)

function onGetFormulaValues(cid, level, maglevel)
	local min = -((level/5)+(maglevel*4.0)+20)
	local max = -((level/5)+(maglevel*7.0)+55)
	return min, max
end
 
setCombatCallback(combat, CALLBACK_PARAM_LEVELMAGICVALUE, "onGetFormulaValues")
setCombatCallback(combat2, CALLBACK_PARAM_LEVELMAGICVALUE, "onGetFormulaValues")
 
local area = createCombatArea(AREA_SQUAREWAVE5, AREADIAGONAL_SQUAREWAVE5)
setCombatArea(combat, area)
setCombatArea(combat2, area)
 
function onCastSpell(cid, var)
	doCombat(cid, combat, var)
	doCombat(cid, combat2, var)
	return true
end

Editado Abril 11, 2015 10 anos por runeraserver (veja o histórico de edições)

Ainda tinha um erro acima, mas foi a que chegou mais perto, obrigado!

Poste o erro amigo, sou perfeccionista haha!