How Can I Be A Strictly Less Turrible Whm?

function get_sets()
		
	sets.aftercast_Idle_noSub = {main="Owleyes",sub="Genbu's Shield",ammo="Incantor Stone",
		head="Nefer Khat",neck="Twilight Torque",ear1="Lifestorm Earring",ear2="Loquacious Earring",
		body="Heka's Kalasiris",hands="Serpentes Cuffs",ring1="Sirona's ring",ring2="Aquasoul Ring",
		back="Umbra Cape",waist="Witful Belt",legs="Nares Trews",feet="Serpentes Sabots"}
	
	sets.aftercast_Idle_Sub = {main="Owleyes",sub="Genbu's Shield",ammo="Incantor Stone",
		head="Nefer Khat",neck="Twilight Torque",ear1="Lifestorm Earring",ear2="Loquacious Earring",
		body="Heka's Kalasiris",hands="Serpentes Cuffs",ring1="Sirona's ring",ring2="Aquasoul Ring",
		back="Umbra Cape",waist="Witful Belt",legs="Nares Trews",feet="Serpentes Sabots"}
	
	sets.aftercast_Idle = sets.aftercast_Idle_noSub
	
	sets.aftercast_Move = {main="Owleyes",sub="Genbu's Shield",ammo="Incantor Stone",
		head="Nefer Khat",neck="Twilight Torque",ear1="Lifestorm Earring",ear2="Loquacious Earring",
		body="Heka's Kalasiris",hands="Serpentes Cuffs",ring1="Sirona's ring",ring2="Aquasoul Ring",
		back="Umbra Cape",waist="Witful Belt",legs="Nares Trews",feet="Desert Boots"}
		
	sets.precast_FastCast = {ammo="Incantor Stone",head="Nahtirah Hat",ear2="Loquacious Earring",
		body="Anhur Robe",hands="Gendewitha Gages",back="Swith Cape",legs="Orvail Pants",feet="Chelona Boots",waist="Siegel Sash"}
	
	sets.precast_Cure = {ammo="Incantor Stone",head="Nahtirah Hat",ear2="Loquacious Earring",
		body="Heka's Kalasiris",hands="Gendewitha Gages",back="Pahtli Cape",legs="Orsn. Pantaln. +2",feet="Cure Clogs"}
	
	sets.Resting = {main="Chatoyant Staff",sub="Mephitis Grip",
		head="Nahtirah Hat",neck="Twilight Torque",ear1="Lifestorm Earring",ear2="Loquacious Earring",
		body="Hagondes Coat",hands="Nares Cuffs",ring1="Sangoma Ring",ring2="Maquette Ring",
		back="Shadow Mantle",waist="Korin Obi",legs="Nares Trews",feet="Chelona Boots"}
	
	sets.midcast_ElementalMagic = {ammo="Kalboron Stone",
	main="Eminent Staff",sub="Mephitis Grip",head="Nahtirah Hat",body="Hedera Cotehardie",hands="Otomi Gloves",legs="Theo. Pantaloons",feet="Nares Clogs",
	neck="Eddy Necklace",waist="Cascade Belt",left_ear="Hecate's Earring",right_ear="Friomisi Earring",left_ring="Maquette Ring",right_ring="Aquasoul Ring",
    back="Refraction Cape",}
	
	sets.midcast_DarkMagic = {main="Eminent Staff",sub="Mephitis Grip",ammo="Incantor Stone",head="Nahtirah Hat",
	body="Hedera Cotehardie",hands="Gendewitha Gages",legs="Bokwus Slops",feet="Theo. Duckbills +1",neck="Eddy Necklace",waist="Cascade Belt",
    left_ear="Lifestorm Earring",right_ear="Psystorm Earring",left_ring="Maquette Ring",right_ring="Archon Ring",
    back="Refraction Cape",}	
	
	sets.midcast_EnfeeblingMagic = { ammo="Kalboron Stone",
    main="Eminent Staff",sub="Mephitis Grip",head="Nahtirah Hat",body="Theo. Briault +1",hands="Lurid Mitts",legs="Bokwus Slops",feet="Theo. Duckbills +1",
    neck="Eddy Necklace",waist="Cascade Belt",left_ear="Lifestorm Earring",right_ear="Psystorm Earring",left_ring="Maquette Ring",right_ring="Aquasoul Ring",
    back="Refraction Cape",}
	
	sets.midcast_EnfeeblingAccuracy = { ammo="Kalboron Stone",
    main="Eminent Staff",sub="Mephitis Grip",head="Nahtirah Hat",body="Theo. Briault +1",hands="Lurid Mitts",legs="Bokwus Slops",feet="Theo. Duckbills +1",
    neck="Enfeebling Torque",waist="Cascade Belt",left_ear="Lifestorm Earring",right_ear="Psystorm Earring",left_ring="Maquette Ring",right_ring="Sangoma Ring",
    back="Refraction Cape"}
	
	sets.midcast_Impact = {main="Atinian Staff",sub="Wizzan Grip",ammo="Witchstone",
		neck="Eddy Necklace",ear1="Hecate's Earring",ear2="Novio Earring",
		hands="Yaoyotl Gloves",ring1="Strendu Ring",ring2="Icesoul Ring",
		back="Searing Cape",waist="Maniacus Sash",legs="Hagondes Pants",feet="Bokwus Boots"}
	
	sets.midcast_Embrava = {main="Beneficus",
		head="Orison Cap +2",neck="Colossus's Torque",ear1="Lifestorm Earring",ear2="Loquacious Earring",
		body="Orison Bliaud +2",hands="Augur's Gloves",
		back="Merciful Cape",waist="Cascade Belt",legs="Piety Pantaloons",feet="Orison Duckbills +1"}
	
	sets.midcast_EnhancingRecast = {main="Beneficus",ammo="Incantor Stone",
		head="Nahtirah Hat",neck="Colossus's Torque",ear1="Lifestorm Earring",ear2="Loquacious Earring",
		body="Theo. briault +1",hands="Dynasty Mitts",
		back="Swith Cape",waist="Goading Belt",legs="Orvail Pants",feet="Piety Duckbills +1"}
		
	sets.midcast_EnhancingMagic = {main="Beneficus",ammo="Incantor Stone",
		head="Nabu's tiara",neck="Colossus's Torque",ear1="Lifestorm Earring",ear2="Loquacious Earring",
		body="Hyksos Robe",hands="Dynasty Mitts",
		back="Swith Cape",waist="Ninurta's Sash",legs="Piety Pantaloons",feet="Orsn. Duckbills +2"}
	
	sets.midcast_BarSpell = {main="Beneficus",sub="Genbu's Shield",ammo="Incantor Stone",
		head="Orison Cap +2",neck="Colossus's Torque",ear1="Lifestorm Earring",ear2="Loquacious Earring",
		body="Orison Bliaud +2",hands="Orison Mitts +2",
		back="Merciful Cape",waist="Olympus Sash",legs="Piety Pantaloons",feet="Orison Duckbills +2"}
		
	sets.midcast_Regen = set_combine(sets.midcast_BarSpell,{legs="Theophany pantaloons",feet="Gendewitha galoshes",body="Piety Briault"})	
		
	sets.midcast_DebuffRemoval = {main="Yagrush",ammo="Incantor Stone",
		head="Orison Cap +2",neck="Malison Medallion",ear1="Lifestorm Earring",ear2="Loquacious Earring",
		body="Orison Bliaud +2",hands="Orison Mitts +2",ring1="Ephedra Ring", ring2="Ephedra Ring",
		back="Swith Cape",waist="Cascade Belt",legs="Theophany pantaloons",feet="Gendewitha Galoshes"}
	
	sets.precast_Stun = {main="Apamajas II"}
		
	sets.midcast_Curaga = {ammo="Incantor Stone",
    main="Tamaxchi",sub="Genbu's Shield",head="Gende. Caubeen",body="Theo. Briault +1",hands="Theo. Mitts +1",legs="Orsn. Pantaln. +2",
	feet="Piety Duckbills +1",neck="Nuna Gorget",waist="Cascade Belt",ear2="Cmn. Earring",ear1="Lifestorm Earring",left_ring="Sirona's Ring",
	right_ring="Aquasoul Ring",back="Pahtli Cape",}
	
	sets.midcast_WCure = 
	{
    main="Chatoyant Staff",
    sub="Mephitis Grip",
    ammo="Incantor Stone",
    head="Gende. Caubeen",
    body="Orison Bliaud +2",
    hands="Bokwus Gloves",
    legs="Orsn. Pantaln. +2",
    feet="Piety Duckbills +1",
    neck="Colossus's Torque",
    waist="Korin Obi",
    left_ear="Roundel Earring",
    right_ear="Beatific Earring",
    left_ring="Sirona's Ring",
    right_ring="Ephedra Ring",
    back="Twilight Cape",
}

		
	sets.midcast_Cure = {main="Tamaxchi",head="Gendewitha caubeen",neck="Colossus's Torque",
	body="Orison Bliaud +2",hands="Theo. Mitts +1",back="Tempered Cape",legs="Orsn. Pantaln. +2",
	ring1="Sirona's Ring", ring2="Ephedra Ring", feet="Theo. Duckbills +1", waist="Bishop's Sash",
	ear2="Beatific Earring", ear1="Roundel Earring"}
	
	sets.midcast_Helix = {main="Chatoyant Staff",sub="Wizzan Grip",ammo="Snow Sachet",
		head="Nahtirah Hat",neck="Stoicheion Medal",ear1="Hecate's Earring",ear2="Novio Earring",
		body="Nares Saio",hands="Nares Cuffs",ring1="Icesoul Ring",ring2="Icesoul Ring",
		back="Twilight Cape",waist="Wanion Belt",legs="Akasha Chaps",feet="Nares Clogs"}
	
	sets.midcast_Stoneskin = set_combine(sets.midcast_BarSpell,{main="Benificus",neck="Stone Gorget",waist="Siegel Sash",legs="Haven Hose",Ear1="Earthcry Earring"})
	
	sets.Obi = {}
	sets.Obi.Light = {waist='Korin Obi',back='Twilight Cape',lring='Chatoyant Staff'}

