Gearswap Support Thread

-------------------------------------------------------------------------------------------------------------------
-- Setup functions for this job.  Generally should not be modified.
-------------------------------------------------------------------------------------------------------------------

--[[
    Custom commands:
    gs c cycle treasuremode (set on ctrl-= by default): Cycles through the available treasure hunter modes.
    
    Treasure hunter modes:
        None - Will never equip TH gear
        Tag - Will equip TH gear sufficient for initial contact with a mob (either melee, ranged hit, or Aeolian Edge AOE)
        SATA - Will equip TH gear sufficient for initial contact with a mob, and when using SATA
        Fulltime - Will keep TH gear equipped fulltime
--]]

-- Initialization function for this job file.
function get_sets()
    mote_include_version = 2
    
    -- Load and initialize the include file.
    include('Mote-Include.lua')
end

-- Setup vars that are user-independent.  state.Buff vars initialized here will automatically be tracked.
function job_setup()
    state.Buff['Sneak Attack'] = buffactive['sneak attack'] or false
    state.Buff['Trick Attack'] = buffactive['trick attack'] or false
    state.Buff['Feint'] = buffactive['feint'] or false
    
    include('Mote-TreasureHunter')
	check_facing()
	get_combat_form()

    -- For th_action_check():
    -- JA IDs for actions that always have TH: Provoke, Animated Flourish
    info.default_ja_ids = S{35, 204}
    -- Unblinkable JA IDs for actions that always have TH: Quick/Box/Stutter Step, Desperate/Violent Flourish
    info.default_u_ja_ids = S{201, 202, 203, 205, 207}
end

-------------------------------------------------------------------------------------------------------------------
-- User setup functions for this job.  Recommend that these be overridden in a sidecar file.
-------------------------------------------------------------------------------------------------------------------

-- Setup vars that are user-dependent.  Can override this function in a sidecar file.
function user_setup()
    state.OffenseMode:options('Normal', 'Acc') --F9 toggle
    state.HybridMode:options('Normal', 'Evasion', 'PDT')
    state.RangedMode:options('Normal', 'Acc')
    state.WeaponskillMode:options('Normal', 'Acc', 'Mod')
    state.PhysicalDefenseMode:options('Evasion', 'PDT')

    -- Additional local binds (^ = ctrl, ! = alt)
    send_command('bind ^` input /ja "Flee" <me>')
    send_command('bind ^= gs c cycle treasuremode') --ctrl =
    send_command('bind !- gs c cycle targetmode')

    select_default_macro_book()
	set_lockstyle()
	check_facing()
	get_combat_form()
end

-- Called when this job file is unloaded (eg: job change)
function user_unload()
    send_command('unbind ^`')
    send_command('unbind !-')
end

