Xodia_BRD

	function get_sets()

		Cycle1 = 'OFF'
		Cycle2 = 'OFF'
		Cycle3 = 'OFF'
		Cycle4 = 'OFF'
		Cycle5 = 'OFF'
		Cycle6 = 'OFF'
		Cycle7 = 'OFF'
		Cycle8 = 'OFF'

		songcount = 3

		sets.None = {}

		sets.Idle = {main="Terra's Staff",sub="Mephitis Grip",
					head="Umuthi Hat",neck="Twilight Torque",ear1="Loquac. Earring",ear2="Ethereal Earring",
					body="Gendewitha Bilaut",hands="Serpentes Cuffs",ring1="Defending Ring",ring2="Dark Ring",
					back="Cheviot Cape",waist="Flume Belt",legs="Nares Trews",feet="Aoidos' Cothrn. +2"}

		sets.DT = {}

			sets.DT.Mode = sets.None

		sets.precast = {}

			sets.precast.FC = 	{head="Nahtirah Hat",neck="Jeweled Collar",ear1="Loquac. Earring",
								body="Anhur Robe",hands="Gendewitha Gages",ring1="Prolix Ring",
								back="Swith Cape",waist="Witful Belt",legs="Orvail Pants +1",feet="Chelona Boots",}

			sets.precast.Singing = 	set_combine(sets.precast.FC,
									{main="Felibre's Dague",ammo="None",
									head="Aoidos' Calot +2",neck="Aoidos' Matinee",body="Sha'ir Manteel",ear2="Aoidos' Earring",
									legs="Gendewitha Spats",feet="Bihu Slippers"})

			sets.precast.Cure = set_combine(sets.precast.FC,
								{body="Heka's Kalasiris",
								 back="Pahtli Cape",
								 legs="Nabu's Shalwar",
								 feet="Gendewitha Galoshes"})

			sets.precast.Enhancing = 	set_combine(sets.precast.FC,
										{waist="Siegel Sash"})

			sets.precast.Stoneskin = 	set_combine(sets.precast.Enhancing,
										{hands="Carapacho Cuffs"})

		sets.midcast = {}

			sets.midcast.Singing = 	{main="Legato Dagger",ammo="None",
									head="Aoidos' Calot +2",neck="Aoidos' Matinee",
									body="Aoidos' Hngrln. +2",hands="Ad. Mnchtte. +2",
									legs="Marduk's Shalwar +1",feet="Brioso Slippers +1"}

			sets.midcast.Cure = {main="Chatoyant Staff",
								head="Gende. Caubeen",neck="Colossus's Torque",ear1="Loquac. Earring",ear2="Lifestorm Earring",
								body="Heka's Kalasiris",hands="Bokwus Gloves",ring1="Balrahn's Ring",ring2="Sangoma Ring",
								back="Pahtli Cape",waist="Demonry Sash",legs="Nares Trews",feet="Gendewita Galoshes"}

			sets.midcast.Enfeebling = 	{main="Lehbrailg +2",sub="Mephitis Grip",
										head="Bihu Roundlet +1",neck="Barcarolle Medal",ear1="Gwati Earring",ear2="Musical Earring",
										body="Brioso Just. +1",hands="Ad. Mnchtte. +2",ring1="Perception Ring",ring2="Sangoma Ring",
										back="Rhapsode's Cape",waist="Demonry Sash",legs="Bihu Cannions +1",feet="Brioso Slippers +1"}

			sets.midcast.Recast = 	{head="Gende. Caubeen",neck="jeweled Collar",ear1="Loquac. Earring",
									body="Gendewitha Bilaut",hands="Genewitha Gages",ring1="Prolix Ring",
									back="Swith Cape",waist="Witful Belt",legs="Gendewitha Spats",feet="Brioso Slippers +1"}


		sets.JA = {}

			sets.JA.Troubadour = {body="Bihu Justaucorps"}

			sets.JA.Nightingale = {feet="Bihu Slippers"}

			sets.JA['Soul Voice'] = {legs="Bihu Cannions +1"}

		--Obis--
		sets.Obi = {}

			sets.Obi.Fire = {waist="Karin Obi"}
			sets.Obi.Earth = {waist="Dorin Obi"}
			sets.Obi.Water = {waist="Suirin Obi"}
			sets.Obi.Wind = {waist="Furin Obi"}
			sets.Obi.Ice = {waist="Hyorin Obi"}
			sets.Obi.Thunder = {waist="Rairin Obi"}
			sets.Obi.Light = {waist="Korin Obi"}
			sets.Obi.Dark = {waist="Anrin Obi"}

		Obi = {}

			Obi.Fire = 'Karin Obi'
			Obi.Earth = 'Dorin Obi'
			Obi.Water = 'Suirin Obi'
			Obi.Wind = 'Furin Obi'
			Obi.Ice = 'Hyorin Obi'
			Obi.Thunder = 'Rairin Obi'
			Obi.Light = 'Korin Obi'
			Obi.Dark = 'Anrin Obi'

	end

	function build_sets()

		send_command('@gs c Update')

	end

	function pretarget(spell)

		if buffactive['Pianissimo'] and
		spell.skill == 'Singing' then
			if spell.target.raw == '<me>' then
				change_target('<t>')
			end
		end

	end

	function precast(spell)

		if spell.english == 'Pianissimo' or
		spell.english == 'Tenuto' then
			return
		end

		if spell.action_type == 'Magic' then
			equip(sets.precast.FC)
			if buffactive['silence'] then
				cancel_spell()
				add_to_chat(158,'== Silenced! Unable to cast spells! ==')
			end
		end

		if spell.skill == 'Singing' then
			equip(sets.precast.Singing)
			if spell.target.type == 'MONSTER' then
				equip({main='Lehbrailg +2',sub='Mephitis Grip'})
			end
			if T{"Victory March","Advancing March"}:
			contains(spell.english) then
				equip({range="Gjallarhorn"})
			elseif T{"Archer's Prelude","Hunter's Prelude","Blade Madrigal","Sword Madrigal"}:
			contains(spell.english) then
				equip({range="Gjallarhorn"})
			elseif T{"Mage's Ballad","Mage's Ballad II","Mage's Ballad III"}:
			contains(spell.english) then
				equip({range="Gjallarhorn"})
			elseif T{"Magic Finale","Foe Lullaby","Foe Lullaby II"}:
			contains(spell.english) then
				equip({range="Gjallarhorn"})
			elseif T{"Valor Minuet","Valor Minuet II","Valor Minuet III","Valor Minuet IV","Valor Minuet V"}:
			contains(spell.english) then
				equip({range="Gjallarhorn"})
			elseif T{"Army's Paeon","Army's Paeon II","Army's Paeon III","Army's Paeon IV","Army's Paeon V","Army's Paeon VI"}:
			contains(spell.english) then
				equip({range="Terpander"})
			elseif T{"Horde Lullaby","Horde Lullaby II"}:
			contains(spell.english) then
				equip({range="Gjallarhorn",hands="Brioso Cuffs +1"})
			elseif T{'Foe Requiem','Foe Requiem II','Foe Requiem III','Foe Requiem IV','Foe Requiem V','Foe Requiem VI','Foe Requiem VII',}:
			contains(spell.english) then
				equip({range="Gjallarhorn"})
			else
				equip({range="Terpander"})
			end
		end

		if 	T{'Cure','Cure II','Cure III','Cure IV','Curaga','Curaga II','Cura'}:
		contains(spell.english) then
			equip(sets.precast.Cure)
		end

		if spell.skill == 'Enhancing Magic' then
			equip(sets.precast.Enhancing)
			if spell.english == 'Stoneskin' then
				equip(sets.precast.Stoneskin)
			end
		end

		if sets.JA[spell.english] then
			equip(sets.JA[spell.english])
		end

	end

	function midcast(spell,act)

		if spell.skill == 'Singing' then
			equip(sets.midcast.Singing)
			if spell.target.type == 'MONSTER' then
				equip(sets.midcast.Enfeebling)
			end
		end


		if T{"Mage's Ballad","Mage's Ballad II","Mage's Ballad III","Chocobo Mazurka","Raptor Mazurka"}:
		contains(spell.english) then
			equip({neck="Aoidos' Matinee",feet="Brioso Slippers +1"})
		end

		if 	T{'Cure','Cure II','Cure III','Cure IV','Curaga','Curaga II','Cura'}:
		contains(spell.english) then
			equip(sets.midcast.Cure)
			if T{world.day_element,world.weather_element}:
			contains(spell.element) then
				equip({main="Chatoyant Staff",back="Twilight Cape"})
				if player.inventory[Obi[spell.element]] then
					equip(sets.Obi[spell.element])
				end
			end
		end

		if T{'Haste','Raise','Paralyna','Silena','Blindna','Stona','Viruna','Poisona','Erase'}:
		contains(spell.english) then
			equip(sets.midcast.Recast)
		end

		if spell.english == 'Cursna' then
			equip(sets.midcast.Cursna)
		end

		if spell.english == 'Stoneskin' then
			equip(sets.midcast.Stoneskin)
		end

	end

	function aftercast(spell)

		if spell.english == 'Pianissimo' or
		spell.english == 'Tenuto' then
			return
		end

		if spell.english == 'Foe Lullaby' and
		not spell.interrupted then
			send_command('@timers c "'..spell.english..'['..spell.target.name..']" 39 down')
		end

		if spell.english == 'Foe Lullaby II' and
		not spell.interrupted then
			send_command('@timers c "'..spell.english..'['..spell.target.name..']" 78 down')
		end

		if spell.english == 'Horde Lullaby' and
		not spell.interrupted then
			send_command('@timers c "'..spell.english..'['..spell.target.name..']" 36 down')
		end

		if spell.english == 'Horde Lullaby II' and
		not spell.interrupted then
			send_command('@timers c "'..spell.english..'['..spell.target.name..']" 72 down')
		end

		if Cycle1 == 'ON' then
			if spell.english == "Archer's Prelude" then
				send_command('@wait 3;input /ma "Valor Minuet V" <me>')
			end
			if spell.english == 'Valor Minuet V' then
				if buffactive['Clarion Call'] or
				songcount == 4 then
					send_command("@wait 3;input /ma Hunter's Prelude <me>")
				else
					send_command("@wait 3;input /ma Army's Paeon VI <me>")
				end
			end
			if spell.english == "Hunter's Prelude" then
				send_command("@wait 3;input /ma Army's Paeon VI <me>")
			end
			if spell.english == "Army's Paeon VI" then
				send_command('@wait 3;input /ma "Valor Minuet IV" <me>')
			end
			if spell.english == 'Valor Minuet IV' then
				Cycle1 = 'OFF'
				add_to_chat(158,"Song Cycle 1: ["..Cycle1.."]")
			end
		end
		if Cycle2 == 'ON' then
			if spell.english == "Mage's Ballad III" then
				send_command("@wait 3;input /ja Pianissimo <me>;wait 1.5;input /ma Mage's Ballad II Oshawott")
			end
			if spell.english == "Mage's Ballad II" then
				if buffactive['Clarion Call'] or
				songcount == 4 then
					send_command("@wait 3;input /ja Pianissimo <me>;wait 1.5;input /ma Mage's Ballad Oshawott")
				else
					send_command("@wait 3;input /ja Pianissimo <me>;wait 1.5;input /ma Victory March Oshawott")
				end
			end
			if spell.english == "Mage's Ballad" then
					send_command("@wait 3;input /ja Pianissimo <me>;wait 1.5;input /ma Army's Paeon VI Oshawott")
			end
			if spell.english == "Army's Paeon VI" then
				send_command("@wait 3;input /ja Pianissimo <me>;wait 1.5;input /ma Victory March Oshawott")
			end
			if spell.english == "Victory March" then
				Cycle2 = 'OFF'
				add_to_chat(158,"Song Cycle 2: ["..Cycle2.."]")
			end
		end
		if Cycle3 == 'ON' then
			if spell.english == "Valor Minuet V" then
				send_command('@wait 3;input /ma "Advancing March" <me>')
			end
			if spell.english == 'Advancing March' then
				if buffactive['Clarion Call'] or
				songcount == 4 then
					send_command('@wait 3;input /ma "Valor Minuet IV" <me>')
				else
					send_command("@wait 3;input /ma Army's Paeon VI <me>")
				end
			end
			if spell.english == "Valor Minuet IV" then
				send_command("@wait 3;input /ma Army's Paeon VI <me>")
			end
			if spell.english == "Army's Paeon VI" then
				send_command('@wait 3;input /ma "Victory March" <me>')
			end
			if spell.english == 'Victory March' then
				Cycle3 = 'OFF'
				add_to_chat(158,"Song Cycle 3: ["..Cycle3.."]")
			end
		end
		if Cycle4 == 'ON' then
			if spell.english == "Mage's Ballad III" then
				send_command("@wait 3;input /ma Mage's Ballad II <me>")
			end
			if spell.english == "Mage's Ballad II" then
				if buffactive['Clarion Call'] or
				songcount == 4 then
					send_command('@wait 3;input /ma "Victory March" <me>')
				else
					send_command("@wait 3;input /ma Army's Paeon VI <me>")
				end
			end
			if spell.english == "Victory March" then
				send_command("@wait 3;input /ma Army's Paeon VI <me>")
			end
			if spell.english == "Army's Paeon VI" then
				send_command("@wait 3;input /ma Mage's Ballad <me>")
			end
			if spell.english == "Mage's Ballad" then
				Cycle4 = 'OFF'
				add_to_chat(158,"Song Cycle 4: ["..Cycle4.."]")
			end
		end
		if Cycle5 == 'ON' then
			if spell.english == "Valor Minuet IV" then
				send_command('@wait 3;input /ma "Valor Minuet III" <me>')
			end
			if spell.english == 'Valor Minuet III' then
				if buffactive['Clarion Call'] or
				songcount == 4 then
					send_command('@wait 3;input /ma "Valor Minuet" <me>')
				else
					send_command("@wait 3;input /ma Army's Paeon VI <me>")
				end
			end
			if spell.english == "Valor Minuet" then
				send_command("@wait 3;input /ma Army's Paeon VI <me>")
			end
			if spell.english == "Army's Paeon VI" then
				send_command('@wait 3;input /ma "Valor Minuet II" <me>')
			end
			if spell.english == 'Valor Minuet II' then
				Cycle5 = 'OFF'
				add_to_chat(158,"Song Cycle 5: ["..Cycle5.."]")
			end
		end
		if Cycle6 == 'ON' then
			if spell.english == "Archer's Prelude" then
				send_command('@wait 3;input /ja Pianissimo <me>;wait 1.5;input /ma "Valor Minuet V" Zubrin')
			end
			if spell.english == 'Valor Minuet V' then
				if buffactive['Clarion Call'] or
				songcount == 4 then
					send_command("@wait 3;input /ja Pianissimo <me>;wait 1.5;input /ma Hunter's Prelude Zubrin")
				else
					send_command("@wait 3;input /ja Pianissimo <me>;wait 1.5;input /ma Army's Paeon VI Zubrin")
				end
			end
			if spell.english == "Hunter's Prelude" then
				send_command("@wait 3;input /ja Pianissimo <me>;wait 1.5;input /ma Army's Paeon VI Zubrin")
			end
			if spell.english == "Army's Paeon VI" then
				send_command('@wait 3;input /ja Pianissimo <me>;wait 1.5;input /ma "Valor Minuet IV" Zubrin')
			end
			if spell.english == 'Valor Minuet IV' then
				Cycle6 = 'OFF'
				add_to_chat(158,"Song Cycle 6: ["..Cycle6.."]")
			end
		end
		if Cycle7 == 'ON' then
			if spell.english == "Archer's Prelude" then
				send_command("@wait 3;input /ma Hunter's Prelude <me>")
			end
			if spell.english == "Hunter's Prelude" then
				if buffactive['Clarion Call'] or
				songcount == 4 then
					send_command("@wait 3;input /ma Valor Minuet IV <me>")
				else
					send_command("@wait 3;input /ma Army's Paeon VI <me>")
				end
			end
			if spell.english == "Valor Minuet IV" then
				send_command("@wait 3;input /ma Army's Paeon VI <me>")
			end
			if spell.english == "Army's Paeon VI" then
				send_command('@wait 3;input /ma "Valor Minuet V" <me>')
			end
			if spell.english == 'Valor Minuet V' then
				Cycle7 = 'OFF'
				add_to_chat(158,"Song Cycle 7: ["..Cycle7.."]")
			end
		end
		if Cycle8 == 'ON' then
			if spell.english == "Mage's Ballad III" then
				send_command("@wait 3;input /ja Pianissimo <me>;wait 1.5;input /ma Mage's Ballad II Oshawott")
			end
			if spell.english == "Mage's Ballad II" then
				Cycle8 = 'OFF'
				add_to_chat(158,"Song Cycle 8: ["..Cycle8.."]")
			end
		end


		if player.status == 'Engaged' then
			equip(set_combine(sets.TP.Final,sets.DT.Mode))
		else
			equip(set_combine(sets.Idle,sets.DT.Mode))
		end

	end

	function status_change(new,old)

		if new == 'Engaged' then
			equip(set_combine(sets.TP.Final,sets.DT.Mode))
		else
			equip(set_combine(sets.Idle,sets.DT.Mode))
		end

	end

	function self_command(command)

		if command == 'Update' then
			if player.status == 'Engaged' then
				equip(set_combine(sets.TP.Final,sets.DT.Mode))
			else
				equip(set_combine(sets.Idle,sets.DT.Mode))
			end
		end

		if command == 'SongCycle1' then
			Cycle1 = 'ON'
			add_to_chat(158,"Song Cycle 1: ["..Cycle1.."]")
			send_command("@input /ma Archer's Prelude <me>")
		end

		if command == 'SongCycle2' then
			Cycle2 = 'ON'
			add_to_chat(158,"Song Cycle 2: ["..Cycle2.."]")
			send_command("@input /ja Pianissimo <me>;wait 1.5;input /ma Mage's Ballad III Oshawott")
		end

		if command == 'SongCycle3' then
			Cycle3 = 'ON'
			add_to_chat(158,"Song Cycle 3: ["..Cycle3.."]")
			send_command("@input /ma Valor Minuet V <me>")
		end

		if command == 'SongCycle4' then
			Cycle4 = 'ON'
			add_to_chat(158,"Song Cycle 4: ["..Cycle4.."]")
			send_command("@input /ja Tenuto <me>;wait 1.5;input /ma Mage's Ballad III <me>")
		end

		if command == 'SongCycle5' then
			Cycle5 = 'ON'
			add_to_chat(158,"Song Cycle 5: ["..Cycle5.."]")
			send_command("@input /ma Valor Minuet IV <me>")
		end

		if command == 'SongCycle6' then
			Cycle6 = 'ON'
			add_to_chat(158,"Song Cycle 6: ["..Cycle6.."]")
			send_command("@input /ja Pianissimo <me>;wait 1.5;input /ma Archer's Prelude Zubrin")
		end

		if command == 'SongCycle7' then
			Cycle7 = 'ON'
			add_to_chat(158,"Song Cycle 7: ["..Cycle7.."]")
			send_command("@input /ma Archer's Prelude <me>")
		end

		if command == 'SongCycle8' then
			Cycle8 = 'ON'
			add_to_chat(158,"Song Cycle 8: ["..Cycle8.."]")
			send_command("@input /ja Pianissimo <me>;wait 1.5;input /ma Mage's Ballad III Oshawott")
		end

		if command == 'Vars' then
			add_to_chat(158,"Prelude: "..Cycle1.." PB: "..Cycle2.." March: "..Cycle3.." TB: "..Cycle4.."")
		end

		if command == 'SongCount' then
			if songcount == 3 then
				songcount = 4
				add_to_chat(158,'Song Count: '..songcount..'')
			elseif songcount == 4 then
				songcount = 3
				add_to_chat(158,'Song Count: '..songcount..'')
			end
		end

	end