schlua

-- *** Credit goes to Flippant for helping me with Gearswap *** --
-- ** I Use Motenten's Macro Book Function ** --

function get_sets()
	AccIndex = 1
	AccArray = {"LowACC","MidACC","HighACC"} -- 3 Levels Of Accuracy Sets For Magic. Default ACC Set Is LowACC. Add More ACC Sets If Needed Then Create Your New ACC Below --
	IdleIndex = 1
	IdleArray = {"Movement","Refresh"} -- Default Idle Set Is Movement --
	Armor = 'None'
	StunIndex = 0
	Lock_Main = 'OFF' -- Set Default Lock Main Weapon ON or OFF Here --
	Obi = 'ON' -- Turn Default Obi ON or OFF Here --
	LowNuke = 'ON' -- Set Default Low Tier Nuke ON or OFF Here --
	Elemental_Staff = 'ON' -- Set Default Precast Elemental Staff ON or OFF Here --
	target_distance = 5 -- Set Default Distance Here --
	select_default_macro_book() -- Change Default Macro Book At The End --

	Low_Tier_Spells = S{
			'Fire','Aero','Water','Blizzard','Stone','Thunder','Fire II','Aero II','Water II',
			'Blizzard II','Stone II','Thunder II'}

	Non_Obi_Spells = S{
			'Burn','Choke','Drown','Frost','Rasp','Shock','Impact','Anemohelix','Cryohelix',
			'Geohelix','Hydrohelix','Ionohelix','Luminohelix','Noctohelix','Pyrohelix'}

	Cure_Spells = {"Cure","Cure II","Cure III","Cure IV"} -- Cure Degradation --
	Curaga_Spells = {"Curaga","Curaga II"} -- Curaga Degradation --
	sc_map = {SC1 = "LightArts", SC2 = "Perpetuance", SC3 = "Accession"} -- 3 Additional Binds. Can Change Whatever JA/WS/Spells You Like Here. Remember Not To Use Spaces. --

	sets.Idle = {}
	-- Idle Sets --
	sets.Idle.Refresh = {head="Spurrina Coif",
						 neck="Twilight Torque",
						 body="Arbatel Gown +1",
						 hands="Hagondes Cuffs +1",
						 back="Umbra Cape",
						 waist="Slipor Sash",
						 ear1="Moonshade Earring",
						 ear2="Savant's Earring",
						 ring1="Defending Ring",
						 ring2="Dark Ring",
						 legs="Assiduity Pants +1",
						 feet="Iaso Boots",
						 main="Bolelabunga",
						 sub="Genbu's Shield",
						 ammo="Incantor's Stone"}
	sets.Idle.Movement = set_combine(sets.Idle.Refresh,{
			feet="Iaso Boots"})
	sets.Resting = set_combine(sets.Idle.Movement,{})

	-- PDT Set --
	sets.PDT = {}

	-- Sublimation Set --
	sets.Sublimation = {}

	sets.Precast = {}
	-- Fastcast Sets --
	sets.Precast.FastCast = {head="Nahtirah Hat",
						 neck="Orunmila's Torque",
						 body="Anhur Robe",
						 hands="Gendewitha Gages +1",
						 back="Swith Cape",
						 waist="Witful Belt",
						 ear1="Loquacious Earring",
						 ear2="Enchanter Earring +1",
						 ring1="Prolix Ring",
						 ring2="Weatherspoon Ring",
						 legs="Artsieq Hose",
						 feet="Pedagogy Loafers +1",
						 main="Keraunos",
						 ammo="Incantor's Stone"}

	sets.Precast.Impact = {head=empty,
						 neck="Orunmila's Torque",
						 body="Twilight Cloak",
						 hands="Gendewitha Gages +1",
						 back="Swith Cape",
						 waist="Witful Belt",
						 ear1="Loquacious Earring",
						 ear2="Enchanter Earring +1",
						 ring1="Prolix Ring",
						 ring2="Weatherspoon Ring",
						 legs="Artsieq Hose",
						 feet="Pedagogy Loafers +1",
						 main="Keraunos",
						 ammo="Incantor's Stone"}

	-- Elemental Staves --
	sets.Precast.Thunder = {main='Apamajas I'}
	sets.Precast.Water = {main='Haoma I'}
	sets.Precast.Fire = {main='Atar I'}
	sets.Precast.Ice = {main='Vourukasha I'}
	sets.Precast.Wind = {main='Vayuvata I'}
	sets.Precast.Earth = {main='Vishrava I'}
	sets.Precast.Light = {main='Arka I'}
	sets.Precast.Dark = {main='Xsaeta I'}

	-- Precast Enhancing Magic --
	sets.Precast['Enhancing Magic'] = set_combine(sets.Precast.FastCast,{waist="Siegel Sash"})

	-- Precast Cure Set --
	sets.Precast.Cure = {head="Nahtirah Hat",
						 neck="Orunmila's Torque",
						 body="Heka's Kalasiris",
						 hands="Gendewitha Gages +1",
						 back="Pahtli Cape",
						 waist="Witful Belt",
						 ear1="Loquacious Earring",
						 ear2="Enchanter Earring +1",
						 ring1="Prolix Ring",
						 ring2="Weatherspoon Ring",
						 legs="Artsieq Hose",
						 feet="Pedagogy Loafers +1",
						 main="Keraunos",
						 ammo="Incantor's Stone"}

	-- Midcast Base Set --
	sets.Midcast = {}

	-- Haste Set --
	sets.Midcast.Haste = set_combine(sets.Precast.FastCast,{})

	-- Cure Set --
	sets.Midcast.Cure = {head="Gendewitha Caubeen +1",
						 neck="Colossus's Torque",
						 body="Pedagogy Gown +1",
						 hands="Telchine Gloves",
						 back="Vates Cape +1",
						 waist="Bishop's Sash",
						 ear1="Beatific Earring",
						 ear2="Healing Earring +1",
						 ring1="Haoma's Ring",
						 ring2="Sirona's Ring",
						 legs="Academic's Pants +1",
						 feet="Pedagogy Loafers +1",
						 main="Bolelabunga",
						 sub="Genbu's Shield",
						 ammo="Incantor's Stone"}

	-- Curaga Set --
	sets.Midcast.Curaga = {}

	-- Enhancing Magic --
	sets.Midcast['Enhancing Magic'] = {head="Befouled Crown",
						 neck="Colossus's Torque",
						 body="Anhur Robe",
						 hands="Arbatel Bracers +1",
						 back="Merciful Cape",
						 waist="Olympus Sash",
						 ear1="Andoaa Earring",
						 ear2="Enchanter Earring +1",
						 ring1="Prolix Ring",
						 ring2="Weatherspoon Ring",
						 legs="Academic's Pants +1",
						 feet="Regal Pumps +1",
						 main="Kirin's Pole",
						 ammo="Savant's Treatise"}

	-- Stoneskin Set --
	sets.Midcast.Stoneskin = set_combine(sets.Midcast['Enhancing Magic'],{})

	-- Cursna Set --
	sets.Midcast.Cursna = set_combine(sets.Midcast.Haste,{})

	-- Regen Set --
	sets.Midcast.Regen = {head="Arbatel Bonnet +1",
						 neck="Colossus's Torque",
						 body="Telchine Chasuble",
						 hands="Arbatel Bracers +1",
						 back="Bookworm's Cape",
						 waist="Olympus Sash",
						 ear1="Andoaa Earring",
						 ear2="Enchanter Earring +1",
						 ring1="Prolix Ring",
						 ring2="Weatherspoon Ring",
						 legs="Academic's Pants +1",
						 feet="Regal Pumps +1",
						 main="Kirin's Pole",
						 ammo="Savant's Treatise"}

	-- Stun Sets --
	sets.Midcast.Stun = {}
	sets.Midcast.Stun.MidACC = set_combine(sets.Midcast.Stun,{})
	sets.Midcast.Stun.HighACC = set_combine(sets.Midcast.Stun.MidACC,{})

	-- Dark Magic Sets --
	sets.Midcast['Dark Magic'] = {}
	sets.Midcast['Dark Magic'].MidACC = set_combine(sets.Midcast['Dark Magic'],{})
	sets.Midcast['Dark Magic'].HighACC = set_combine(sets.Midcast['Dark Magic'].MidACC,{})

	-- Low Tier Set --
	sets.LowNuke = {main="Lehbrailg +2",
					sub="Elder's Grip +1",
					ammo="Dosis Tathlum",
					head="Helios Band",
					body="Count's Garb",
					hands="Helios Gloves",
					legs="Hagondes Pants +1",
					feet="Helios Boots",
					neck="Eddy Necklace",
					waist="Hachirin-no-Obi",
					ear1="Friomisi Earring",
					ear2="Novio Earring",
					ring1="Shiva Ring +1",
					ring2="Shiva Ring +1",
					back="Bookworm's Cape"}

	-- Elemental Sets --
	sets.Midcast['Elemental Magic'] = {main="Lehbrailg +2",
					sub="Elder's Grip +1",
					ammo="Dosis Tathlum",
					head="Helios Band",
					body="Count's Garb",
					hands="Helios Gloves",
					legs="Hagondes Pants +1",
					feet="Helios Boots",
					neck="Eddy Necklace",
					waist="Hachirin-no-Obi",
					ear1="Friomisi Earring",
					ear2="Novio Earring",
					ring1="Shiva Ring +1",
					ring2="Shiva Ring +1",
					back="Bookworm's Cape"}
	sets.Midcast['Elemental Magic'].MidACC = set_combine(sets.Midcast['Elemental Magic'],{main="Keraunos",body="Arbatel Gown +1"})
	sets.Midcast['Elemental Magic'].HighACC = set_combine(sets.Midcast['Elemental Magic'].MidACC,{})

	-- Enfeebling Sets --
	sets.Midcast['Enfeebling Magic'] = {main="Keraunos",
					sub="Elder's Grip +1",
					ammo="Oreiad's Tathlum",
					head="Befouled Crown",
					body="Ischemia Chasuble",
					hands="Lurid Mitts",
					legs="Psycloth Lappas",
					feet="Helios Boots",
					neck="Imbodla Necklace",
					waist="Rumination Sash",
					ear1="Enchanter Earring +1",
					ear2="Gwati Earring",
					ring1="Leviathan Ring +1",
					ring2="Leviathan Ring +1",
					back="Ogapepo Cape"}
	sets.Midcast['Enfeebling Magic'].MidACC =  set_combine(sets.Midcast['Enfeebling Magic'],{})
	sets.Midcast['Enfeebling Magic'].HighACC = set_combine(sets.Midcast['Enfeebling Magic'].MidACC,{})

	-- Impact --
	sets.Midcast.Impact = {
			body="Twilight Cloak",
			back="Bookworm's Cape",
			waist="Oneiros Rope",
			hands="Helios Gloves",
			neck="Imbodla Necklace",
			ear1="Friomisi Earring",
			ear2="Gwati Earring",
			ring1="Shiva Ring +1",
			ring2="Shiva Ring +1",
			legs="Perdition Slops",
			feet="Helios Boots",
			ammo="Seraphic Ampulla"}

	-- Elemental Obi/Twilight Cape --
	sets.Obi = {}
	sets.Obi.Thunder = {back="Twilight Cape",waist='Hachirin-no-Obi'}
	sets.Obi.Water = {back="Twilight Cape",waist='Hachirin-no-Obi'}
	sets.Obi.Fire = {back="Twilight Cape",waist='Hachirin-no-Obi'}
	sets.Obi.Ice = {back="Twilight Cape",waist='Hachirin-no-Obi'}
	sets.Obi.Wind = {back="Twilight Cape",waist='Hachirin-no-Obi'}
	sets.Obi.Earth = {back="Twilight Cape",waist='Hachirin-no-Obi'}
	sets.Obi.Light = {back="Twilight Cape",waist='Hachirin-no-Obi'}
	sets.Obi.Dark = {back="Twilight Cape",waist='Hachirin-no-Obi'}

	-- JA Sets --
	sets.JA = {}
	sets.JA['Tabula Rasa'] = {legs="Peda. Pants"}

	-- Perpetuance --
	sets.Perpetuance = {hands="Arbatel Bracers +1"}

	-- Alacrity --
	sets.Alacrity = {feet="Peda. Loafers +1"}

	-- Rapture --
	sets.Rapture = {head="Arbatel Bonnet +1"}

	-- Melee Set --
	sets.Melee = set_combine(sets.Midcast.Haste,{head="Gendewitha Caubeen +1",
						 neck="Twilight Torque",
						 body="Ischemia Chasuble",
						 hands="Hagondes Cuffs +1",
						 back="Umbra Cape",
						 waist="Chaac Belt",
						 ear1="Savant's Earring",
						 ear2="Enchanter Earring +1",
						 ring1="Defending Ring",
						 ring2="Dark Ring",
						 legs="Assiduity Pants +1",
						 feet="Battlecast Gaiters"})

	-- WS Base Set --
	sets.WS = {}
	sets.WS.Shattersoul = {head="Befouled Crown",body="Helios Jacket",back="Toro Cape",
					waist="Yamabuki-no-obi",hands="Arbatel Bracers +1",neck="Imbodla Necklace",
					ring1="Shiva Ring +1",ring2="Shiva Ring +1",legs="Psycloth Lappas",feet="Arbatel Loafers +1"}

	sets.WS.Myrkr = {head="Nahtirah Hat",body="Helios Jacket",back="Pahtli Cape",
					waist="Yamabuki-no-obi",hands="Helios Gloves",neck="Nuna Gorget +1",ear1="Andoaa Earring",
					ear2="Loquacious Earring",ring1="Globidonta Ring",ring2="Sangoma Ring",legs="Perdition Slops",
					feet="Arbatel Loafers +1"}

	sets.WS.Omniscience = {}

	sets.WS.Cataclysm = {head="Hagondes Hat +1",body="Count's Garb",back="Toro Cape",
					waist="Yamabuki-no-obi",hands="Helios Gloves",neck="Eddy Necklace",ear1="Friomisi Earring",
					ear2="Novio Earring",ring1="Shiva Ring +1",ring2="Shiva Ring +1",legs="Hagondes Pants +1",
					feet="Helios Boots"}

	-- Idle Reive Set --
	sets.Reive = {neck="Arciela's Grace +1"}