-- Define sets and vars used by this job file.
function init_gear_sets()
    --------------------------------------
    -- Special sets (required by rules)
    --------------------------------------

    sets.TreasureHunter = {
		hands={ name="Plun. Armlets +1", augments={'Enhances "Perfect Dodge" effect',}}, 
		feet="Skulk. Poulaines",
		}
		
    sets.Kiting = {}

    sets.buff['Sneak Attack'] = {
		head="Pill. Bonnet +3",
		body="Pillager's Vest +3",
		hands={ name="Plun. Armlets +1", augments={'Enhances "Perfect Dodge" effect',}},
		legs="Pill. Culottes +3",
		feet="Skulk. Poulaines",
		neck="Caro Necklace",
		waist="Grunfeld Rope",
		left_ear="Cessance Earring",
		right_ear="Sherida Earring",
		left_ring="Ilabrat Ring",
		right_ring="Regal Ring",
		back={ name="Toutatis's Cape", augments={'DEX+20','Accuracy+20 Attack+20','Accuracy+10','"Store TP"+10',}},
		}

    sets.buff['Trick Attack'] = {
		head="Pill. Bonnet +3",
		body="Pillager's Vest +3",
		hands={ name="Plun. Armlets +1", augments={'Enhances "Perfect Dodge" effect',}},
		legs="Pill. Culottes +3",
		feet="Skulk. Poulaines",
		neck="Caro Necklace",
		waist="Grunfeld Rope",
		left_ear="Cessance Earring",
		right_ear="Sherida Earring",
		left_ring="Ilabrat Ring",
		right_ring="Regal Ring",
		back={ name="Toutatis's Cape", augments={'DEX+20','Accuracy+20 Attack+20','Accuracy+10','"Store TP"+10',}},
		}

    -- Actions we want to use to tag TH.
    sets.precast.Step = sets.TreasureHunter
	sets.precast.JA.Bully = sets.TreasureHunter
    sets.precast.Flourish1 = sets.TreasureHunter
    sets.precast.JA.Provoke = sets.TreasureHunter


    --------------------------------------
    -- Precast sets
    --------------------------------------

    -- Precast sets to enhance JAs
    sets.precast.JA['Collaborator'] = {head="Skulker's Bonnet"}
    sets.precast.JA['Accomplice'] = {head="Skulker's Bonnet"}
    sets.precast.JA['Flee'] = {feet="Pillager's Poulaines +3"}
    sets.precast.JA['Hide'] = {body="Pillager's Vest +3"}
    sets.precast.JA['Conspirator'] = {body="Raider's Vest +2"}
    sets.precast.JA['Steal'] = {legs="Assassin's culottes", feet="Pillager's Poulaines +3"}
    sets.precast.JA['Despoil'] = {feet="Skulker's Poulaines"}
    sets.precast.JA['Perfect Dodge'] = {hands="Plunderer's Armlets +1"}
    sets.precast.JA['Feint'] = {} -- {}

    sets.precast.JA['Sneak Attack'] = sets.buff['Sneak Attack']
    sets.precast.JA['Trick Attack'] = sets.buff['Trick Attack']


    -- Waltz set (chr and vit)
    sets.precast.Waltz = {}

    -- Don't need any special gear for Healing Waltz.
    sets.precast.Waltz['Healing Waltz'] = {}


    -- Fast cast sets for spells
    sets.precast.FC = {
		head={ name="Herculean Helm", augments={'Accuracy+19 Attack+19','"Triple Atk."+3','STR+7','Accuracy+2','Attack+12',}},
		body="Raider's Vest +2",
		hands={ name="Leyline Gloves", augments={'Accuracy+15','Mag. Acc.+15','"Mag.Atk.Bns."+15','"Fast Cast"+3',}},
		legs="Pill. Culottes +3",
		feet="Pill. Poulaines +3",
		neck="Twilight Torque",
		waist="Windbuffet Belt +1",
		left_ear="Loquac. Earring",
		right_ear="Etiolation Earring",
		left_ring="Veneficium Ring",
		right_ring="Lebeche Ring",
		back="Solemnity Cape",
		}

    sets.precast.FC.Utsusemi = set_combine(sets.precast.FC, {neck="Magoraga Beads"})


    -- Ranged snapshot gear
    sets.precast.RA = {}

	---------------------------
    -- Weaponskill sets
	---------------------------

    -- Default set for any weaponskill that isn't any more specifically defined
    sets.precast.WS = {
		head="Pill. Bonnet +3",
		body={ name="Herculean Vest", augments={'Attack+5','Weapon skill damage +4%','DEX+7',}},
		hands="Meg. Gloves +2",
		legs="Pill. Culottes +3",
		feet={ name="Lustratio Leggings", augments={'HP+50','STR+10','DEX+10',}},
		neck="Caro Necklace",
		waist="Grunfeld Rope",
		left_ear={ name="Moonshade Earring", augments={'Accuracy+4','TP Bonus +25',}},
		right_ear="Sherida Earring",
		left_ring="Ilabrat Ring",
		right_ring="Regal Ring",
		back={ name="Toutatis's Cape", augments={'DEX+20','Accuracy+20 Attack+20','DEX+10','Weapon skill damage +10%',}},
		}

	sets.precast.WS['Exenterator'] = {
		head={ name="Adhemar Bonnet +1", augments={'STR+12','DEX+12','Attack+20',}}, -- relic 3
		body="Plunderer's Vest +3",
		hands="Mummu wrists +2",
		legs="Meg. Chausses +2",
		feet={ name="Plun. Poulaines +3", augments={'Enhances "Assassin\'s Charge" effect',}},
		neck="Fotia Gorget",
		waist="Fotia Belt",
		left_ear="Brutal Earring",
		right_ear="Sherida Earring",
		left_ring="Ilabrat Ring",
		right_ring="Regal Ring",
		back={ name="Toutatis's Cape", augments={'DEX+20','Accuracy+20 Attack+20','DEX+10','Weapon skill damage +10%',}},		--agi/da cape
		}
		
    sets.precast.WS['Evisceration'] = {
		head="Adhemar Bonnet +1",
		body="Plunderer's Vest +3", 
		hands="Mummu Wrists +2",
		legs="Pill. Culottes +3",
		feet={ name="Lustratio Leggings", augments={'HP+50','STR+10','DEX+10',}},
		neck="Fotia Gorget", 
		waist="Fotia Belt",
		left_ear={ name="Moonshade Earring", augments={'Accuracy+4','TP Bonus +25',}},
		right_ear="Sherida Earring",
		left_ring="Mummu Ring",
		right_ring="Begrudging Ring",
		back={ name="Toutatis's Cape", augments={'DEX+20','Accuracy+20 Attack+20','DEX+10','Weapon skill damage +10%',}},
		}
		
	
	sets.precast.WS['Aeolian Edge'] = {
		head={ name="Herculean Helm", augments={'Accuracy+19 Attack+19','"Triple Atk."+3','STR+7','Accuracy+2','Attack+12',}},
		body="Pillager's Vest +3", 
		hands={ name="Plun. Armlets +1", augments={'Enhances "Perfect Dodge" effect',}},
		legs={ name="Herculean Trousers", augments={'"Mag.Atk.Bns."+24','Accuracy+16 Attack+16','Mag. Acc.+16 "Mag.Atk.Bns."+16',}},
		feet="Skulk. Poulaines", 
		neck="Fotia Gorget", 
		waist="Fotia Belt", 
		left_ear="Cessance Earring", 
		right_ear="Friomisi Earring", 
		left_ring="Acumen Ring", 
		right_ring="Regal Ring", 
		back="Toro Cape",
		}
		
	sets.precast.WS.SA = set_combine(sets.precast.WS, {body="Meghanada Cuirie +2"})

		
	-- Specific weaponskill sets.  Uses the base set if an appropriate WSMod version isn't found.
    --sets.precast.WS['Exenterator'].Acc = set_combine(sets.precast.WS['Exenterator'], {ammo="Honed Tathlum", back="Letalis Mantle"})
    --sets.precast.WS['Exenterator'].Mod = set_combine(sets.precast.WS['Exenterator'], {head="Felistris Mask",waist=gear.ElementalBelt})
    --sets.precast.WS['Exenterator'].TA = set_combine(sets.precast.WS['Exenterator'].Mod, {ammo="Qirmiz Tathlum"})
    --sets.precast.WS['Exenterator'].SATA = set_combine(sets.precast.WS['Exenterator'].Mod, {ammo="Qirmiz Tathlum"})
    --------------------------------------
    -- Midcast sets
    --------------------------------------

    sets.midcast.FastRecast = {
		left_ear="Loquacious Earring",
        body="Pillager's Vest +3",
		hands="Pillager's Armlets +3",
        back="Canny Cape",
		}

    -- Specific spells
    sets.midcast.Utsusemi = {
		left_ear="Loquacious Earring",
        body="Pillager's Vest +3",
		hands="Pillager's Armlets +3",
		}

    -- Ranged gear
    sets.midcast.RA = {
		head="Meghanada Visor +2", 
		body="Meg. Cuirie +2", 
		hands="Meg. Gloves +2", 
		legs="Meg. Chausses +2", 
		feet="Meg. Jam. +2",
		neck="Sanctity Necklace", 
		waist="Windbuffet Belt +1", 
		left_ear="Cessance Earring", 
		right_ear="Digni. Earring",
		left_ring="Cacoethic Ring +1", 
		right_ring="Regal Ring",
		back={ name="Toutatis's Cape", augments={'DEX+20','Accuracy+20 Attack+20','Accuracy+10','"Dbl.Atk."+10',}}}

    --------------------------------------
    -- Idle/resting/defense sets
    --------------------------------------

    -- Resting sets
    sets.resting = {}

    -- Idle sets (default idle set not needed since the other three are defined, but leaving for testing purposes)
    sets.idle = {
		head="Meghanada Visor +2",
		body="Meg. Cuirie +2",
		hands="Meg. Gloves +2",
		legs="Meg. Chausses +2",
		feet="Meg. Jam. +2",
		neck="Twilight Torque",
		waist="Flume Belt +1",
		left_ear="Cessance Earring",
		right_ear="Etiolation Earring",
		left_ring="Warden's Ring",
		right_ring="Defending Ring",
		back="Solemnity Cape",
		}
    sets.idle.Town = {}
    sets.idle.Weak = sets.idle


    -- Defense sets

    sets.defense.Evasion = sets.idle

    sets.defense.PDT = sets.idle

    sets.defense.MDT = sets.idle


    --****************
    --** Melee sets **
    --****************

    -- Normal melee group
    sets.engaged = {
		head="Adhemar Bonnet +1",
		body="Pillager's Vest +3",
		hands={ name="Adhemar Wrist. +1", augments={'STR+12','DEX+12','Attack+20',}},
		legs="Samnuha Tights",
		feet="Plunderer's Poulaines +3",
		neck="Iskur Gorget", 
		waist="Reiki Yotai",
		left_ear="Dedition Earring",
		right_ear="Sherida Earring",
		left_ring="Hetairoi Ring",
		right_ring="Epona's Ring",
		back={ name="Toutatis's Cape", augments={'DEX+20','Accuracy+20 Attack+20','Accuracy+10','"Store TP"+10',}},
		}
		
    sets.engaged.Acc = {
		head="Pill. Bonnet +3",
		body="Pillager's Vest +3",
		hands="Pillager's Armlets +3",
		legs="Pill. Culottes +3",
		feet="Pill. Poulaines +3",
		neck="Erudit. Necklace",
		waist="Reiki yotai",
		left_ear="Cessance Earring",
		right_ear="Digni. Earring",
		left_ring="Mouflon Ring",
		right_ring="Cacoethic Ring +1",
		back={ name="Toutatis's Cape", augments={'DEX+20','Accuracy+20 Attack+20','Accuracy+10','"Store TP"+10',}},
		}
        
    -- Mod set for trivial mobs
    sets.engaged.Mod = {}

    -- Mod set for trivial mobs
    sets.engaged.Mod2 = {}
    sets.engaged.Evasion = {}
    sets.engaged.Acc.Evasion = {}
    sets.engaged.PDT = {}
    sets.engaged.Acc.PDT = {}
	sets.facing = {body={ name="Plunderer's Vest +3", augments={'Enhances "Ambush" effect',}}}

