Gearswap Support Thread

['Stone']='Elemental Magic',['Stone V']='HighTierNuke'

LUA Code
-- In Game: //gs c (command), Macro: /console gs c (command), Bind: gs c (command) --
function self_command(command)
	if command == 'C15' then -- MDT Toggle --
		if Armor == '119' then
			Armor = 'None'
			add_to_chat(8,'119 Set: [Unlocked]')
		else
			Armor = '119'
			add_to_chat(158,'119 Set: [Locked]')
		end
		status_change(player.status)
	end
end

sets.Engaged.Polearm = {}

-- Last Updated: 24/05/2014 09:46 --
 
function get_sets()
        AccIndex = 1
        AccArray = {"LowACC","HighACC"} -- 2 Levels Of Accuracy Sets For TP/WS. Default ACC Set Is LowACC. Add More ACC Sets If Needed Then Create Your New ACC Below --
        IdleIndex = 1
        IdleArray = {"Movement","Regen"} -- Default Idle Set Is Movement --
        Armor = 'None'
        Twilight = 0
        send_command('input /macro book 10;wait .1;input /macro set 1') -- Change Default Macro Book Here --
 
        sc_map = {SC1="UkkosFury", SC2="Berserk", SC3="Aggressor"} -- 3 Additional Binds. Can Change Whatever JA/WS/Spells You Like Here. Remember Not To Use Spaces. --
        GreatSwords = S{"Ukudyoni"}
 
        -- Idle/Town Sets --
        sets.Idle = {}
        sets.Idle.Regen = {
                        head="Twilight Helm",
                        neck="Wiglen Gorget",
                        ring1="Sheltered Ring",
                        ring2="Paguroidea Ring",
						}
        sets.Idle.Movement = {
						ammo="Angha Gem",
                        head="Lithelimb Cap",
                        neck="Twilight Torque",
                        ear1="Brutal Earring",
                        ear2="Trux Earring",
                        body="Mekira Meikogai",
						hands="Agoge mufflers +1",
                        ring1="Patricius Ring",
                        ring2="Dark Ring",
                        back="Repulse Mantle",
                        waist="Nierenschutz",
						legs="Cizin Breeches",
                        feet="Hermes' Sandals"}
        sets.Resting = set_combine(sets.Idle.Regen)
 
        sets.Twilight = {head="Twilight Helm",body="Twilight Mail"}
 
        -- TP Base Set --
        sets.TP = {}
 
        -- Ukonvasara TP Sets --
        sets.TP.Ukonvasara = {
                        main="Ukonvasara",
                        ammo="Yetshila",
                        head="Otomi Helm",
                        neck="Asperity Necklace",
                        ear1="Brutal Earring",
                        ear2="Trux Earring",
                        body="Xaddi Mail",
                        hands="Xaddi Gauntlets",
                        ring1="Rajas Ring",
                        ring2="Ambuscade Ring",
                        back="Mauler's Mantle",
                        waist="Windbuffet Belt",
                        legs="Agoge Cuisses +1",
                        feet="Pumm. Calligae +1"}
        sets.TP.Ukonvasara.HighACC = set_combine(sets.TP.Ukonvasara,{
						ammo="Fire Bomblet",
						head="Yaoyotl Helm",
                        neck="Iqabi necklace",
						ear1="Steelflash Earring",
                        ear2="Bladeborn Earring",
                        ring1="Patricius Ring",
                        ring2="Mars's Ring",
						waist="Anguinus Belt",
						legs="Pumm. Cuisses +1",
                        feet="Whirlpool Greaves"						
						})
 
        -- Ukonvasara(Restraint) TP Sets --
        sets.TP.Ukonvasara.Restraint = set_combine(sets.TP.Ukonvasara,{})
        sets.TP.Ukonvasara.HighACC.Restraint = set_combine(sets.TP.Ukonvasara.Restraint,{})
 
        -- Ukonvasara(Ionis) TP Sets --
        sets.TP.Ukonvasara.Ionis = set_combine(sets.TP.Ukonvasara,{})
        sets.TP.Ukonvasara.HighACC.Ionis = set_combine(sets.TP.Ukonvasara.Ionis,{})
 
        -- Ukonvasara(Restraint + Ionis) TP Sets --
        sets.TP.Ukonvasara.Restraint.Ionis = set_combine(sets.TP.Ukonvasara.Restraint,{})
        sets.TP.Ukonvasara.HighACC.Restraint.Ionis = set_combine(sets.TP.Ukonvasara.Restraint.Ionis,{})
 
        -- MS TP Set --
        sets.TP.MS = {
                        -- sub="Brave Grip",
                        back="Cavaros Mantle",
                        feet="Rvg. Calligae +2"}
 
        -- For Rancor OFF Back Armor --
        sets.TP.Rancor = {back="Atheling Mantle"}
 
        -- Retaliation Set --
        sets.TP.Retaliation = {hands="Pumm. Mufflers +1",feet="Rvg. Calligae +2"}
 
        -- PDT Sets --
        sets.PDT = {
                        ammo="Angha Gem",
                        head="Lithelimb Cap",
                        neck="Twilight Torque",
                        ear1="Brutal Earring",
                        ear2="Trux Earring",
                        body="Mekira Meikogai",
                        ring1="Patricius Ring",
                        ring2="Dark Ring",
                        back="Repulse Mantle",
                        waist="Nierenschutz",
						legs="Cizin Breeches",
                        feet="Phorcys Schuhs"}
 
         
         
        -- WS Base Set --
        sets.WS = {
                        ammo="Fire Bomblet",
						head="Yaoyotl Helm",
                        neck="Asperity Necklace",
                        ear1="Steelflash Earring",
                        ear2="Bladeborn Earring",
						body="Xaddi Mail",
                        hands="Xaddi Gauntlets",
                        ring1="Rajas Ring",
                        ring2="Pyrosoul Ring",
                        back="Mauler's Mantle",
                        waist="Windbuffet Belt",
                        legs="Pumm. Cuisses +1",
                        feet="Pumm. Calligae +1"}		
        sets.WS.Upheaval = {
                        ammo="Ravager's Orb",
                        head="Yaoyotl helm",
                        neck="Flame Gorget",
                        ear1="Brutal Earring",
                        ear2="Moonshade Earring",
                        body="Pumm. Lorica +1",
                        hands="Agoge Mufflers +1",
                        ring1="Spiral Ring",
                        ring2="Terrasoul Ring",
                        back="Mauler's Mantle",
                        waist="Windbuffet Belt",
                        legs="Agoge cuisses +1",
                        feet="Pumm. Calligae +1"}
        sets.WS.Upheaval.HighACC = set_combine(sets.WS.Upheaval,{
                        feet="Whirlpool Greaves",
						body="Miki. Breastplate",
                        hands="Miki. Gauntlets",
                        legs="Miki. Cuisses"})
 
        sets.WS["Ukko's Fury"] = {
                        ammo="Yetshila",
                        head="Otomi helm",
                        neck="Thunder Gorget",
                        ear1="Brutal Earring",
                        ear2="Moonshade Earring",
                        body="Phorcys korazin",
                        hands="Mikinaak Gauntlets",
                        ring1="Rajas Ring",
                        ring2="Pyrosoul Ring",
                        back="Mauler's Mantle",
                        waist="Windbuffet Belt",
                        legs="Agoge Cuisses +1",
                        feet="Hrafn Gambieras"}
        sets.WS["Ukko's Fury"].HighACC = set_combine(sets.WS["Ukko's Fury"],{
                        head="Yaoyotl Helm",
                        feet="Whirlpool Greaves",
						body="Miki. Breastplate",
                        legs="Miki. Cuisses"})
                       
        sets.WS["Fell Cleave"] = {
                        ammo="Yetshila",
                        head="Otomi helm",
                        neck="Thunder Gorget",
                        ear1="Brutal Earring",
                        ear2="Moonshade Earring",
                        body="Phorcys korazin",
                        hands="Boor Bracelets",
                        ring1="Strigoi Ring",
                        ring2="Pyrosoul Ring",
                        back="Mauler's Mantle",
                        waist="Thunder Belt",
                        legs="Pumm. Cuisses +1",
                        feet="Pumm. Calligae +1"}
 
        -- MS WS Set --
        sets.MS_WS = {
                        -- body="Kirin's Osode",
						ammo="Yetshila",
                        back="Cavaros Mantle",
                        -- legs="Byakko's Haidate",
                        feet="Hrafn Gambieras"}
 
        -- JA Sets --
        sets.JA = {}
        sets.JA["Berserk"] = {body="Pumm. Lorica +1",feet="Agoge Calligae +1"}
        sets.JA["Aggressor"] = {head="Pumm. Mask +1",body="Agoge Lorica +1"}
        sets.JA["Blood Rage"] = {body="Rvg. Lorica +2"}
        sets.JA["Warcry"] = {head="Agoge Mask +1"}
        sets.JA["Tomahawk"] = {ammo="Thr. Tomahawk",feet="Agoge Calligae +1"}
        sets.JA["Mighty Strikes"] = {hands="Agoge Mufflers +1"}
        sets.Waltz = {}
 
        -- Magic Sets --
        sets.Precast = {}
        sets.Precast.FastCast = {
                        ammo="Impatiens",
                        head="Cizin Helm",
                        ear1="Loquac. Earring",
                        ring1="Prolix Ring",
                        ring2="Veneficium Ring"}
 
        sets.Midcast = {}
        sets.Midcast.Haste = set_combine(sets.PDT,{
                        head="Otomi helm",
                        hands="Pumm. Mufflers +1",
                        waist="Cetl Belt",
                        legs="Pumm. Cuisses +1",
                        feet="Pumm. Calligae +1"})