end

function pretarget(spell,action)
	if spell.action_type == 'Magic' or spell.type == "Ninjutsu" then -- Auto Use Echo Drops If You Are Silenced --
		if buffactive.silence then
			cancel_spell()
			send_command('input /item "Echo Drops" <me>')
			return
		end
	elseif spell.type == 'WeaponSkill' and player.status == 'Engaged' then
		if buffactive.amnesia then
			cancel_spell()
			return
		else
			if not spell.english == 'Myrkr' and spell.target.distance > target_distance then -- Cancel WS If You Are Out Of Range --
				cancel_spell()
				add_to_chat(123, spell.name..' Canceled: [Out of Range]')
				return
			end
		end
	elseif spell.english:ifind("Cure") and player.mp<actualCost(spell.mp_cost) then
		degrade_spell(spell,Cure_Spells)
	elseif spell.english:ifind("Curaga") and player.mp<actualCost(spell.mp_cost) then
		degrade_spell(spell,Curaga_Spells)
	elseif buffactive['Light Arts'] or buffactive['Addendum: White'] then
		if spell.english == "Light Arts" and not buffactive['Addendum: White'] then
			cancel_spell()
			send_command('input /ja Addendum: White <me>')
		elseif spell.english == "Manifestation" then
			cancel_spell()
			send_command('input /ja Accession <me>')
		elseif spell.english == "Alacrity" then
			cancel_spell()
			send_command('input /ja Celerity <me>')
		elseif spell.english == "Parsimony" then
			cancel_spell()
			send_command('input /ja Penury <me>')
		end
	elseif buffactive['Dark Arts'] or buffactive['Addendum: Black'] then
		if spell.english == "Dark Arts" and not buffactive['Addendum: Black'] then
			cancel_spell()
			send_command('input /ja Addendum: Black <me>')
		elseif spell.english == "Accession" then
			cancel_spell()
			send_command('input /ja Manifestation <me>')
		elseif spell.english == "Celerity" then
			cancel_spell()
			send_command('input /ja Alacrity <me>')
		elseif spell.english == "Penury" then
			cancel_spell()
			send_command('input /ja Parsimony <me>')
		end
	end
