Kensagaku_BRD

function get_sets()

	--Variables
		instrument = 1 --1 = Gjallarhorn, 2 = Terpander
		idleset = 1 --1 = Standard, 2 = PDT
		debuff = S{'Battlefield Elegy', 'Carnage Elegy', 'Pining Nocturne', 'Water Threnody', 'Lightning Threnody', 'Fire Threnody', 'Wind Threnody', 'Dark Threnody', 'Light Threnody', 'Ice Threnody', 'Earth Threnody', 'Magic Finale'}

	--Idle Sets
	sets.idle = {}

	sets.idle.standard = {main="Felibre's Dague", sub="Genbu's Shield", range="Gjallarhorn",
			head="Wivre Hairpin", neck="Twilight Torque", lear="Gifted Earring", rear="Loquac. Earring",
			body="Artsieq Jubbah", hands="Artsieq Cuffs", lring="Sangoma Ring", rring="Balrahn's Ring",
			back="Rhapsode's Cape", waist="Fucho-no-Obi", legs="Nares Trews", feet="Aoidos' Cothurnes +2"}

	sets.idle.PDT = {main="Earth Staff", sub="Mephitis Grip", range="Gjallarhorn",
			head="Wivre Hairpin", neck="Twilight Torque", lear="Gifted Earring", rear="Loquac. Earring",
			body="Bihu Justaucorps", hands="Artsieq Cuffs", lring="Dark Ring", rring="Dark Ring",
			back="Cheviot Cape", waist="Fucho-no-Obi", legs="Bihu Cannions", feet="Bihu Slippers"}

	--Precast Sets
	sets.precast = {}

	sets.precast.song = {main="Felibre's Dague", sub="Genbu's Shield", range="Gjallarhorn",
			head="Aoidos' Calot +2", neck="Aoidos' Matinee", rear="Loquac. Earring",
			body="Sha'ir Manteel", hands="Schellenband",
			back="Swith Cape", waist="Aoidos' Belt", legs="Gendewitha Spats", feet="Bihu Slippers"}

	sets.precast.cure = {head="Nahtirah Hat", rear="Loquac. Earring",
			body="Heka's Kalasiris", hands="Repartie Gloves",
			back="Swith Cape", feet="Chelona Boots"}

	sets.precast.FC = {"Nahtirah Hat", rear="Loquac. Earring",
			body="Anhur Robe", hands="Repartie Gloves",
			back="Swith Cape", feet="Chelona Boots"}

	--Midcast sets
	sets.midcast = {}

	sets.midcast.scherzo = {main="Legato Dagger", sub="Genbu's Shield", range="Gjallarhorn",
			head="Aoidos' Calot +2", neck="Aoidos' Matinee", rear="Musical Earring",
			body="Aoidos' Hongreline +2", hands="Aoidos' Manchettes +2",
			back="Harmony Cape", waist="Corvax Sash", legs="Marduk's Shalwar +1", feet="Brioso Slippers"}

	sets.midcast.noskill = {main="Legato Dagger", sub="Genbu's Shield", range="Gjallarhorn",
			head="Aoidos' Calot +2", neck="Aoidos' Matinee",
			body="Aoidos' Hongreline +2", hands="Aoidos' Manchettes +2",
			back="Harmony Cape", waist="Corvax Sash", legs="Marduk's Shalwar +1", feet="Brioso Slippers"}

	sets.midcast.recast = {main="Legato Dagger", sub="Genbu's Shield", range="Gjallarhorn",
			head="Shedir Turban", neck="Aoidos' Matinee",
			body="Aoidos' Hongreline +2", hands="Espial Bracers",
			back="Harmony Cape", waist="Corvax Sash", legs="Aoidos' Rhingrave +2", feet="Brioso Slippers"}

	sets.midcast.ballad = {range="Gjallarhorn", legs="Aoidos' Rhingrave +2"}

	sets.midcast.cure = {main="Arka IV",
			head="Nahtirah Hat", neck="Colossus's Torque", rear="Lifestorm Earring", lear="Psystorm Earring",
			body="Heka's Kalasiris", hands="Serpentes Cuffs", rring="Sirona's ring", lring="Aquasoul Ring",
			back="Oretania's Cape", legs="Nares Trews", feet="Serpentes Sabots"}

	sets.midcast.stoneskin = {head="Nahtirah Hat", neck="Colossus's Torque", rear="Gifted Earring",
			body="Heka's Kalasiris", rring="Sirona's Ring", lring="Aquasoul Ring",
			back="Refraction Cape", waist="Siegel Sash", legs="Haven Hose", feet="Chelona Boots"}

	sets.midcast.debuff = {main="Twebuliij", sub="Mephitis Grip", range="Gjallarhorn",
			head="Nahtirah Hat", neck="Aoidos' Matinee", rear="Lifestorm Earring", lear="Psystorm Earring",
			body="Aoidos' Hongreline +2", hands="Aoidos' Manchettes +2", lring="Balrahn's Ring", rring="Sangoma Ring",
			back="Rhapsode's Cape", waist="Demonry Sash", legs="Bihu Cannions", feet="Bokwus Boots"}

	sets.midcast.harp = {range="Terpander"}

	--JA Sets
	sets.precast.JA = {}
	sets.precast.JA['Nightingale'] = {body="Bihu Slippers"}
	sets.precast.JA['Troubadour'] = {feet="Bihu Justaucorps"}
	sets.precast.JA['Soul Voice'] = {legs="Bihu Cannions"}