end
 
function pretarget(spell,action)
        if (spell.type:endswith('Magic') or spell.type == "Ninjutsu") and buffactive.Silence then
                cancel_spell()
                send_command('input /item "Echo Drops" <me>')
        elseif spell.english == "Berserk" and buffactive.Berserk then
                cancel_spell()
                send_command('Aggressor')
        elseif spell.english == "Seigan" and buffactive.Seigan then
                cancel_spell()
                send_command('ThirdEye')
        elseif spell.english == "Meditate" and player.tp > 290 then
                cancel_spell()
                add_to_chat(8, spell.english .. ' Canceled: ' .. player.tp)
        elseif spell.english == "Ukko's Fury" and GreatSwords:contains(player.equipment.main) then
                cancel_spell()
                send_command('Resolution' .. spell.target.name)
        end
end
 
function precast(spell,action)
        if spell.type == "WeaponSkill" then
                if player.status ~= 'Engaged' then -- Cancel WS If Not Engaged. Can Delete It If You Don't Need It --
                        cancel_spell()
                        add_to_chat(8,'Unable To Use WeaponSkill: [Disengaged]')
                        return
                else
                        equipSet = sets.WS
                        if equipSet[spell.english] then
                                equipSet = equipSet[spell.english]
                        end
                        if equipSet[AccArray[AccIndex]] then
                                equipSet = equipSet[AccArray[AccIndex]]
                        end
                        if buffactive["Mighty Strikes"] then
                                equipSet = set_combine(equipSet,sets.MS_WS)
                        end
                        if spell.english == "Ukko's Fury" and buffactive['Blood Rage'] then
                                equipSet = set_combine(equipSet,{hands="Hct. Mittens +1"})
                        end
                        if spell.english == "Upheaval" and world.day_element == 'Dark' then
                                equipSet = set_combine(equipSet,{back="Shadow Mantle"})
                        end
                        if player.tp > 295 or buffactive.Sekkanoki then
                                equipSet = set_combine(equipSet,{ear1="Vulcan's Pearl"})
                        end
                        equip(equipSet)
                end
        elseif spell.type == "JobAbility" then
                if spell.english == 'Tomahawk' and player.status ~= 'Engaged' then
                        cancel_spell()
                        add_to_chat(8,'Unable To Use '..spell.name..': [Disengaged]')
                        return
                elseif sets.JA[spell.english] then
                        equip(sets.JA[spell.english])
                end
        elseif spell.type == "Ninjutsu" then
                if string.find(spell.english,'Utsusemi') then
                        if buffactive['Copy Image (3)'] or buffactive['Copy Image (4)'] then
                                cancel_spell()
                                add_to_chat(8, spell.english .. ' Canceled: [3+ Images]')
                                return
                        else
                                equip(sets.Precast.FastCast)
                        end
                else
                        equip(sets.Precast.FastCast)
                end
        elseif spell.type == "Waltz" then
                equip(sets.Waltz)
        elseif spell.english == 'Spectral Jig' and buffactive.Sneak then
                cast_delay(0.2)
                send_command('cancel Sneak')
        end
        if Twilight == 1 then
                equip(sets.Twilight)
        end