end


-------------------------------------------------------------------------------------------------------------------
-- Job-specific hooks for standard casting events.
-------------------------------------------------------------------------------------------------------------------

-- Run after the general precast() is done.
function job_post_precast(spell, action, spellMap, eventArgs)
    if spell.english == 'Aeolian Edge' and state.TreasureMode.value ~= 'None' then
        equip(sets.TreasureHunter)
    elseif spell.english=='Sneak Attack' or spell.english=='Trick Attack' or spell.type == 'WeaponSkill' then
        if state.TreasureMode.value == 'SATA' or state.TreasureMode.value == 'Fulltime' then
            equip(sets.TreasureHunter)
        end
    end
end

-- Run after the general midcast() set is constructed.
function job_post_midcast(spell, action, spellMap, eventArgs)
    if state.TreasureMode.value ~= 'None' and spell.action_type == 'Ranged Attack' then
        equip(sets.TreasureHunter)
    end
end

-- Set eventArgs.handled to true if we don't want any automatic gear equipping to be done.
function job_aftercast(spell, action, spellMap, eventArgs)
    -- Weaponskills wipe SATA/Feint.  Turn those state vars off before default gearing is attempted.
    if spell.type == 'WeaponSkill' and not spell.interrupted then
        state.Buff['Sneak Attack'] = false
        state.Buff['Trick Attack'] = false
        state.Buff['Feint'] = false
    end
