All For One, And More For Me: A Guide To Red Mage

function job_post_midcast(spell, action, spellMap, eventArgs)
    if spell.skill == 'Enfeebling Magic' and state.Buff.Saboteur then
        equip(sets.buff.Saboteur)
    elseif spell.skill == 'Enhancing Magic' then
        if buffactive.composure and spell.target.type == 'PLAYER' then
            equip(sets.buff.ComposureOther)	
		elseif (spell.name == "Refresh" or spell.name == "Refresh II") and spell.target.type == 'SELF' then
			equip(sets.midcast.RefreshSelf)
		elseif spell.target.type == 'SELF' then
			equip(sets.midcast.EnhancingDuration)
		end
    elseif spellMap == 'Cure' and spell.target.type == 'SELF' then
        equip(sets.midcast.CureSelf)
    end
end

function job_post_midcast(spell, action, spellMap, eventArgs)
    if spell.skill == 'Enfeebling Magic' then
		if state.Buff.Stymie then
			equip(sets.buff.Stymie)
		elseif state.Buff.Saboteur then
			equip(sets.buff.Saboteur)
		end
    elseif spell.skill == 'Enhancing Magic' then
		if  info.Duration:contains(spell.english) then
			if buffactive.composure and spell.target.type == 'PLAYER' then
				equip(sets.buff.ComposureOther)
			else
			equip(sets.midcast.EnhancingDuration)
			end
		end
	elseif spellMap == 'Cure' and spell.target.type == 'SELF' then
        equip(sets.midcast.CureSelf)
    end
end

-------------------------------------------------------------------------------------------------------------------
-- Setup functions for this job.  Generally should not be modified.
-------------------------------------------------------------------------------------------------------------------

-- Initialization function for this job file.
function get_sets()
    mote_include_version = 2

    -- Load and initialize the include file.
    include('Mote-Include.lua')
	include('organizer-lib')
end


-- Setup vars that are user-independent.  state.Buff vars initialized here will automatically be tracked.
function job_setup()
    state.Buff.Saboteur = buffactive.saboteur or false
	
	Self_Spells = S{"Enstone","Enwater","Enaero","Enfire","Enblizzard","Enthunder","Enstone II","Enwater II","Enaero II","Enfire II","Enblizzard II","Enthunder II","Temper","Gain-STR","Gain-DEX","Gain-MND","Gain-INT","Gain-VIT","Gain-AGI","Gain-CHR","Stoneskin","Aquaveil","Phalanx"}
	FC_Spells = S{"Flurry II","Haste II","Haste","Utsusemi: Ichi","Utsusemi: Ni","Refresh","Refresh II","Regen","Regen II","Firestorm","Hailstorm","Windstorm","Rainstorm","Sandstorm","Voidstorm","Aurorastorm"}
		
end

-------------------------------------------------------------------------------------------------------------------
-- User setup functions for this job.  Recommend that these be overridden in a sidecar file.
-------------------------------------------------------------------------------------------------------------------

-- Setup vars that are user-dependent.  Can override this function in a sidecar file.
function user_setup()
    state.OffenseMode:options('None', 'Normal', 'Acc')
    state.HybridMode:options('Normal', 'PhysicalDef', 'MagicalDef')
    state.CastingMode:options('Normal', 'Resistant')
    state.IdleMode:options('Normal', 'PDT', 'MDT')

    gear.default.obi_waist = "Sekhmet Corset"
    state.MagicBurst = M(false, 'Magic Burst')	
    
    select_default_macro_book()
	
	info.Enhancing = S{"Enstone","Enwater","Enaero","Enfire","Enblizzard","Enthunder","Enstone II","Enwater II","Enaero II","Enfire II","Enblizzard II","Enthunder II","Temper","Gain-STR","Gain-DEX","Gain-MND","Gain-INT","Gain-VIT","Gain-AGI","Gain-CHR","Stoneskin","Aquaveil","Phalanx"}
	info.Duration = S{"Flurry II","Haste II","Haste","Utsusemi: Ichi","Utsusemi: Ni","Refresh","Refresh II","Regen","Regen II","Firestorm","Hailstorm","Windstorm","Rainstorm","Sandstorm","Voidstorm","Aurorastorm"}
	
    send_command('bind @F9 gs c set MagicBurst')
    send_command('bind @F10 gs c set MagicBurst false')	