end

function precast(spell,action)
	if spell.action_type == 'Magic' or spell.type == "Ninjutsu" then
		if buffactive.silence or spell.target.distance > 16+target_distance then -- Cancel Magic or Ninjutsu If You Are Silenced or Out of Range --
			cancel_spell()
			add_to_chat(123, spell.name..' Canceled: [Silenced or Out of Casting Range]')
			return
		else
			if spell.english:startswith('Cur') and spell.english ~= "Cursna" then
				equip(sets.Precast.Cure)
			elseif spell.english == "Impact" then
				equip(set_combine(sets.Precast.FastCast,{body="Twilight Cloak"}))
			elseif spell.english == 'Utsusemi: Ni' then
				if buffactive['Copy Image (3)'] or buffactive['Copy Image (4)'] then
					cancel_spell()
					add_to_chat(123, spell.name .. ' Canceled: [3+ Images]')
					return
				else
					equip(sets.Precast.FastCast)
				end
			elseif sets.Precast[spell.skill] then
				equip(sets.Precast[spell.skill])
			else
				equip(sets.Precast.FastCast)
			end
		end
	elseif spell.type == "WeaponSkill" then
		if player.status ~= 'Engaged' then -- Cancel WS If You Are Not Engaged. Can Delete It If You Don't Need It --
			cancel_spell()
			add_to_chat(123,'Unable To Use WeaponSkill: [Disengaged]')
			return
		else
			if sets.WS[spell.english] then
				equip(sets.WS[spell.english])
			end
		end
	elseif spell.type == "JobAbility" then
		if sets.JA[spell.english] then
			equip(sets.JA[spell.english])
		end
	elseif spell.english == 'Spectral Jig' and buffactive.Sneak then
		cast_delay(0.2)
		send_command('cancel Sneak')
	end
	if sets.Precast[spell.element] and Elemental_Staff == 'ON' then
		equip(sets.Precast[spell.element])
	end
	if StunIndex == 1 then
		equip(sets.Midcast.Stun)
	end