end

-- Called after the default aftercast handling is complete.
function job_post_aftercast(spell, action, spellMap, eventArgs)
    -- If Feint is active, put that gear set on on top of regular gear.
    -- This includes overlaying SATA gear.
    check_buff('Feint', eventArgs)
end

-------------------------------------------------------------------------------------------------------------------
-- Job-specific hooks for non-casting events.
-------------------------------------------------------------------------------------------------------------------

-- Called when a player gains or loses a buff.
-- buff == buff gained or lost
-- gain == true if the buff was gained, false if it was lost.
function job_buff_change(buff, gain)
    if state.Buff[buff] ~= nil then
        if not midaction() then
            handle_equipping_gear(player.status)
        end
    end
end


-------------------------------------------------------------------------------------------------------------------
-- User code that supplements standard library decisions.
-------------------------------------------------------------------------------------------------------------------

function get_custom_wsmode(spell, spellMap, defaut_wsmode)
    local wsmode

    if state.Buff['Sneak Attack'] then
        wsmode = 'SA'
    end
   if state.Buff['Trick Attack'] then
        wsmode = (wsmode or '') .. 'TA'
    end

    return wsmode
end


-- Called any time we attempt to handle automatic gear equips (ie: engaged or idle gear).
function job_handle_equipping_gear(playerStatus, eventArgs)
    -- Check that ranged slot is locked, if necessary
    check_range_lock()

    -- Check for SATA when equipping gear.  If either is active, equip
    -- that gear specifically, and block equipping default gear.
    check_buff('Sneak Attack', eventArgs)
    check_buff('Trick Attack', eventArgs)