end

function precast(spell)
	if spell.action_type == 'Magic' then

		if spell.type == 'BardSong' and buffactive.Nightingale then
			if string.find(spell.english,'Valor Minuet') then
				if instrument == 2 then
					equip(sets.midcast.noskill,{range="Terpander", body="Aoidos' Hongreline +2"})
				else
					equip(sets.midcast.noskill,{body="Aoidos' Hongreline +2"})
				end

			elseif string.find(spell.english,"Knight's Minne") then
				if instrument == 2 then
					equip(sets.midcast.noskill,{range="Terpander"})
				else
					equip(sets.midcast.noskill)
				end

			elseif spell.english == "Victory March" or spell.english == "Advancing March" then
				if instrument == 2 then
					equip(sets.midcast.noskill,{range="Terpander", hands="Aoidos' Manchettes +2"})
				else
					equip(sets.midcast.noskill,{hands="Aoidos' Manchettes +2"})
				end

			elseif spell.english == 'Blade Madrigal' or spell.english == 'Sword Madrigal' then
				if instrument == 2 then
					equip(sets.midcast.noskill,{range="Terpander", head="Aoidos' Calot +2"})
				else
					equip(sets.midcast.noskill,{head="Aoidos' Calot +2"})
				end

			elseif string.find(spell.english,"Mage's Ballad") then
				if instrument == 2 then
					equip(sets.midcast.recast,sets.midcast.ballad,{range="Terpander"})
				else
					equip(sets.midcast.recast,sets.midcast.ballad)
				end

			elseif spell.english == "Sentinel's Scherzo" then
				if instrument == 2 then
					equip(sets.midcast.scherzo, {range="Terpander", "Aoidos' Cothurnes +2"})
				else
					equip(sets.midcast.scherzo,{"Aoidos' Cothurnes +2"})
				end

			elseif string.find(spell.english,'Carol') then
				if instrument == 2 then
					equip(sets.midcast.scherzo, {range="Terpander"})
				else
					equip(sets.midcast.scherzo)
				end

			elseif string.find(spell.english,'Mambo') or string.find(spell.english,'Prelude') or string.find(spell.english,'Etude') then
				if instrument == 2 then
					equip(sets.midcast.noskill,{range="Terpander"})
				else
					equip(sets.midcast.noskill)
				end

			elseif string.find(spell.english,'Mazurka') or string.find(spell.english,'Hymnus') or string.find(spell.english,'Paeon') then
				if instrument == 2 then
					equip(sets.midcast.recast,{range="Terpander"})
				else
					equip(sets.midcast.recast)
				end

			elseif string.find(spell.english,'Elegy') or string.find(spell.english,"Nocturne") or string.find(spell.english,'Threnody') or string.find(spell.english,'Finale') then
				if instrument == 2 then
					instrument = 1
					equip(sets.midcast.debuff)
				end

			elseif spell.english == 'Foe Lullaby' then
				if instrument == 2 then
					instrument = 1
					equip(sets.midcast.debuff,sets.midcast.recast)
				end

			elseif string.find(spell.english,'Horde Lullaby') then
				equip(sets.midcast.debuff,sets.midcast.recast,{range="Terpander"})
			end

		elseif spell.type == 'BardSong' then
			if instrument == 2 then
				equip(sets.precast.song,{range="Terpander"})
			else
				equip(sets.precast.song)
			end

		elseif spell.skill == "Healing Magic" then
			if string.find(spell.english,'Cur') and spell.name ~= 'Cursna' then
				equip(sets.precast.cure)
			else
				equip(sets.precast.FC)
			end

		else
			equip(sets.precast.FC)
		end

	elseif spell.action_type == 'JobAbility' then
		if sets.precast.JA[spell.english] then equip(sets.precast.JA[spell.english]) end
	end
