High End Sets Advice/Suggestions/Ideas/LUA

--[[    DARK KNIGHT V2.0
	Created by: Enurihel of Asura
	Based off AlanWarren's GearSwap file
	
	This lua will automatically do the following based off triggers
		while asleep equips Berserker's Torque
		While weakened Equips Twilight Helm and Mail
		Will auto cancel Souleater based off defined rules
		Auto-cancel Hasso when Last Resort is active
	
	This lua will also auto detect whether you have Great Sword or Scythe 
	equiped and equip the defined gearset based off that
		Current Auto-detect weapons:
			[*]Ragnarok:	Uses engaged.Ragnarok
			[*]Caladbolg:	Uses engaged.Caladbolg
			[*]Apocalypse: Uses engaged.Apocalypse 
			[*]gsList: 	Uses the defined Greatsword list of weapons
	Additional files needed
		Mote-Include
		CharName_drk_gear (this will house your gearsets)
			Additionally you can choose to house your augments 
			at the top of your gear file or create another file 
			to house your augments for all your jobs.
	User Defined Modes
		Melee Offense Mode
			[*]Normal
			[*]Mid
			[*]Accuracy
		Weaponskill Mode
			[*]Normal
			[*]Mid
			[*]Acc
		Hybrid Modes	
			[*]Damage Taken (DT)
			[*]Re-raise
		Casting modes
			[*]Normal
			[*]resistant
			[*]enmity
	Job ability Defined Modes
		[*]Souleater mode (will toggle Souleater off after 1 WS)
		[*]Last Resort (will toggle Hasso off when active)
	Other aspects of this file 
		[*]Capactiy Mode - equip your CP mantle when engaged and Idle
		[*]Equips Ygna's Resolve +1 while reive status is active 
		[*]If you are wekened will keep Reraise set on
	Rune Fencer as a Sub Job and Rune rules
		When you are /run you will have the option to create 
		and in game macro to cycle through the runes and display 
		specific rune information
			[*]/console gs c rune 
			[*]/console gs c cycle runes
			[*]/console gs c cycle rayke
			[*]/console gs c cycle rune
		if you want to create another macro to move backwards use 
		the same as above just edit cycle to cycleback
	Custom Aftermath gear and gearsets
		Currently this is only setup for Liberator and Apocalypse 
		and in the car file this will only work with Apocalypse
		but in the end that you so choose to create a new gearset
		follow this structure for constructing it
			sets.engaged.Weapon.AM 		--For Liberator it will be AM3
			sets.engaged.Weapon.Mid.AM	--For Liberator it will be AM3
			sets.engaged.Weapon.Mid.AM	--For Liberator it will be AM3
]]
----------------------------------------------
-- 	Initialization function required for	--
--			this to work properly			--
----------------------------------------------
function get_sets()
    mote_include_version = 2
 
-- Load and initialize the include file.
    include('Mote-Include.lua')
end
--------------------------
--	Job Setup Section	--
--------------------------
function job_setup()
	state.Buff.Souleater = buffactive.souleater or false
	state.Buff['Last Resort'] = buffactive['Last Resort'] or false