end


function customize_idle_set(idleSet)
    if player.hpp < 80 then
        idleSet = set_combine(idleSet, sets.ExtraRegen)
    end
    return idleSet
end


function customize_melee_set(meleeSet)
    if state.TreasureMode.value == 'Fulltime' then
        meleeSet = set_combine(meleeSet, sets.TreasureHunter)
    end
    if check_facing() == true then
		meleeSet = set_combine(meleeSet, sets.facing)
	else
		meleeSet = sets.engaged --this doesn't work?
    end
    return meleeSet
end


-- Called by the 'update' self-command.
function job_update(cmdParams, eventArgs)
    th_update(cmdParams, eventArgs)
	check_facing()
	get_combat_form()
end

-- Function to display the current relevant user state when doing an update.
-- Return true if display was handled, and you don't want the default info shown.
function display_current_job_state(eventArgs)
    local msg = 'Melee'
    
    if state.CombatForm.has_value then
        msg = msg .. ' (' .. state.CombatForm.value .. ')'
    end
    
    msg = msg .. ': '
    
    msg = msg .. state.OffenseMode.value
    if state.HybridMode.value ~= 'Normal' then
        msg = msg .. '/' .. state.HybridMode.value
    end
    msg = msg .. ', WS: ' .. state.WeaponskillMode.value
    
    if state.DefenseMode.value ~= 'None' then
        msg = msg .. ', ' .. 'Defense: ' .. state.DefenseMode.value .. ' (' .. state[state.DefenseMode.value .. 'DefenseMode'].value .. ')'
    end
    
    if state.Kiting.value == true then
        msg = msg .. ', Kiting'
    end

    if state.PCTargetMode.value ~= 'default' then
        msg = msg .. ', Target PC: '..state.PCTargetMode.value
    end

    if state.SelectNPCTargets.value == true then
        msg = msg .. ', Target NPCs'
    end
    
    msg = msg .. ', TH: ' .. state.TreasureMode.value

    add_to_chat(122, msg)

    eventArgs.handled = true
end

-------------------------------------------------------------------------------------------------------------------
-- Utility functions specific to this job.
-------------------------------------------------------------------------------------------------------------------

-- State buff checks that will equip buff gear and mark the event as handled.
function check_buff(buff_name, eventArgs)
    if state.Buff[buff_name] then
        equip(sets.buff[buff_name] or {})
        if state.TreasureMode.value == 'SATA' or state.TreasureMode.value == 'Fulltime' then
            equip(sets.TreasureHunter)
        end
        eventArgs.handled = true
    end
end

-- Check for various actions that we've specified in user code as being used with TH gear.
-- This will only ever be called if TreasureMode is not 'None'.
-- Category and Param are as specified in the action event packet.
function th_action_check(category, param)
    if category == 2 or -- any ranged attack
        --category == 4 or -- any magic action
        (category == 3 and param == 30) or -- Aeolian Edge
        (category == 6 and info.default_ja_ids:contains(param)) or -- Provoke, Animated Flourish
        (category == 14 and info.default_u_ja_ids:contains(param)) -- Quick/Box/Stutter Step, Desperate/Violent Flourish
        then return true
    end
