local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat1, COMBAT_PARAM_EFFECT, 27)
setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -1.5, -100, -1.6, -200)

local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat2, COMBAT_PARAM_EFFECT, 27)
setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -1.5, -100, -1.6, -200)

local arr1 = {
    {1, 1, 1},
    {1, 2, 1},
    {1, 1, 1},
}

local arr2 = {
    {0, 1, 1, 1, 0},
    {1, 0, 0, 0, 1},
    {1, 0, 2, 0, 1},
    {1, 0, 0, 0, 1},
    {0, 1, 1, 1, 0},
}

setCombatArea(combat1, createCombatArea(arr1))
setCombatArea(combat2, createCombatArea(arr2))

function onCastSpell(cid, var)
    doCombat(cid, combat1, var, 3)
    addEvent(doCombat, 300, cid, combat2, var, 3, true)
    return LUA_NO_ERROR
end