end
 
function midcast(spell,action)
        if spell.type == "Ninjutsu" then
                if string.find(spell.english,'Utsusemi') then
                        if spell.english == 'Utsusemi: Ichi' and (buffactive['Copy Image'] or buffactive['Copy Image (2)']) then
                                send_command('@wait 1.7; cancel Copy Image*')
                        end
                        equip(sets.Midcast.Haste)
                elseif spell.english == 'Monomi: Ichi' then
                        if buffactive.Sneak then
                                send_command('@wait 1.7; cancel Sneak')
                        end
                        equip(sets.Midcast.Haste)
                else
                        equip(sets.Midcast.Haste)
                end
        end
end
 
function aftercast(spell,action)
        -- if spell.type == "WeaponSkill" then
                -- --add_to_chat(158,'TP Return: ['..player.tp..']')
        -- elseif spell.english == "Blood Rage" then
                -- send_command('wait 50;input /echo '..spell.english..' Effect: [WEARING OFF IN 10 SEC.];wait 10;input /echo '..spell.english..' Effect: [OFF]')
        -- elseif spell.english == "Warcry" then
                -- send_command('wait 50;input /echo '..spell.english..' Effect: [WEARING OFF IN 10 SEC.];wait 10;input /echo '..spell.english..' Effect: [OFF]')
		-- elseif spell.english == "Tomahawk" then
                -- send_command('wait 120;input /echo '..spell.english..' Effect: [WEARING OFF IN 10 SEC.];wait 10;input /echo '..spell.english..' Effect: [OFF]')
        -- end
        status_change(player.status)