end


-- Function to lock the ranged slot if we have a ranged weapon equipped.
function check_range_lock()
    if player.equipment.range ~= 'empty' then
        disable('range', 'ammo')
    else
        enable('range', 'ammo')
    end
end


-- Select default macro book on initial load or subjob change.
function select_default_macro_book()
    -- Default macro set/book
    if player.sub_job == 'DNC' then
        set_macro_page(1, 4)
    elseif player.sub_job == 'WAR' then
        set_macro_page(1, 4)
    elseif player.sub_job == 'NIN' then
        set_macro_page(1, 4)
    else
        set_macro_page(1, 4)
    end
end

function job_buff_change(buff, gain)
	-- Equip DT when terror/stoned/sleep/stun
	if buff:lower()=='terror' or buff:lower()=='petrification' or buff:lower()=='sleep' or buff:lower()=='stun' then
        if gain then
            equip(sets.defense.PDT)
        elseif not gain then 
            handle_equipping_gear(player.status)
        end
    end
	-- IDK what this does
    if state.Buff[buff] ~= nil then
        state.Buff[buff] = gain
    end
	-- Equip Frenzy Sallet when asleep
	if buff:lower()=='sleep' then
        if gain and player.hp > 120 and player.status == "Engaged" then
            send_command('@input /echo ---------------------- putting on Frenzy sallet! -----')
			equip({head="Frenzy Sallet"})
        elseif not gain then
            handle_equipping_gear(player.status)
        end
    end
end

function set_lockstyle()
    send_command('wait 8; input /lockstyleset 1')
end








---------------------------------------------------------------------------------------------------
-- Plunderer's Vest +3 *** (currently not unequipping when not true)
-- check_facing() also used in user_setup, job_setup, job_update, job_status_change, customize_melee_set, 
---------------------------------------------------------------------------------------------------

require('vectors')

--does nothing?
function get_combat_form()
        state.CombatForm:reset()
end

function job_status_change(new_status, old_status)
    if new_status == 'Engaged' then
		check_facing()
		get_combat_form()
   end
end

function check_facing()
	if player.target.type == 'MONSTER' then
		local target = windower.ffxi.get_mob_by_target('t')
		local player = windower.ffxi.get_mob_by_target('me')
		local dir_target = V{player.x, player.y} - V{target.x, target.y}
		local dir_player = V{target.x, target.y} - V{player.x, player.y}
		local player_heading = V{}.from_radian(player.facing)
		local target_heading = V{}.from_radian(target.facing)
		local player_angle = V{}.angle(dir_player, player_heading):degree():abs()
		local target_angle = V{}.angle(dir_target, target_heading):degree():abs()
		if player_angle < 90 and target_angle < 90 then -- currently 'facing' not 'behind', needs changed
			send_command('@input /echo ----------------------- AMBUSHING -----')
			return true
		else 
			return false
		end
	end		
end

function getAngle(index)
    local P = windower.ffxi.get_mob_by_target('me') --get player
    local M = index and windower.ffxi.get_mob_by_id(index) or windower.ffxi.get_mob_by_target('t') --get target
    local delta = {Y = (P.y - M.y),X = (P.x - M.x)} --subtracts target pos from player pos
    local angleInDegrees = (math.atan2( delta.Y, delta.X) * 180 / math.pi)*-1 
    local mult = 10^0
    return math.floor(angleInDegrees * mult + 0.5) / mult
end

function precast(spell)
    if spell.prefix == '/magic' then
        -- Magic precast
        equip(sets.FastCast)
    end
end
 
function midcast(spell)
    if spell.english:contains("Cure") or spell.english:contains("Cura") then
        equip(sets.Cure)
    end
end

function midcast(spell)
    if spell.english:contains("Regen") then
        equip(sets.Regen)
    end
end

function midcast(spell)
    if spell.english:contains("Cursna") then
        equip(sets.Cursna)
    end
end

function midcast(spell)
    if spell.english:contains("Erase") then
        equip(sets.Erase)
    end
end
 
function aftercast(spell)
    if player.status=='Idle' then
        equip(sets.Idle)
    end
end