end

function midcast(spell)
	if spell.action_type == 'Magic' then
		if spell.type == 'BardSong' then
			if string.find(spell.english,'Valor Minuet') then
				if instrument == 2 then
					equip(sets.midcast.noskill,{range="Terpander", body="Aoidos' Hongreline +2"})
				else
					equip(sets.midcast.noskill,{body="Aoidos' Hongreline +2"})
				end

			elseif string.find(spell.english,"Knight's Minne") then
				if instrument == 2 then
					equip(sets.midcast.noskill,{range="Terpander"})
				else
					equip(sets.midcast.noskill)
				end

			elseif string.find(spell.english,'March') then
				if instrument == 2 then
					equip(sets.midcast.noskill, {range="Terpander", hands="Aoidos' Manchettes +2"})
				else
					equip(sets.midcast.noskill,{hands="Aoidos' Manchettes +2"})
				end

			elseif string.find(spell.english,'Madrigal') then
				if instrument == 2 then
					equip(sets.midcast.noskill,{range="Terpander", head="Aoidos' Calot +2"})
				else
					equip(sets.midcast.noskill,{head="Aoidos' Calot +2"})
				end

			elseif string.find(spell.english,'Ballad') then
				if instrument == 2 then
					equip(sets.midcast.recast,sets.midcast.ballad,{range="Terpander"})
				else
					equip(sets.midcast.recast,sets.midcast.ballad)
				end

			elseif string.find(spell.english,'Scherzo') then
				if instrument == 2 then
					equip(sets.midcast.scherzo,{range="Terpander", "Aoidos' Cothurnes +2"})
				else
					equip(sets.midcast.scherzo,{"Aoidos' Cothurnes +2"})
				end

			elseif string.find(spell.english,'Carol') then
				if instrument == 2 then
					equip(sets.midcast.scherzo, {range="Terpander"})
				else
					equip(sets.midcast.scherzo)
				end

			elseif string.find(spell.english,'Mambo') or string.find(spell.english,'Prelude') or string.find(spell.english,'Etude') then
				if instrument == 2 then
					equip(sets.midcast.noskill, {range="Terpander"})
				else
					equip(sets.midcast.noskill)
				end

			elseif string.find(spell.english,'Mazurka') or string.find(spell.english,'Hymnus') or string.find(spell.english,'Paeon') then
				if instrument == 2 then
					equip(sets.midcast.recast,{range="Terpander"})
				else
					equip(sets.midcast.recast)
				end

			elseif debuff:contains(spell.name) then
				if instrument == 2 then
					instrument = 1
					equip(sets.midcast.debuff)
				end

			elseif string.find(spell.english,'Foe Lullaby') then
				if instrument == 2 then
					instrument = 1
					equip(sets.midcast.debuff,sets.midcast.recast)
				end

			elseif string.find(spell.english,'Horde Lullaby') then
				equip(sets.midcast.debuff,{range="Terpander"})
			end

		elseif spell.skill == 'Healing Magic' then
			if string.find(spell.english,'Cur') and spell.name ~= 'Cursna' then
				equip(sets.midcast.cure)
			else
				equip(sets.midcast.recast)
			end

		elseif spell.skill == 'Enhancing Magic' then
			if string.find(spell.english,'Stoneskin') then
				equip(sets.midcast.stoneskin)
			end
		end
	end
end

function aftercast(spell)
	if idleset == 1 then
		equip(sets.idle.standard)
	elseif idleset == 2 then
		equip(sets.idle.PDT)
	end
end

function self_command(command)
    if command == 'toggle self set' then
        idleset = idleset +1
        if idleset > 2 then
			idleset = 1
			send_command('@input /echo ----- Standard Set -----')
			equip(sets.idle.standard)
		elseif idleset == 2 then
			send_command('@input /echo ----- PDT Set -----')
			equip(sets.idle.PDT)
		end
	elseif command == 'set idle' then
		if idleset == 1 then
			send_command('@input /echo ----- Idle Set -----')
			equip(sets.idle.standard)
		elseif idleset == 2 then
			send_command('@input /echo ----- PDT Set -----')
			equip(sets.idle.PDT)
		end
	elseif command == 'toggle harp' then
		instrument = instrument +1
		if instrument > 2 then
			instrument = 1
			send_command('@input /echo ----- Third Song Disabled -----')
		elseif instrument == 2 then
			send_command('@input /echo ----- Third Song Enabled -----')
		end
	end
end