local ME = {
    SUPER_KAMEHAMEHA_CENTER_EW, --1
    SUPER_KAMEHAMEHA_CENTER_NS, --2
    SUPER_KAMEHAMEHA_END_W, --3
    SUPER_KAMEHAMEHA_END_E, --4
    SUPER_KAMEHAMEHA_END_N, --5
    SUPER_KAMEHAMEHA_END_S, --6
    SUPER_KAMEHAMEHA_START_N, --7
    SUPER_KAMEHAMEHA_START_S, --8
    SUPER_KAMEHAMEHA_START_E, --9
    SUPER_KAMEHAMEHA_START_W --10
}

local combat = {}
for i = 1, 10 do
    combat[i] = createCombatObject()
    setCombatParam(combat[i], COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
    setCombatParam(combat[i], COMBAT_PARAM_EFFECT, ME[i])
    setCombatFormula(combat[i], COMBAT_FORMULA_LEVELMAGIC, -2.5, -30, -3.7, 0)
    setCombatArea(combat[i], createCombatArea(AREA_SPECIAL_BEAM_CANON_CENTER))
end

local dir = {
    [0] = {combat[7], combat[2], combat[5]}, --NORTH
    [1] = {combat[9], combat[1], combat[4]}, --EAST
    [2] = {combat[8], combat[2], combat[6]}, --SOUTH
    [3] = {combat[10], combat[1], combat[3]} --WEST
}

function onCastSpell(cid, var) --N 0,S 2,E 1,W 3
    for i = 1, 3 do
        addEvent(doCombat, 500*i, cid, dir[getCreatureLookDirection(cid)][i], var)
        addEvent(doCreatureSay, 500*i, cid, i==1 and 'Super..' or i==2 and 'Cool..' or 'Spell!', TALKTYPE_ORANGE_1)
    end
    return true
end