end
 
function status_change(new,old)
        if Armor == 'PDT' then
                equip(sets.PDT)
        elseif new == 'Engaged' then
                equipSet = sets.TP
                if equipSet[player.equipment.main] then
                        equipSet = equipSet[player.equipment.main]
                end
                if equipSet[AccArray[AccIndex]] then
                        equipSet = equipSet[AccArray[AccIndex]]
                end
                if buffactive["Aftermath: Lv.3"] and equipSet["AM3"] then
                        if Armor == 'Rancor' then
                                equip(set_combine(equipSet["AM3"],sets.TP.Rancor))
                        else
                                equipSet = equipSet["AM3"]
                        end
                end
                if buffactive.Aftermath and equipSet["AM"] then
                        equipSet = equipSet["AM"]
                end
                if buffactive.Restraint and equipSet["Restraint"] then
                        equipSet = equipSet["Restraint"]
                end
                if buffactive.Ionis and equipSet["Ionis"] then
                        equipSet = equipSet["Ionis"]
                end
                if buffactive["Mighty Strikes"] then
                        equip(set_combine(equipSet,sets.TP.MS))
                end
                if buffactive.Retaliation and Armor == 'Retaliation' then
                        equip(set_combine(equipSet,sets.TP.Retaliation))
                else
                        equip(equipSet)
                end
        else
                equip(sets.Idle[IdleArray[IdleIndex]])
        end
        if Twilight == 1 then
                equip(sets.Twilight)
        end