end

function midcast(spell,action)
	equipSet = {}
	if spell.action_type == 'Magic' or spell.type == 'Ninjutsu' then
		equipSet = sets.Midcast
		if spell.english:startswith('Cur') and spell.english ~= "Cursna" then
			if spell.english:startswith('Cure') then
				equipSet = equipSet.Cure
			elseif spell.english:startswith('Cura') then
				equipSet = equipSet.Curaga
			end
			if buffactive.Rapture then -- Equip Arbatel Bonnet +1 When Rapture Is Up For Curaga Spells --
				equipSet = set_combine(equipSet,sets.Rapture)
			end
			if world.day_element == spell.element or world.weather_element == spell.element then
				equipSet = set_combine(equipSet,{back="Twilight Cape",waist="Hachirin-no-Obi"})
			end
		elseif spell.english == "Stoneskin" then
			if buffactive.Stoneskin then
				send_command('@wait 2.8;cancel stoneskin')
			end
			equipSet = equipSet.Stoneskin
		elseif spell.english == "Sneak" then
			if spell.target.name == player.name and buffactive['Sneak'] then
				send_command('cancel sneak')
			end
			equipSet = equipSet.Haste
		elseif spell.english:startswith('Regen') then -- Equip Arbatel Bonnet +1 When You Cast Regen Spells --
			equipSet = equipSet.Regen
		elseif string.find(spell.english,'storm') then equipSet = set_combine(equipSet,{feet="Peda. Loafers +1"})
		elseif spell.english:startswith('Banish') then
			equipSet = set_combine(equipSet.Haste,{ring1="Fenian Ring"})
		elseif spell.english == "Stun" and buffactive.Alacrity and world.weather_element == 'Thunder' then -- Equip Peda. Loafers +1 When Alacrity Is Up And Thunder Weather --
			equipSet = set_combine(equipSet,sets.Alacrity)
		elseif Low_Tier_Spells:contains(spell.english) and LowNuke == 'ON' then
			equipSet = set_combine(equipSet,sets.LowNuke)
		elseif spell.english:startswith('Utsusemi') then
			if spell.english == 'Utsusemi: Ichi' and (buffactive['Copy Image'] or buffactive['Copy Image (2)'] or buffactive['Copy Image (3)']) then
				send_command('@wait 1.7;cancel Copy Image*')
			end
			equipSet = equipSet.Haste
		elseif spell.english == 'Monomi: Ichi' then
			if buffactive['Sneak'] then
				send_command('@wait 1.7;cancel sneak')
			end
			equipSet = equipSet.Haste
		else
			if equipSet[spell.english] then
				equipSet = equipSet[spell.english]
			end
			if equipSet[spell.skill] then
				equipSet = equipSet[spell.skill]
			end
			if equipSet[AccArray[AccIndex]] then
				equipSet = equipSet[AccArray[AccIndex]]
			end
			if equipSet[spell.type] then
				equipSet = equipSet[spell.type]
			end
			if (spell.skill == 'Elemental Magic' or spell.english:startswith('Cur') or spell.english:startswith('Bio') or spell.english:startswith('Dia') or spell.english == 'Aspir' or spell.english == 'Drain') and not Non_Obi_Spells:contains(spell.english) and (world.day_element == spell.element or world.weather_element == spell.element) and sets.Obi[spell.element] and Obi == 'ON' and spell.english ~= "Cursna" then -- Use Obi Toggle To Equip Normal Waist Gear --
				equipSet = set_combine(equipSet,sets.Obi[spell.element])
			end
		end
	end
	if buffactive.Perpetuance and spell.skill == "Enhancing Magic" then -- Equip Arbatel Bracers +1 When You Cast Enhancing Spells --
		equipSet = set_combine(equipSet,sets.Perpetuance)
	elseif equipSet[spell.english] then
		equipSet = equipSet[spell.english]
	end
	equip(equipSet)
	if StunIndex == 1 then
		equip(sets.Midcast.Stun)
	end