end

function user_unload()
    send_command('unbind @F9')
    send_command('unbind @F10')	
end


-- Define sets and vars used by this job file.
function init_gear_sets()
    --------------------------------------
    -- Start defining the sets
    --------------------------------------
    
    -- Precast Sets
    
    -- Precast sets to enhance JAs
    sets.precast.JA['Chainspell'] = {body="Vitivation Tabard +1"}
    

    -- Waltz set (chr and vit)
    sets.precast.Waltz = {
		head="Atrophy Chapeau +1",
		body="Vitivation Tabard +1",hands="Chironic Gloves",
		back="Refraction Cape",legs="Osmium Cuisses",feet="Merlinic Crackows"}
        
    -- Don't need any special gear for Healing Waltz.
    sets.precast.Waltz['Healing Waltz'] = {}

    -- Fast cast sets for spells
    
    -- 80% Fast Cast (including trait) for all spells, plus 5% quick cast
    -- No other FC sets necessary.
	sets.precast.FC = {main="Emissary",sub="Beatific Shield +1",ammo="Impatiens",
		head="Atrophy Chapeau +1",ear2="Loquacious Earring",
		body="Vitivation Tabard +1",hands="Gendewitha Gages +1",ring1="Prolix Ring",ring2="Veneficium Ring",
		back="Swith Cape",waist="Witful Belt",legs="Artsieq Hose",feet="Chelona Boots"}

    sets.precast.FC.Impact = set_combine(sets.precast.FC, {head=empty,body="Twilight Cloak"})
       
    -- Weaponskill sets
    -- Default set for any weaponskill that isn't any more specifically defined
	sets.precast.WS = {
		head="Carmine Mask",neck="Asperity Necklace",ear1="Bladeborn Earring",ear2="Steelflash Earring",
		body="Emet Harness",hands="Chironic Gloves",ring1="Rajas Ring",ring2="K'ayres Ring",
		back="Atheling Mantle",waist="Windbuffet Belt +1",legs="Taeon Tights",feet={ name="Taeon Boots", augments={'Accuracy+20 Attack+20','"Triple Atk."+2','Crit. hit damage +3%',}}}

    -- Specific weaponskill sets.  Uses the base set if an appropriate WSMod version isn't found.
    sets.precast.WS['Requiescat'] = set_combine(sets.precast.WS, 
        {neck="Soil Gorget",ear1="Brutal Earring",ear2="Moonshade Earring",
        ring1="Aquasoul Ring",ring2="Aquasoul Ring",waist="Soil Belt"})

    sets.precast.WS['Sanguine Blade'] = {ammo="Witchstone",
        head="Merlinic Hood",neck="Eddy Necklace",ear1="Friomisi Earring",ear2="Hecate's Earring",
        body="Amalric Doublet",hands="Amalric Gages",ring1="Fenrir Ring",ring2="Acumen Ring",
        back="Toro Cape",legs="Merlinic Shalwar",feet="Merlinic Crackows"}

    
    -- Midcast Sets
    
    sets.midcast.FastRecast = {ammo="Sapience Orb",
        head="Atrophy Chapeau +1",ear2="Loquacious Earring",
        body="Vitivation Tabard",hands="Gendewitha Gages +1",ring1="Prolix Ring",
        back="Swith Cape",waist="Witful Belt",legs="Artsieq Hose",feet="Chelona Boots"}

	sets.midcast.Cure = {main="Tefnut Wand",sub="Genbu's Shield",
		head="Gendewitha Caubeen",neck="Weike Torque",ear1="Beatific Earring",ear2="Lifestorm Earring",
		body="Gendewitha Bliaut",hands="Chironic Gloves",ring1="Ephedra Ring",ring2="Sirona's Ring",
		back="Tempered Cape",waist="Hachirin-no-Obi",legs="Merlinic Shalwar",feet="Artsieq Boots"}
        
    sets.midcast.Curaga = sets.midcast.Cure
    sets.midcast.CureSelf = {ring1="Kunaji Ring",ring2="Asklepian Ring"}

	sets.midcast['Enhancing Magic'] = {
		head="Befouled Crown",neck="Eddy Necklace",
		body="Vitivation Tabard +1",hands="Chironic Gloves",ring1="Prolix Ring",
		back="Sucellos's Cape",waist="Siegel Sash",legs="Atrophy Tights",feet="Lethargy Houseaux +1"}

    sets.midcast.Enhancing_Self = set_combine(sets.midcast['Enhancing Magic'], {hands="Atrophy Gloves +1",back="Sucellos's Cape",feet="Lethargy Houseaux +1"})
		
	sets.midcast.Refresh = {ammo="Hasty Pinion +1",
		head="Befouled Crown",
		body={ name="Telchine Chasuble", augments={'"Regen"+2','Enh. Mag. eff. dur. +5',}},
		hands={ name="Chironic Gloves", augments={'Attack+20','"Dbl.Atk."+3','STR+10','Accuracy+15',}},
		legs="Lethargy Fuseau +1",
		feet="Inspirited Boots",
		neck="Sanctity Necklace",
		waist="Gishdubar Sash",
		left_ear="Zennaroi Earring",
		right_ear="Loquac. Earring",
		left_ring="Veneficium Ring",
		right_ring="Prolix Ring",
		back="Sucellos's Cape",
		}	

    sets.midcast.Stoneskin = {waist="Siegel Sash"}
    
	sets.midcast['Enfeebling Magic'] = {main="Twebuliij",sub="Niobid Strap",Ranged="Aureole",
		head="Merlinic Hood",neck="Weike Torque",ear1="Lifestorm Earring",ear2="Psystorm Earring",
		body="Amalric Doublet",hands="Lethargy Gantherots +1",ring1="Globidonta Ring",ring2="Sangoma Ring",
		back="Sucellos's Cape",waist="Demonry Sash",legs="Merlinic Shalwar",feet="Artsieq Boots"}

    sets.midcast['Dia III'] = set_combine(sets.midcast['Enfeebling Magic'], {head="Duelist's Chapeau +2"})

    sets.midcast['Slow II'] = set_combine(sets.midcast['Enfeebling Magic'], {head="Duelist's Chapeau +2"})
    
	sets.midcast['Elemental Magic'] = {main="Marin Staff +1",sub="Niobid Strap",ammo="Dosis Tathlum",
		head="Merlinic Hood",neck="Eddy Necklace",ear1="Friomisi Earring",ear2="Hecate's Earring",
		body="Amalric Doublet",hands="Amalric Gages",ring1="Irrwisch Ring",ring2="Acumen Ring",
		back="Seshaw Cape",waist=gear.ElementalObi,legs="Merlinic Shalwar",feet="Merlinic Crackows"}
		
    sets.magic_burst = {main="Marin Staff +1",sub="Niobid Strap",ammo="Witchstone",
		head="Merlinic Hood",body="Amalric Doublet",hands="Amalric Gages",
		legs="Merlinic Shalwar",feet="Merlinic Crackows",
		neck="Mizukage-no-Kubikazari",waist="Hachirin-no-Obi",left_ear="Hecate's Earring",right_ear="Friomisi Earring",
		left_ring="Locus Ring",right_ring="Mujin Band",back="Seshaw Cape"}			
		
	gear.default.obi_waist = "Sekhmet Corset"		
        
    sets.midcast.Impact = set_combine(sets.midcast['Elemental Magic'], {head=empty,body="Twilight Cloak"})

	sets.midcast['Dark Magic'] = {main="Twebuliij",sub="Niobid Strap",ranged="Aureole",
		head="Atrophy Chapeau +1",neck="Eddy Necklace",ear1="Estoqueur's Earring",ear2="Gwati Earring",
		body="Vitivation Tabard +1",hands="Gendewitha Gages +1",ring1="Prolix Ring",ring2="Sangoma Ring",
		back="Swith Cape",waist="Pya'ekue Belt",legs="Artsieq Hose",feet="Artsieq Boots"}

    --sets.midcast.Stun = set_combine(sets.midcast['Dark Magic'], {})

    sets.midcast.Drain = set_combine(sets.midcast['Dark Magic'], {ring1="Excelsis Ring", waist="Fucho-no-Obi"})

    sets.midcast.Aspir = sets.midcast.Drain


    -- Sets for special buff conditions on spells.

       
    sets.buff.Enhancing_Other = set_combine(sets.midcast['Enhancing Magic'],{head="Lethargy Chappel +1",
        body="Lethargy Sayon +1",hands="Lethargy Gantherots +1",
        legs="Lethargy Fuseau +1",feet="Lethargy Houseaux +1"})

    sets.buff.Saboteur = {hands="Lethargy Gantherots +1"}
    

    -- Sets to return to when not performing an action.
    
    -- Resting sets
    sets.resting = {main="Emissary",sub="Beatific Shield +1",ammo="Impatiens",
		head="Duelist's Chapeau +2",neck="Loricate Torque",ear1="Bloodgem Earring",ear2="Loquacious Earring",
		body="Amalric Doublet",hands="Serpentes Cuffs",ring1="Sheltered Ring",ring2="Paguroidea Ring",
		back="Mecistopins Mantle",waist="Flume Belt",legs="Nares Trews",feet="Serpentes Sabots"}
    

    -- Idle sets
    sets.idle = {main="Emissary",sub="Beatific Shield +1",ammo="Impatiens",
		head="Duelist's Chapeau +2",neck="Loricate Torque",ear1="Bloodgem Earring",ear2="Infused Earring",
		body="Amalric Doublet",hands="Serpentes Cuffs",ring1="Sheltered Ring",ring2="Paguroidea Ring",
		back="Shadow Mantle",waist="Flume Belt",legs="Nares Trews",feet="Serpentes Sabots"}

    sets.idle.Town = {main="Emissary",sub="Beatific Shield +1",ammo="Impatiens",
		head="Atrophy Chapeau +1",neck="Sanctity Necklace",ear1="Infused Earring",ear2="Infused Earring",
		body="Amalric Doublet",hands="Serpentes Cuffs",ring1="Sheltered Ring",ring2="Paguroidea Ring",
		back="Shadow Mantle",waist="Flume Belt",legs="Nares Trews",feet="Serpentes Sabots"}
    
    sets.idle.Weak = {main="Emissary",sub="Beatific Shield +1",ammo="Impatiens",
		head="Duelist's Chapeau +2",neck="Sanctity Necklace",ear1="Bloodgem Earring",ear2="Infused Earring",
		body="Hagondes Coat",hands="Serpentes Cuffs",ring1="Sheltered Ring",ring2="Paguroidea Ring",
		back="Shadow Mantle",waist="Flume Belt",legs="Nares Trews",feet="Serpentes Sabots"}

    sets.idle.PDT = {main="Bolelabunga",sub="Genbu's Shield",ammo="Demonry Stone",
        head="Gendewitha Caubeen +1",neck="Loricate Torque",ear1="Bloodgem Earring",ear2="Infused Earring",
        body="Emet Harness",hands="Gendewitha Gages +1",ring1="Defending Ring",ring2=gear.DarkRing.physical,
        back="Shadow Mantle",waist="Flume Belt",legs="Osmium Cuisses",feet="Merlinic Crackows"}

    sets.idle.MDT = {main="Bolelabunga",sub="Genbu's Shield",ammo="Demonry Stone",
        head="Atrophy Chapeau +1",neck="Loricate Torque",ear1="Bloodgem Earring",ear2="Infused Earring",
        body="Carmine Scale Mail",hands="Chironic Gloves",ring1="Defending Ring",ring2="Shadow Ring",
        back="Reiki Cloak",waist="Flume Belt",legs="Osmium Cuisses",feet="Merlinic Crackows"}
    
    
    -- Defense sets
    sets.defense.PDT = {
        head="Lithelimb Cap",neck="Loricate Torque",ear1="Bloodgem Earring",ear2="Infused Earring",
        body="Emet Harness",hands="Gendewitha Gages +1",ring1="Patricius Ring",ring2=gear.DarkRing.physical,
        back="Xucau Mantle",waist="Flume Belt",legs="Merlinic Shalwar",feet="Merlinic Crackows"}

    sets.defense.MDT = {ammo="Demonry Stone",
        head="Atrophy Chapeau +1",neck="Loricate Torque",ear1="Bloodgem Earring",ear2="Infused Earring",
        body="Carmine Scale Mail",hands="Chironic Gloves",ring1="Vexer Ring +1",ring2="Shadow Ring",
        back="Reiki Cloak",waist="Flume Belt",legs="Merlinic Shalwar",feet="Merlinic Crackows"}

    sets.Kiting = {legs="Crimson Cuisses"}

    sets.latent_refresh = {waist="Fucho-no-obi"}

    -- Engaged sets

    -- Variations for TP weapon and (optional) offense/defense modes.  Code will fall back on previous
    -- sets if more refined versions aren't defined.
    -- If you create a set with both offense and defense modes, the offense mode should be first.
    -- EG: sets.engaged.Dagger.Accuracy.Evasion
    
    -- Normal melee group
	sets.engaged = {
		ammo="Ginsen",
		head="Carmine Mask",
		body="Emet Harness",
		hands="Chironic Gloves",
		legs={ name="Taeon Tights", augments={'Accuracy+22','"Triple Atk."+2','Weapon skill damage +2%',}},
		feet={ name="Taeon Boots", augments={'Accuracy+20 Attack+20','"Triple Atk."+2','Crit. hit damage +3%',}},
		neck="Asperity Necklace",
		waist="Windbuffet Belt +1",
		left_ear="Trux Earring",
		right_ear="Brutal Earring",
		left_ring="Etana Ring",
		right_ring="Patricius Ring",
		back="Atheling Mantle",}
		
	sets.engaged.Acc = {
		ammo="Hasty Pinion +1",
		head="Carmine Mask",
		body="Emet Harness",
		hands="Chironic Gloves",
		legs={ name="Taeon Tights", augments={'Accuracy+22','"Triple Atk."+2','Weapon skill damage +2%',}},
		feet={ name="Taeon Boots", augments={'Accuracy+20 Attack+20','"Triple Atk."+2','Crit. hit damage +3%',}},
		neck="Sanctity Necklace",
		waist="Olseni Belt",
		left_ear="Zennaroi Earring",
		right_ear="Steelflash Earring",
		left_ring="Etana Ring",
		right_ring="Patricius Ring",
		back="Grounded Mantle",}		

    sets.engaged.Defense = {ammo="Demonry Stone",
        head="Atrophy Chapeau +1",neck="Asperity Necklace",ear1="Bladeborn Earring",ear2="Steelflash Earring",
        body="Atrophy Tabard +1",hands="Atrophy Gloves +1",ring1="Rajas Ring",ring2="K'ayres Ring",
        back="Kayapa Cape",waist="Goading Belt",legs="Osmium Cuisses",feet="Atrophy Boots"}