end
 
function buff_change(buff,gain)
        buff = string.lower(buff)
        if buff == "aftermath: lv.3" and gain then -- AM3 Timer Bar --
                send_command('timers create "Aftermath: Lv.3" 180 down;wait 120;input /echo Aftermath: Lv.3 [WEARING OFF IN 60 SEC.];wait 30;input /echo Aftermath: Lv.3 [WEARING OFF IN 30 SEC.];wait 20;input /echo Aftermath: Lv.3 [WEARING OFF IN 10 SEC.]')
        elseif buff == "aftermath: lv.3" then
                send_command('timers delete "Aftermath: Lv.3"')
                add_to_chat(8,'AM3: [OFF]')
        end
        if buff == "sleep" and gain and player.hp > 200 and player.status == "Engaged" then
                equip({neck="Berserker's Torque"})
        else
                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 -- Accuracy Level Toggle --
                AccIndex = (AccIndex % #AccArray) + 1
                add_to_chat(158,'Accuracy Level: ' .. AccArray[AccIndex])
                status_change(player.status)
        elseif command == 'C5' then -- Auto Update Toggle --
                status_change(player.status)
                add_to_chat(158,'Status Update')
        elseif command == 'C7' then -- PDT Toggle --
                if Armor == 'PDT' then
                        Armor = 'None'
                        add_to_chat(8,'PDT Set: [Unlocked]')
                else
                        Armor = 'PDT'
                        add_to_chat(158,'PDT Set: [Locked]')
                end
                status_change(player.status)
        elseif command == 'C9' then -- Retaliation Toggle --
                if Armor == 'Retaliation' then
                        Armor = 'None'
                        add_to_chat(8,'Retaliation Set: [Unlocked]')
                else
                        Armor = 'Retaliation'
                        add_to_chat(158,'Retaliation Set: [Locked]')
                end
                status_change(player.status)
        elseif command == 'C8' then -- Rancor Toggle --
                if Armor == 'Rancor' then
                        Armor = 'None'
                        add_to_chat(158,'Rancor: [ON]')
                else
                        Armor = 'Rancor'
                        add_to_chat(8,'Rancor: [OFF]')
                end
                status_change(player.status)
        elseif command == 'C3' then -- Twilight Toggle --
                if Twilight == 1 then
                        Twilight = 0
                        add_to_chat(8,'Twilight Set: [Unlocked]')
                else
                        Twilight = 1
                        add_to_chat(158,'Twilight Set: [locked]')
                end
                status_change(player.status)
        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

spell.skill=="Elemental Magic" then
		If player.hpp <= 30 then
			equip(sets['midcast_NukeRing'])
		else
			equip(sets['midcast_Nuke'])
		end
end

if spell.skill == 'Elemental Magic' and player.hpp <= 74 then
    equip({ring1="Sorcerer's Ring"})
end

if spell.english == "Dream Shroud" then
      if message == 'ON' then
        if world.time >= (0.00) or world.time <= (1.00) then 
           send_command('input /p [Dream Shroud] Magic Attack Bonus 13 - Magic Defense Bonus 1')
		elseif world.time >= (1.00) or world.time <= (2.00) then 
		   send_command('input /p [Dream Shroud] Magic Attack Bonus 12 - Magic Defense Bonus 2')
		elseif world.time >= (2.00) or world.time <= (3.00) then 
		   send_command('input /p [Dream Shroud] Magic Attack Bonus 11 - Magic Defense Bonus 3')
		elseif world.time >= (3.00) or world.time <= (4.00) then 
		   send_command('input /p [Dream Shroud] Magic Attack Bonus 10 - Magic Defense Bonus 4')
		elseif world.time >= (4.00) or world.time <= (5.00) then 
		   send_command('input /p [Dream Shroud] Magic Attack Bonus 9 - Magic Defense Bonus 5')
	  end
     end 
	end