end

function aftercast(spell,action)
	if not spell.interrupted then
		if spell.english == "Sleep II" then -- Sleep II Countdown --
			send_command('wait 60;input /echo Sleep Effect: [WEARING OFF IN 30 SEC.];wait 15;input /echo Sleep Effect: [WEARING OFF IN 15 SEC.];wait 10;input /echo Sleep Effect: [WEARING OFF IN 5 SEC.]')
		elseif spell.english == "Sleep" or spell.english == "Sleepga" then -- Sleep & Sleepga Countdown --
			send_command('wait 30;input /echo Sleep Effect: [WEARING OFF IN 30 SEC.];wait 15;input /echo Sleep Effect: [WEARING OFF IN 15 SEC.];wait 10;input /echo Sleep Effect: [WEARING OFF IN 5 SEC.]')
		elseif spell.english == "Banish II" then -- Banish II Countdown --
			send_command('wait 20;input /echo Banish Effect: [WEARING OFF IN 10 SEC.]')
		end
	end
	status_change(player.status)
end

function status_change(new,old)
	check_equip_lock()
	if Armor == 'PDT' then
		equip(sets.PDT)
	elseif buffactive["Sublimation: Activated"] then
		equip(sets.Sublimation)
	elseif new == 'Engaged' then
		equip(sets.Melee)
	elseif new == 'Idle' then
		equipSet = sets.Idle
		if equipSet[IdleArray[IdleIndex]] then
			equipSet = equipSet[IdleArray[IdleIndex]]
		end
		if buffactive['Reive Mark'] then -- Equip Arciela's Grace +1 During Reive --
			equipSet = set_combine(equipSet,sets.Reive)
		end
		equip(equipSet)
	elseif new == 'Resting' then
		equip(sets.Resting)
	end
	if StunIndex == 1 then
		equip(sets.Midcast.Stun)
	end