end

-------------------------------------------------------------------------------------------------------------------
-- Job-specific hooks for standard casting events.
-------------------------------------------------------------------------------------------------------------------

-- Run after the default midcast() is done.
-- eventArgs is the same one used in job_midcast, in case information needs to be persisted.




function job_post_midcast(spell, action, spellMap, eventArgs)
	if spell.skill == 'Enfeebling Magic' and state.Buff.Saboteur then 
		equip(sets.buff.Saboteur)
	elseif spell.skill == 'Enhancing Magic' then		
		if info.Duration:contains(spell.english) then
			if spell.target.type == 'SELF' then				
				equip(sets.midcast.Enhancing_Self)
				send_command('@input /echo Enhancing Duration Self Set')
			else			
				equip(sets.buff.Enhancing_Other)			
				send_command('@input /echo Enhancing Others Duration Set')
			end
		elseif info.Enhancing:contains(spell.english) then
			equip(sets.midcast['Enhancing Magic'])
			send_command('@input /echo Self Enhancing Set')
		else
			equip(sets.midcast.Enhancing_Self)
			send_command('@input /echo Enhancing Regular Set')
		end	
	elseif spellMap == 'Cure' and spell.target.type == 'SELF' then 
		equip(sets.midcast.CureSelf)
	end
end