end

function precast(spell,action)
	if spell.skill=='HealingMagic' then
		if T{"Cure"}:contains(spell.name) and spell.cast_time < 6 then
		cast_delay(0.1)
		equip(sets.precast_Cure)
		end
		if T{"Curaga"}:contains(spell.name) and spell.cast_time < 15 then
		cast_delay(0.1)
		equip(sets.precast_Cure)
		else
		equip(sets['precast_FastCast'])
		cast_delay(0.1)
		end
	elseif spell.skill=='ElementalMagic' and spell.cast_time < 3 then
		cast_delay(0.1)
		equip(sets.midcast_ElementalMagic)
		if spell.element == 'Earth' then
			equip({neck="Quanpur Necklace"})
		end
		if spell.element == world.weather_element or spell_element == world.day_element and sets.Obi[spell.element] then
			equip(sets.Obi[spell.element])
		end
	elseif spell.skill == 'EnhancingMagic' then
		if T{"Barfira","Barfire","Barwater","Barwatera","Barstone","Barstonra","Baraero","Baraera","Barblizzara",
		"Barblizzard","Barthunder","Barthundra"}:contains(spell.name) then 
			equip (sets['midcast_BarSpell'])
		elseif T{"Paralyna","Silena","Viruna","Erase","Cursna","Stona","Blindna","Poisona"}:contains(spell.name) then
			equip (sets['midcast_DebuffRemoval'])
		else
		equip(sets['precast_FastCast'])
		cast_delay(0.1)
		end
	else
		equip(sets['precast_FastCast'])
		cast_delay(0.5)
	end