end

function buff_change(buff,gain)
	buff = string.lower(buff)
	if buff == "aftermath: lv.3" then -- AM3 Timer/Countdown --
		if gain then
			send_command('timers create "Aftermath: Lv.3" 180 down;wait 150;input /echo Aftermath: Lv.3 [WEARING OFF IN 30 SEC.];wait 15;input /echo Aftermath: Lv.3 [WEARING OFF IN 15 SEC.];wait 5;input /echo Aftermath: Lv.3 [WEARING OFF IN 10 SEC.]')
		else
			send_command('timers delete "Aftermath: Lv.3"')
			add_to_chat(123,'AM3: [OFF]')
		end
	elseif buff == 'weakness' then -- Weakness Timer --
		if gain then
			send_command('timers create "Weakness" 300 up')
		else
			send_command('timers delete "Weakness"')
		end
	end
	if not midaction() then
		status_change(player.status)
	end
end

-- In Game: //gs c (command), Macro: /console gs c (command), Bind: gs c (command) --
function self_command(command)
	if command == 'C1' then -- Magic Accuracy Toggle --
		AccIndex = (AccIndex % #AccArray) + 1
		add_to_chat(158,'Magic Accuracy Level: ' .. AccArray[AccIndex])
		status_change(player.status)
	elseif command == 'C5' then -- Auto Update Gear Toggle --
		status_change(player.status)
		add_to_chat(158,'Auto Update Gear')
	elseif command == 'C2' then -- Stun Toggle --
		if StunIndex == 1 then
			StunIndex = 0
			add_to_chat(123,'Stun Set: [Unlocked]')
		else
			StunIndex = 1
			add_to_chat(158,'Stun Set: [Locked]')
		end
		status_change(player.status)
	elseif command == 'C3' then -- Obi Toggle --
		if Obi == 'ON' then
			Obi = 'OFF'
			add_to_chat(123,'Obi: [OFF]')
		else
			Obi = 'ON'
			add_to_chat(158,'Obi: [ON]')
		end
		status_change(player.status)
	elseif command == 'C7' then -- PDT Toggle --
		if Armor == 'PDT' then
			Armor = 'None'
			add_to_chat(123,'PDT Set: [Unlocked]')
		else
			Armor = 'PDT'
			add_to_chat(158,'PDT Set: [Locked]')
		end
		status_change(player.status)
	elseif command == 'C9' then -- LowNuke Toggle --
		if LowNuke == 'ON' then
			LowNuke = 'OFF'
			add_to_chat(123,'Low Nuke: [OFF]')
		else
			LowNuke = 'ON'
			add_to_chat(158,'Low Nuke: [ON]')
		end
		status_change(player.status)
	elseif command == 'C17' then -- Lock Main Weapon Toggle --
		if Lock_Main == 'ON' then
			Lock_Main = 'OFF'
			add_to_chat(123,'Main Weapon: [Unlocked]')
		else
			Lock_Main = 'ON'
			add_to_chat(158,'Main Weapon: [Locked]')
		end
		status_change(player.status)
	elseif command == 'C8' then -- Distance Toggle --
		if player.target.distance then
			target_distance = math.floor(player.target.distance*10)/10
			add_to_chat(158,'Distance: '..target_distance)
		else
			add_to_chat(123,'No Target Selected')
		end
	elseif command == 'C6' then -- Idle Toggle --
		IdleIndex = (IdleIndex % #IdleArray) + 1
		add_to_chat(158,'Idle Set: '..IdleArray[IdleIndex])
		status_change(player.status)
	elseif command:match('^SC%d$') then
		send_command('//' .. sc_map[command])
	end
end

function check_equip_lock() -- Lock Equipment Here --
	if player.equipment.left_ring == "Warp Ring" or player.equipment.left_ring == "Capacity Ring" or player.equipment.right_ring == "Warp Ring" or player.equipment.right_ring == "Capacity Ring" then
		disable('ring1','ring2')
	elseif player.equipment.back == "Mecisto. Mantle" or player.equipment.back == "Aptitude Mantle +1" or player.equipment.back == "Aptitude Mantle" then
		disable('back')
	elseif Lock_Main == 'ON' then
		disable('main','sub')
	else
		enable('main','sub','ring1','ring2','back')
	end
end

function actualCost(originalCost)
	if buffactive["Penury"] then
		return originalCost*.5
	elseif buffactive["Light Arts"] then
		return originalCost*.9
	else
		return originalCost
	end
end

function degrade_spell(spell,degrade_array)
	spell_index = table.find(degrade_array,spell.name)
	if spell_index > 1 then
		new_spell = degrade_array[spell_index - 1]
		change_spell(new_spell,spell.target.raw)
		add_to_chat(8,spell.name..' Canceled: [Current MP = ' .. player.mp .. ' | ' .. player.mpp .. '%] Using '..new_spell..' instead.')
	end
end

function change_spell(spell_name,target)
	cancel_spell()
	send_command('//'..spell_name..' '..target)
end

function sub_job_change(newSubjob, oldSubjob)
	select_default_macro_book()
end

function set_macro_page(set,book)
	if not tonumber(set) then
		add_to_chat(123,'Error setting macro page: Set is not a valid number ('..tostring(set)..').')
		return
	end
	if set < 1 or set > 10 then
		add_to_chat(123,'Error setting macro page: Macro set ('..tostring(set)..') must be between 1 and 10.')
		return
	end

	if book then
		if not tonumber(book) then
			add_to_chat(123,'Error setting macro page: book is not a valid number ('..tostring(book)..').')
			return
		end
		if book < 1 or book > 20 then
			add_to_chat(123,'Error setting macro page: Macro book ('..tostring(book)..') must be between 1 and 20.')
			return
		end
		send_command('@input /macro book '..tostring(book)..';wait .1;input /macro set '..tostring(set))
	else
		send_command('@input /macro set '..tostring(set))
	end
end

function select_default_macro_book()
	-- Default macro set/book
	if player.sub_job == 'RDM' then
		set_macro_page(10, 10)
	elseif player.sub_job == 'BLM' then
		set_macro_page(10, 10)
	elseif player.sub_job == 'WHM' then
		set_macro_page(10, 10)
	else
		set_macro_page(10, 10)
	end
end