function aftercast(spell,arg)
	if spell.name == "Sleep II" or spell.name == "Sleepga II" or spell.name == "Repose" or spell.name == "Dream Flower" then
		windower.send_command('wait 75;input /echo [ WARNING! '..spell.name..' : Will wear off within 0:15 ]')
        windower.send_command('wait 80;input /echo [ WARNING! '..spell.name..' : Will wear off within 0:10 ]')
        windower.send_command('wait 85;input /echo [ WARNING! '..spell.name..' : Will wear off within 0:05 ]')
	elseif spell.name == "Sleep" or spell.name == "Sleepga" then
		windower.send_command('wait 45;input /echo [ WARNING! '..spell.name..' : Will wear off within 0:15 ]')
        windower.send_command('wait 50;input /echo [ WARNING! '..spell.name..' : Will wear off within 0:10 ]')
        windower.send_command('wait 55;input /echo [ WARNING! '..spell.name..' : Will wear off within 0:05 ]')
	end
-- Convert
	if spell.name == 'Convert' then
	  windower.send_command('wait 2;input /ma "Cure IV" me')
	end
end	

-------------------------------------------------------------------------------------------------------------------
-- Job-specific hooks for non-casting events.
-------------------------------------------------------------------------------------------------------------------

-- Handle notifications of general user state change.
function job_state_change(stateField, newValue, oldValue)
    if stateField == 'Offense Mode' then
        if newValue == 'None' then
            enable('main','sub','range')
        else
            disable('main','sub','range')
        end
    end
end


function job_post_midcast(spell, action, spellMap, eventArgs)
    if spell.skill == 'Elemental Magic' and state.MagicBurst.value then
        equip(sets.magic_burst)
    end
end

-------------------------------------------------------------------------------------------------------------------
-- User code that supplements standard library decisions.
-------------------------------------------------------------------------------------------------------------------

-- Modify the default idle set after it was constructed.
function customize_idle_set(idleSet)
    if player.mpp < 51 then
        idleSet = set_combine(idleSet, sets.latent_refresh)
    end
    
    return idleSet
end

-- Set eventArgs.handled to true if we don't want the automatic display to be run.
function display_current_job_state(eventArgs)
    display_current_caster_state()
    eventArgs.handled = true
end

-------------------------------------------------------------------------------------------------------------------
-- Utility functions specific to this job.
-------------------------------------------------------------------------------------------------------------------

-- Select default macro book on initial load or subjob change.
function select_default_macro_book()
    -- Default macro set/book
    if player.sub_job == 'DNC' then
        set_macro_page(2, 4)
    elseif player.sub_job == 'NIN' then
        set_macro_page(3, 4)
    elseif player.sub_job == 'THF' then
        set_macro_page(4, 4)
    else
        set_macro_page(1, 17)
    end
end