Gearswap LUA

function determine_haste_group()

    classes.CustomMeleeGroups:clear()
    -- assuming +4 for marches (ghorn has +5)
    -- Haste (white magic) 15%
    -- Haste Samba (Sub) 5%
    -- Haste (Merited DNC) 10% (never account for this)
    -- Victory March +0/+3/+4/+5    9.4/14%/15.6%/17.1% +0
    -- Advancing March +0/+3/+4/+5  6.3/10.9%/12.5%/14%  +0
    -- Embrava 30% with 500 enhancing skill
    -- Mighty Guard - 15%
    -- buffactive[580] = geo haste
    -- buffactive[33] = regular haste
    -- buffactive[604] = mighty guard
    -- state.HasteMode = toggle for when you know Haste II is being cast on you
    -- Hi = Haste II is being cast. This is clunky to use when both haste II and haste I are being cast
    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

    if S{'haste', 'march', 'mighty guard', 'embrava', 'haste samba', 'geo-haste', 'indi-haste'}:contains(buff:lower()) then
        determine_haste_group()
        if not midaction() then
            handle_equipping_gear(player.status)
        end
    end

function job_pretarget(spell, action, spellMap, eventArgs)
   -- determine if we're using trusts
   if spell.type == 'Trust' then
      state.WeakSongs:toggle()
   end
end

function job_setup()
    determine_haste_group()
end

function user_setup()
	send_command('bind !h gs c cycle HasteMode')
	send_command('bind !m gs c cycle MarchMode')
	send_command('bind !g gs c cycle GeoHasteMode')	
end

function user_unload()
	send_command('unbind !h')
	send_command('unbind !m')
	send_command('unbind !g')
end

function job_buff_change(buff, gain, buff_table)
	-- If we gain or lose any haste buffs, adjust which gear set we target.
    if S{'haste','march','embrava','haste samba','mighty guard','weakness','slow','elegy'}:contains(buff:lower()) then
        determine_haste_group()
        handle_equipping_gear(player.status)
    elseif state.Buff[buff] ~= nil then
        handle_equipping_gear(player.status)
    end
end

function determine_haste_group()
    -- Gearswap can't detect the difference between Haste I and Haste II
    -- so use alt+F9 to manually set Haste and alt+F10 to manually set March spell levels.

    -- Haste (buffactive[33]) - 15%
    -- Haste II (buffactive[33]) - 30%
    ------------------------------ Haste Samba - 5~10%
    -- Honor March - 12~16%
    -- Victory March - 15~28%
    -- Advancing March - 10~18%
    -- Embrava - 25%
    -- Mighty Guard (buffactive[604]) - 15%
    -- Geo-Haste (buffactive[580]) - 30~40%
	
	classes.CustomMeleeGroups:clear()
    h = 0
    -- Spell Haste 15/30
    if buffactive[33] then
        if state.HasteMode.value == 'Haste I' then
            h = h + 15
        elseif state.HasteMode.value == 'Haste II' then
            h = h + 30
        end
    end
------
	--weakness -100%
	if buffactive[1] then
            h = h - 100
	end
	--slow -50%
	if buffactive[13] then
            h = h - 50
	end
	--slow geo -20% -selkit??
	if buffactive[565] then
            h = h - 20
	end
	--elegy big bird one is -100%
	if buffactive[194] then
            h = h - 100
	end
	--samba 5%
	if buffactive[370] then
            h = h + 5
	end
    -- Geo Haste :: 35.4%(Dunna) :: 40.9%(Idris) :: 20% Cornelia Trust
    if buffactive[580] then
		if state.GeoHasteMode.value == 'Cornelia' then
			if buffactive[580] == 2 then
                h = h + 20 + 35.4
            elseif buffactive[580] == 1 then
                h = h + 20
            end
		elseif state.GeoHasteMode.value == 'Basic' then
			if buffactive[580] == 2 then
                h = h + 20 + 35.4
            elseif buffactive[580] == 1 then
                h = h + 35.4
            end
		elseif state.GeoHasteMode.value == 'Idris' then
			if buffactive[580] == 2 then
                h = h + 20 + 40.9
            elseif buffactive[580] == 1 then
                h = h + 40.9
            end
		end
	end
    -- Mighty Guard :: 15%
    if buffactive[604] then
        h = h + 15
    end
    -- Embrava :: (21% at lvl 99, 25.9% max)
    if buffactive.embrava then
        h = h + 21
    end
    -- March(es) 
    if buffactive.march then
        if state.MarchMode.value == 'Honor' then
            if buffactive.march == 2 then
                h = h + 27 + 16
            elseif buffactive.march == 1 then
                h = h + 16
            elseif buffactive.march == 3 then
                h = h + 27 + 17 + 16
            end
        elseif state.MarchMode.value == 'Trusts' then
            if buffactive.march == 2 then
                h = h + 26
            elseif buffactive.march == 1 then
                h = h + 16
            elseif buffactive.march == 3 then
                h = h + 27 + 17 + 16
            end
        elseif state.MarchMode.value == '7' then
            if buffactive.march == 2 then
                h = h + 27 + 17
            elseif buffactive.march == 1 then
                h = h + 27
            elseif buffactive.march == 3 then
                h = h + 27 + 17 + 16
            end
        elseif state.MarchMode.value == '3' then
            if buffactive.march == 2 then
                h = h + 13.5 + 20.6
            elseif buffactive.march == 1 then
                h = h + 20.6
            elseif buffactive.march == 3 then
                h = h + 27 + 17 + 16
            end
        end
    end
 
    -- Determine CustomMeleeGroups
	 if h >= -1000 and h < 0 then 
        classes.CustomMeleeGroups:append('Slow')
        add_to_chat('Haste Group: SLOW -- From Haste Total: '..h)
	elseif h >= 0 and h < 15 then
		add_to_chat('Haste Group: 0% -- From Haste Total: '..h)
    elseif h >= 15 and h < 20 then 
        classes.CustomMeleeGroups:append('HasteFifteen')
        add_to_chat('Haste Group: 15% -- From Haste Total: '..h)
	elseif h >= 20 and h < 25 then 
        classes.CustomMeleeGroups:append('HasteTwenty')
        add_to_chat('Haste Group: 20% -- From Haste Total: '..h)
	elseif h >= 25 and h < 30 then 
        classes.CustomMeleeGroups:append('HasteTwentyfive')
        add_to_chat('Haste Group: 25% -- From Haste Total: '..h)
    elseif h >= 30 and h < 35 then 
        classes.CustomMeleeGroups:append('HasteThirty')
        add_to_chat('Haste Group: 30% -- From Haste Total: '..h)
    elseif h >= 35 and h < 40 then 
        classes.CustomMeleeGroups:append('HasteThirtyfive')
        add_to_chat('Haste Group: 35% -- From Haste Total: '..h)
    elseif h >= 40 then
        classes.CustomMeleeGroups:append('MaxHaste')
        add_to_chat('Haste Group: Max -- From Haste Total: '..h)
    end
	
end