end

function midcast(spell,action)
	if spell.skill=='DivineMagic' then	
		equip(sets.midcast_ElementalMagic)

	elseif spell.skill=='HealingMagic' then	
		if T{"Cure","Cure II","Cure III","Cure IV","Cure V","Cure VI"}:contains(spell.name) and spell.cast_time < 6 then
			if  world.day =='Lightsday' or  world.weather_element == 'Light'  or Buffactive == 'Aurorastorm'then
				equip(sets.midcast_WCure)
				else
				equip(sets.midcast_Cure)
				end
		elseif T{"Curaga","Curaga II","Curaga III","Curaga IV","Curaga V"}:contains(spell.name) and spell.cast_time < 6 then
		equip(sets.midcast_Curaga)
		elseif T{"Paralyna","Silena","Viruna","Erase","Cursna","Stona","Blindna","Poisona"}:contains(spell.name) then
			equip (sets['midcast_DebuffRemoval'])
		elseif T{"Protectra V","Shellra V"}:contains(spell.name) then
			equip(sets['midcast_Barspell'])
		else
		equip(sets.midcast_DebuffRemoval)
		end
	elseif spell.skill=="EnfeeblingMagic" then
			equip(sets.midcast_EnfeeblingMagic)
			if T{"Silence"}:contains(spell.name) then
			send_command('@wait 1;input /echo ------- Silence Landed -------')
			equip(sets.midcast_EnfeeblingAccuracy)
			end
	elseif spell.skill=="ElementalMagic" then
			equip(sets['midcast_Nuke'])
	elseif spell.skill == 'EnhancingMagic' then
		if T{"Barfira","Barfire","Barwater","Barwatera","Barstone","Barstonra","Baraero","Baraera","Barblizzara",
		"Barblizzard","Barthunder","Barthundra"}:contains(spell.name) then 
			equip (sets['midcast_BarSpell'])
		elseif T{"Paralyna","Silena","Viruna","Erase","Cursna","Stona","Blindna","Poisona"}:contains(spell.name) then
			equip (sets['midcast_DebuffRemoval'])
		elseif spell.english == 'Stoneskin' then
		equip(sets['midcast_Stoneskin'])
		elseif T{"Haste","Refresh"}:contains(spell.name) then 
			equip(sets['midcast_EnhancingRecast'])
		elseif string.find(spell.english,'Boost') then
			equip(sets['midcast_EnhancingMagic'])
		elseif string.find(spell.english,'Regen') then
			equip(sets['midcast_Regen'])
		elseif string.find(spell.english,'Protect') then
			equip (set_combine(sets['midcast_BarSpell'],{feet="Piety Duckbills +1"}))
		elseif string.find(spell.english,'Shell') then
			equip(sets['midcast_BarSpell'])
		else
		equip(sets['midcast_BarSpell'])
		end
	elseif string.find(spell.english,'Protect') then
			equip (set_combine(sets['midcast_BarSpell'],{feet="Piety Duckbills +1"}))
	elseif string.find(spell.english,'Shell') then
			equip(sets['midcast_BarSpell'])
	else
		equip(sets['midcast_EnhancingMagic'])
	end
end		

function aftercast(spell,action)
	equip(sets['aftercast_Idle'])
end

function status_change(new,action)
        if new=='Idle' then
                Idle()
        elseif new=='Resting' then
                equip(sets.Resting)
        end
end
function buff_change(buff,gain_or_loss)
        if buff == "Sandstorm" then
                Idle()
        end
end

function Idle()
        if buffactive['Sandstorm'] then
                equip(sets.aftercast_Move)
				send_command('@wait 1;input /echo ------- Sandstorm Move Wear Activated -------')
        else
                equip(sets.aftercast_idle)
        end
end

function pet_midcast(spell,action)
end

function pet_aftercast(spell,action)
end

	

-- This function is user defined, but never called by GearSwap itself. It's just a user function that's only called from user functions. I wanted to check the weather and equip a weather-based set for some spells, so it made sense to make a function for it instead of replicating the conditional in multiple places.

function weathercheck(spell_element,set)
	if spell_element == world.weather_element or spell_element == world.day_element then
		equip(set,sets['Obi_'..spell_element])
	else
		equip(set)
	end
end