--[[ Set the default to false if you'd rather SE always stay acitve	]]
    state.SouleaterMode = M(false, 'Soul Eater Mode')
    state.LastResortMode = M(false, 'Last Resort Mode')
	state.CapacityMode = M(false, 'Capacity Point Mantle')
	gsList = S{'Macbain', 'Crobaci +1'}
--[[ Correction to the errors in the Mote libs]]
	absorbs = S{ 'Absorb-STR', 'Absorb-DEX', 'Absorb-VIT', 'Absorb-AGI', 
				 'Absorb-INT',	'Absorb-MND', 'Absorb-CHR', 'Absorb-Attri', 
				 'Absorb-ACC', 'Absorb-TP'
	}
--[[ Define the Weapon Skills that benefit from Moonshade Earring ]]
	moonshade_WS = S{"Resolution", "Torcleaver", "Cross Reaper", "Quietus", 
					 "Entropy", "Insurgency", "Savage Blade", "Vorpal Blade", 
					 "Requiescat", 'Sanguine Blade'}
	get_combat_form()
    get_combat_weapon()
    update_melee_groups()
	define_rune_info()
end 
--------------------------
--	User Setup Section	--
--------------------------
function user_setup()
    state.OffenseMode:options('Normal', 'Mid', 'Acc')
    state.HybridMode:options ('Normal', 'DT', 'Reraise') 
    state.WeaponskillMode:options('Normal', 'Mid', 'Acc')
    state.CastingMode:options('Normal', 'Resistant', 'Enmity')
--[[ Overriding default hotkeys ]]
	send_command('bind f10 gs c cycle HybridMode') 		--F10
	send_command('bind f11 gs c cycle WeaponskillMode')	--F11
	send_command('bind != gs c toggle CapacityMode')	--alt=
    send_command('bind @f9 gs c toggle SouleaterMode')	--windowsKey+F9
	send_command('bind f12 gs c cycle CastingMode')		--F12
--[[ Additional User Defined Settings ]]
    select_default_macro_book()
	set_lockstyle()
--[[ Section for Rune Fencer sub job to diplay which rune ]]	
	state.Runes = M{['description']='Rune', 
		"Ignis", 
		"Gelus", 
		"Flabra", 
		"Tellus", 
		"Sulpor", 
		"Unda", 
		"Lux", 
		"Tenebrae"
	}
	state.Rune = M{['description']='which', 
		"Fire Dmg | Ice Resist: Paralyze, Bind, Frost", 
		"Ice Dmg | Wind Resist: Choke, Gravity, Silence", 
		"Wind dmg | Earth Resist: Slow, Petrify, Rasp", 
		"Earth dmg | Lightning Resist: Stun, Shock", 
		"Lightning Dmg | Water Resist: Poison, Drown", 
		"Water dmg | Fire Resist: Addle, Burn, Plague, Amnesia", 
		"Light Dmg | Dark Resist's: Blind, Bio, Sleep", 
		"Dark Dmg | Light Resist's: Repose, Dia, Charm"
	}
	send_command('bind ^` input //gs c rune')
	send_command('bind ^- gs c cycleback Runes')
	send_command('bind ^= gs c cycle Runes')
end
--------------------------------------
-- Elements for skillchain names	--
--------------------------------------
    skillchain_elements = {}
    skillchain_elements.Light = S{'Light','Fire','Wind','Lightning'}
    skillchain_elements.Darkness = S{'Dark','Ice','Earth','Water'}
    skillchain_elements.Fusion = S{'Light','Fire'}
    skillchain_elements.Fragmentation = S{'Wind','Lightning'}
    skillchain_elements.Distortion = S{'Ice','Water'}
    skillchain_elements.Gravitation = S{'Dark','Earth'}
    skillchain_elements.Transfixion = S{'Light'}
    skillchain_elements.Compression = S{'Dark'}
    skillchain_elements.Liquification = S{'Fire'}
    skillchain_elements.Induration = S{'Ice'}
    skillchain_elements.Detonation = S{'Wind'}
    skillchain_elements.Scission = S{'Earth'}
    skillchain_elements.Impaction = S{'Lightning'}
    skillchain_elements.Reverberation = S{'Water'}
--------------------------------------------------
--	This section is called when you change jobs	--
--------------------------------------------------
function file_unload()
    send_command('unbind ^`')
    send_command('unbind !=')
    send_command('unbind ^[')
    send_command('unbind ![')
    send_command('unbind @f9')
end
----------------------------------------------
--	This tells Gearswap what sets to fetch	--
--	Reccomend creating a Car file.			--
----------------------------------------------
function init_gear_sets()

end
--------------------------
--	Custom Idle Gearset	--
--------------------------
function customize_idle_set(idleSet)
    if player.mpp < 50 then 
		idleSet = set_combine(idleSet, sets.latent_refresh)
	end 
	if player.mpp < 80 then 
		idleSet = set_combine(idleSet, sets.refresh)
	end 
	if player.hpp < 80 then 
		idleSet = set_combine(idleSet, sets.regen)
	end 
	if state.Buff.Doom then
        idleSet = set_combine(idleSet, sets.buff.Doom)
    end
	if buffactive['Weakness'] then 
		equip({head="Twilight helm", body="Twilight mail"})
		disable('head', 'body')
		else 
		enable('head', 'body')
	end 
	if state.CapacityMode.value then 
		idleSet = set_combine(idleSet, sets.CapacityMantle)
	end
    if S{"Eastern Adoulin","Western Adoulin"}:contains(world.area) then
        idleSet = set_combine(idleSet,{body="Councilor's Garb", head="Jumalik helm"})
    end
    return idleSet
end
------------------------------
--	Custom melee Gearset	--
------------------------------
function customize_melee_set(meleeSet)
    if state.Buff.Sleep and player.hp > 120 and player.status == "Engaged" then 
	-- Equip Berserker's Torque When You Are Asleep
        meleeSet = set_combine(meleeSet,{neck="Berserker's torque"})
    end
    if player.hp < 1000 then
        meleeSet = set_combine(meleeSet, sets.DT)
		add_to_chat(8, 'Low HP" Switching to DT set')
    end
	if player.hp < 800 then
        meleeSet = set_combine(meleeSet, sets.Reraise)
		add_to_chat(8, 'Low HP" Switching to DT set')
    end
    if state.Buff.Doom then
        meleeSet = set_combine(meleeSet, sets.buff.Doom)
    end
	if state.Buff['Souleater'] then
        meleeSet = set_combine(meleeSet, sets.buff.Souleater)
    end
	if buffactive['Weakness'] then 
		equip({head="Twilight helm", body="Twilight mail"})
		add_to_chat(8, '--ReRaise Set Engaged--')
		else 
		enable('head', 'body')
	end
	if state.CapacityMode.value then 
		meleeSet = set_combine(meleeSet, sets.CapacityMantle)
	end
    if buffactive['Arcane Circle'] then
        meleeSet = set_combine(meleeSet, {body="Founder's Breastplate"})
    end
    return meleeSet
end
----------------------------------------------
--	General hooks for setting combat state	--
----------------------------------------------
	------------------------------------------------------------------
	--	Called by the 'update' self-command, for common needs.		--
	--	Set eventArgs.handled to true if we don't want automatic 	--
	--	equipping of gear.											--
	------------------------------------------------------------------
function job_status_change(newStatus, oldStatus, eventArgs)
    if newStatus == "Engaged" then
        -- handle weapon sets
        if player.equipment.main == 'Ragnarok' then
            state.CombatWeapon:set('Ragnarok')
		elseif gsList:contains(player.equipment.main) then
            state.CombatWeapon:set("GreatSword")
        elseif player.equipment.main == 'Apocalypse' then
            state.CombatWeapon:set('Apocalypse')
        elseif player.equipment.main == 'Caladbolg' then
            state.CombatWeapon:set('Caladbolg')
		end
	end 
end
function job_update(cmdParams, eventArgs)
    war_sj = player.sub_job == 'WAR' or false
    get_combat_form()
    get_combat_weapon()
    update_melee_groups()
end
function get_combat_form()
	if buffactive['Last Resort'] and buffactive.haste then 
		add_to_chat(8, '---Weapon Delay Capped---')
	elseif (buffactive.haste and buffactive.hasso and buffactive.march == 2) then 
		add_to_chat(8, '---Weapon Delay is not Capped---')
	end 
	------------------------------------------------------
	--	Can add in more here this is just a placeholder	--
	------------------------------------------------------
end
function get_combat_weapon()
    if gsList:contains(player.equipment.main) then
        state.CombatWeapon:set("GreatSword")
    elseif player.equipment.main == 'Apocalypse' then
        state.CombatWeapon:set('Apocalypse')
	elseif player.equipment.main == 'Ragnarok' then
		state.CombatWeapon:set('Ragnarok')
    elseif player.equipment.main == 'Caladbolg' then
        state.CombatWeapon:set('Caladbolg')
    else -- use regular set, which caters to Liberator
        state.CombatWeapon:reset()
    end
end
function job_state_change(stateField, newValue, oldValue)
	--nothing added in here
end
function update_melee_groups()
	classes.CustomMeleeGroups:clear()
    -- mythic AM	
    if player.equipment.main == 'Liberator' then
        if buffactive['Aftermath: Lv.3'] then
            classes.CustomMeleeGroups:append('AM3')
        end
	elseif buffactive['Aftermath'] then
		classes.CustomMeleeGroups:append('AM')
	end
	if buffactive['Samurai Roll'] then
		classes.CustomRangedGroups:append('SamRoll')
	end
end
--------------------------------------------------
--	Creating a custom spellMap, 				--
--	since Mote capitalized absorbs incorrectly	--
--------------------------------------------------
function job_get_spell_map(spell, default_spell_map)
    if spell.skill == 'Dark Magic' and absorbs:contains(spell.english) then
        return 'Absorb'
    end
end
----------------------
-- Precast section	--
----------------------
function job_post_precast(spell, action, spellMap, eventArgs)
    if spell.type == 'WeaponSkill' then
        if world.time >= 17*60 or world.time < 7*60 then -- Dusk to Dawn time.
            equip({ear1="Lugra Earring +1", ear2="Lugra Earring"})
        end
    end
    if spell.action_type=="Magic" and buffactive.Silence then
        eventArgs.cancel = true
        send_command('input /item "Echo Drops" <me>')
    end
    if spell.type=='WeaponSkill' then
        if moonshade_WS:contains(spell.english) and player.tp < 2900 then
            equip({ear2="Moonshade Earring"})
        end
    end
--[[ Lock weaponskill if you are to far from the mob as to not lose TP ]]
	if spell.type == 'WeaponSkill' then 
		if spell.target.distance > 5 then 
			cancel_spell()
			add_to_chat(8, 'Target to far away. Move closer')
			return
		end 
	end 
end
----------------------
--	Midcast Section --
----------------------
function job_post_midcast(spell, action, spellMap, eventArgs)
    if spell.skill == 'Elemental Magic' then
        if spell.element == world.day_element or spell.element == world.weather_element then
            equip(sets.midcast['Elemental Magic'], {waist="Hachirin-no-Obi"})
        end
    end
    if S{"Torcleaver","Resolution","Catastrophe","Scourge","Cross Reaper"}:contains(spell.english) and (spell.element==world.day_element or spell.element==world.weather_element) then
        equip({head="Gavialis Helm"})
    end
    if S{"Drain","Drain II","Drain III", "Aspir", "Aspir II", "Aspir III"}:contains(spell.english) and (spell.element==world.day_element or spell.element==world.weather_element) then
        equip({waist="Hachirin-no-obi"})
    end
    if buffactive['Dark Seal'] and buffactive['Nether Void'] and S{"Drain II","Drain III"}:contains(spell.english) and player.tp < 1000 then
        equip(sets.MAXDrain)
        add_to_chat(100,'WARNING: Misanthropy is now equiped ** Manually Swap weapons ***')
    end
    if buffactive['Dark Seal'] and S{"Drain III"}:contains(spell.english)then
        equip({head="Fallen's Burgeonet +1"})
    end
end
------------------------------------------------------------------
-- 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
        state.Buff[buff] = gain
		handle_equipping_gear(player.status)
    end
	if buff:lower()=='terror' or buff:lower()=='petrification' or buff:lower()=='sleep' or buff:lower()=='stun' then
        if gain then
            equip(sets.defense.DT)
			add_to_chat(8, 'DT set is equiped')
        elseif not gain then 
            handle_equipping_gear(player.status)
        end
    end
    if buff:lower()=='sleep' then
        if gain and player.hp > 120 and player.status == "Engaged" then -- Equip Berserker's Torque / frenzy When You Are Asleep
            equip({neck="Berserker's torque"})
        elseif not gain then -- Take Berserker's off
            handle_equipping_gear(player.status)
        end
    end
    if buffactive['Reive Mark'] then
        equip(sets.Reive)
        disable('neck')
    else
        enable('neck')
    end
    if buffactive['Souleater'] then
        equip({head="Ignominy Burgonet +1"})
        disable('Head')
        add_to_chat(100,'WARNING: Souleater set equiped.')
    else
        enable('Head')
    end
    if buffactive['Blood Weapon'] and buffactive['Souleater'] and player.hp > 8000 then
        equip({main="Dacnomania", head="Ignominy Burgonet +1"})
        disable('Head')
        --add_to_chat(100,'WARNING: SOUL EATER HEAD ON AND &&&& Dacnomania.')
    else
        enable('Head')
    end
    if buff == "doom" then
        if gain then           
            equip(sets.buff.Doom)
            --send_command('@input /p Doomed please cursna.')
            send_command('@input /item "Holy Water" <me>')
            disable('ring1','ring2','waist')
        else
            enable('ring1','ring2','waist')
            handle_equipping_gear(player.status)
        end
    end
--[[ Checks if Last resort is active if so cancels Hasso, will put 
	 hasso back on after Last Resort falls off. ]]
	if buff == "Last Resort" and player.status == 'Engaged' then
        if gain then
            send_command('@wait 1.0;cancel hasso')
		elseif not midaction() then
            send_command('@wait 1.0;input /ja "Hasso" <me>')
        end
    end
--[[ Drain II HP Boost. Set SE to stay on. ]]
    if buff == "Max HP Boost" and state.SouleaterMode.value then
        if gain or buffactive['Max HP Boost'] then
            state.SouleaterMode:set(false)
        else
            state.SouleaterMode:set(true)
        end
    end
--[[ Make sure SE stays on for BW	]]
    if buff == 'Blood Weapon' and state.SouleaterMode.value then
        if gain or buffactive['Blood Weapon'] then
            state.SouleaterMode:set(false)
        else
            state.SouleaterMode:set(true)
        end
    end
--[[ AM custom groups	]]
	if buff:startswith('Aftermath') then
        if player.equipment.main == 'Liberator' then
            classes.CustomMeleeGroups:clear()
            if (buff == "Aftermath: Lv.3" and gain) or buffactive['Aftermath: Lv.3'] then
                classes.CustomMeleeGroups:append('AM3')
                add_to_chat(8, '-------------AM3 UP-------------')
            end
            if not midaction() then
                handle_equipping_gear(player.status)
            end
        else
            classes.CustomMeleeGroups:clear()
        if player.equipment.main == "Apocalypse" then
			if buff == "Aftermath" and gain or buffactive.Aftermath then
				classes.CustomMeleeGroups:append('AM')
				add_to_chat(8, '--Apocalypse haste is active. Switching to AM set--')
			end 
        end
		if player.equipment.main == 'Ragnarok' then 
			if buff == 'Aftermath' and gain then 
				add_to_chat(8, '---Ragnarok AM active providing Crit---')
			end 
		end 
            if not midaction() then
                handle_equipping_gear(player.status)
            end
        end
    end
end

----------------------------------
--	Sub job section for Ninja	--
----------------------------------
 ninjaTools = {
        Utsusemi = S{"Shihei",},--"Shikanofuda" 
        Hojo = S{"Kaginawa",},--"Chonofuda"
        Migawari = S{"Mokujin",},
        Kakka = S{"Ryuno",},
        Tonko = S{"Shinobi-tabi",},
        Kurayami = S{"Sairui-Ran",},
        Raiton = S{"Hiraishin",},
        Hyoton = S{"Tsurara",},
        Monomi = S{"Sanjaku-Tenugui",},
    } 
function job_precast(spell, action, spellMap, eventArgs)
    if spell.type=="Ninjutsu" then check_tools(spell) end
end
 
function check_tools(spell)
    for prefix,tools in pairs(ninjaTools) do
        if spell.english:startswith(prefix) then
            for tool in tools:it() do
                if not player.inventory[tool] then
                    add_to_chat(100,'WARNING: You are out of '..tool..'.')
                elseif player.inventory[tool].count < 10 then
                    add_to_chat(100,'WARNING: You are low on '..tool..'. '..player.inventory[tool].count..' remaining.')
                end
            end
        end
    end
end
--------------------------------------------------------------
--	Rune Fencer Sub Job section for displaying rune info	--
--------------------------------------------------------------
function define_rune_info()
    rune_info = {
        ["Ignis"]   = {damage="Fire", resistance="Ice"},
        ["Gelus"]   = {damage="Ice", resistance="Wind"},
        ["Flabra"]  = {damage="Wind", resistance="Earth"},
        ["Tellus"]  = {damage="Earth", resistance="Lightning"},
        ["Sulpor"]  = {damage="Lightning", resistance="Water"},
        ["Unda"]    = {damage="Water", resistance="Fire"},
        ["Lux"]     = {damage="Light", resistance="Darkness"},
        ["Tenebrae"]= {damage="Darkness", resistance="Light"},
    }
end
function display_rune_info(spell)
    runeinfo = rune_info[spell.english]
    if runeinfo then
        add_to_chat(122, '*'..spell.english..' is '..runeinfo.damage..'-based dmg. and '..runeinfo.resistance..' resistance*')
    end
end
function job_self_command(cmdParams, eventArgs)
	if cmdParams[1]:lower() == 'rune' then
		send_command('@input /ja '..state.Runes.value..' <me>')
	end
end
------------------------------------------------------------------
--	Selecting and Setting the default Macro book and Lock style	--
------------------------------------------------------------------
function select_default_macro_book()
    -- Default macro set/book
    if player.sub_job == 'DNC' then
        set_macro_page(4, 6)
    elseif player.sub_job == 'SAM' and player.equipment.main == 'Ragnarok' then
        set_macro_page(4, 6)
    elseif player.sub_job == 'SAM' and player.equipment.main == 'Caladbolg' then
        set_macro_page(1, 6)
	elseif player.sub_job == 'WAR' then
        set_macro_page(3, 6)
    else
        set_macro_page(2, 6)
    end
end
function set_lockstyle()
	send_command('wait 4; input /lockstyleset 1')
end