FFXI Lua for Haste Calculations

function determine_haste_group()

    classes.CustomMeleeGroups:clear()
    -- assuming +4 for marches (ghorn has +5)
    -- Haste (white magic) is 14.65% (15%)
    -- Haste II (white magic) is 29.98% (30%)
    -- Haste Samba (Sub) 5%
    -- Haste (Merited DNC) 10% (never account for this)
    -- Honor March is now considered in 'Hi'
    -- Honor March +0/+1/+2/+3/+4            ||  12.30% /13.48% / 14.65% / 15.82% / 16.99%
    -- Victory March +0/+3/+4/+5/+6/+7/+8    ||  15.92% /17.48% / 19.04% / 20.61% / 22.27% / 23.83% / 25.39% / 27.05% / 28.61%
    -- Advancing March +0/+3/+4/+5/+6/+7/+8  ||  10.55% /11.52% / 12.60% / 13.67% / 14.75% / 15.82% / 16.60% / 17.87% / 18.95%
    -- Embrava 30% with 500 enhancing skill
    -- buffactive[580] = geo haste - 30% (does not assume idris since it will not cap on its own w/o rare circumstance i.e /dnc)
    -- buffactive[33] = regular haste - 15%
    -- buffactive[604] = mighty guard - 15%
    -- state.HasteMode = toggle for when you know Haste II is being cast on you as well as 2hr buffs like SV and Bolster
    -- Hi = Haste II and/or H.M. is being cast. This is clunky to use when both haste II and haste I are being cast (default to Hi)

    if state.CombatWeapon.value == 'DW' then
        if player.equipment.main == "Farsha" and buffactive['Aftermath: Lv.3'] then
                if state.HasteMode.value == 'Hi' then
                    if ( ( (buffactive[33] or buffactive[580] or buffactive.embrava) and (buffactive.march or buffactive[604]) ) or
                         ( buffactive[33] and (buffactive[580] or buffactive.embrava) ) or
                         ( buffactive.march == 2 and buffactive[604] ) ) then
                        add_to_chat(8, '-------------Aftermath - Max-Haste Mode Enabled--------------')
                        classes.CustomMeleeGroups:append('Farsha_Max')
                    elseif ( (buffactive[33] or buffactive.march == 2 or buffactive[580]) and buffactive['haste samba'] ) then
                        add_to_chat(8, '-------------Aftermath - Haste 35%-------------')
                        classes.CustomMeleeGroups:append('Farsha_35')
                    elseif ( ( buffactive[580] or buffactive[33] or buffactive.march == 2 ) or
                             ( buffactive.march == 1 and buffactive[604] ) ) then
                        add_to_chat(8, '-------------Aftermath - Haste 30%-------------')
                        classes.CustomMeleeGroups:append('Farsha_30')
                    elseif ( buffactive.march == 1 or buffactive[604] ) then
                        add_to_chat(8, '-------------AFtermath - Haste 15%-------------')
                        classes.CustomMeleeGroups:append('Farsha_15')
                    end
                else
                    if ( buffactive[580] and ( buffactive.march or buffactive[33] or buffactive.embrava or buffactive[604]) ) or  -- geo haste + anything
                       ( buffactive.embrava and (buffactive.march or buffactive[33] or buffactive[604]) ) or  -- embrava + anything
                       ( buffactive.march == 2 and (buffactive[33] or buffactive[604]) ) or  -- two marches + anything
                       ( buffactive[33] and buffactive[604] and buffactive.march ) then -- haste + mighty guard + any marches
                        add_to_chat(8, '-------------Aftermath - Max Haste Mode Enabled--------------')
                        classes.CustomMeleeGroups:append('Farsha_Max')
                    elseif ( (buffactive[604] or buffactive[33]) and buffactive['haste samba'] and buffactive.march == 1) or -- MG or haste + samba with 1 march
                           ( buffactive.march == 2 and buffactive['haste samba'] ) or
                           ( buffactive[580] and buffactive['haste samba'] ) then
                        add_to_chat(8, '-------------Aftermath - Haste 35%-------------')
                        classes.CustomMeleeGroups:append('Farsha_35')
                    elseif ( buffactive.march == 2 ) or -- two marches from ghorn
                           ( (buffactive[33] or buffactive[604]) and buffactive.march == 1 ) or  -- MG or haste + 1 march
                           ( buffactive[580] ) or  -- geo haste
                           ( buffactive[33] and buffactive[604] ) then  -- haste with MG
                        add_to_chat(8, '-------------Aftermath - Haste 30%-------------')
                        classes.CustomMeleeGroups:append('Farsha_30')
                    elseif buffactive[33] or buffactive[604] or buffactive.march == 1 then
                        add_to_chat(8, '-------------Aftermath - Haste 15%-------------')
                        classes.CustomMeleeGroups:append('Farsha_15')
                    end
                end
        elseif not buffactive['Aftermath: Lv.3'] or player.equipment.main ~= "Farsha" then
            if state.HasteMode.value == 'Hi' then
                if ( ( (buffactive[33] or buffactive[580] or buffactive.embrava) and (buffactive.march or buffactive[604]) ) or
                     ( buffactive[33] and (buffactive[580] or buffactive.embrava) ) or
                     ( buffactive.march == 2 and buffactive[604] ) ) then
                    add_to_chat(8, '------------- Max-Haste Mode Enabled--------------')
                    classes.CustomMeleeGroups:append('MaxHaste')
                elseif ( (buffactive[33] or buffactive.march == 2 or buffactive[580]) and buffactive['haste samba'] ) then
                    add_to_chat(8, '-------------Haste 35%-------------')
                    classes.CustomMeleeGroups:append('Haste_35')
                elseif ( ( buffactive[580] or buffactive[33] or buffactive.march == 2 ) or
                         ( buffactive.march == 1 and buffactive[604] ) ) then
                    add_to_chat(8, '-------------Haste 30%-------------')
                    classes.CustomMeleeGroups:append('Haste_30')
                elseif ( buffactive.march == 1 or buffactive[604] ) then
                    add_to_chat(8, '-------------Haste 15%-------------')
                    classes.CustomMeleeGroups:append('Haste_15')
                end
            else
                if ( buffactive[580] and ( buffactive.march or buffactive[33] or buffactive.embrava or buffactive[604]) ) or  -- geo haste + anything
                   ( buffactive.embrava and (buffactive.march or buffactive[33] or buffactive[604]) ) or  -- embrava + anything
                   ( buffactive.march == 2 and (buffactive[33] or buffactive[604]) ) or  -- two marches + anything
                   ( buffactive[33] and buffactive[604] and buffactive.march ) then -- haste + mighty guard + any marches
                    add_to_chat(8, '-------------Max Haste Mode Enabled--------------')
                    classes.CustomMeleeGroups:append('MaxHaste')
                elseif ( (buffactive[604] or buffactive[33]) and buffactive['haste samba'] and buffactive.march == 1) or -- MG or haste + samba with 1 march
                       ( buffactive.march == 2 and buffactive['haste samba'] ) or
                       ( buffactive[580] and buffactive['haste samba'] ) then
                    add_to_chat(8, '-------------Haste 35%-------------')
                    classes.CustomMeleeGroups:append('Haste_35')
                elseif ( buffactive.march == 2 ) or -- two marches from ghorn
                       ( (buffactive[33] or buffactive[604]) and buffactive.march == 1 ) or  -- MG or haste + 1 march
                       ( buffactive[580] ) or  -- geo haste
                       ( buffactive[33] and buffactive[604] ) then  -- haste with MG
                    add_to_chat(8, '-------------Haste 30%-------------')
                    classes.CustomMeleeGroups:append('Haste_30')
                elseif buffactive[33] or buffactive[604] or buffactive.march == 1 then
                    add_to_chat(8, '-------------Haste 15%-------------')
                    classes.CustomMeleeGroups:append('Haste_15')
                end
            end
        end
    end
    if state.CombatWeapon.value ~= 'DW' then
    end
end