Code:
function get_sets()
send_command('@input /macro book 1;wait 1;input /macro set 10;input /echo Macros Changed to whm')
send_command('@exec atima/whmaliases.txt')
sets = {}
sets.Idle = {
main="Earth Staff",sub="Reign Grip",ammo="Incantor Stone",
head="Nefer Khat",neck="Wiglen Gorget",lear="Loquac. Earring",rear="Star Earring",
body="Heka's Kalasiris",hands="Serpentes Cuffs",lring="Sheltered Ring",rring="Paguroidea Ring",
back="Cheviot Cape",waist="Tarutaru Sash",legs="Nares Trews", feet="Serpentes Sabots"
}
sets.Movement = { feet="Herald's Gaiters" }
sets.Cure = {
main="Tamaxchi",sub="Genbu's Shield",ammo="Aqua Sachet",
head="Orison Cap +2",neck="Colossus's Torque",lear="Orison Earring",rear="Star Earring",
body="Orison Bliaud +2",hands="Bokwus Gloves",lring="Ephedra Ring",rring="Sirona's Ring",
back="Orison Cape",waist="Cascade Belt",legs="Orsn. Pantaln. +2",feet="Rubeus Boots"
}
sets.Stun = {
main="Tamaxchi",sub="Genbu's Shield",
head="Xux Hat",neck="Orison Locket",lear="Loquac. Earring",
hands="Bokwus Gloves",
back="Swith Cape",waist="Goading Belt",legs="Blessed Trousers",feet="Blessed Pumps"
}
sets.Enhance = {
main="Kirin's Pole",sub="Fulcio Grip",
neck="Colossus's Torque",
hands="Augur's Gloves",
waist="Cascade Belt",legs="Cleric's Pantaln.",feet="Orsn. Duckbills +2"
}
sets.Holy = {
main="Tamaxchi",sub="Genbu's Shield",ammo="Aqua Sachet",
head="Nefer Khat",neck="Stoicheion Medal",lear="Star Earring",rear="Star Earring",
body="Teal Saio",hands="Quauhpilli Gloves",lring="Strendu Ring",rring="Aqua Ring",
back="Searing Cape",waist="Searing Sash",legs="Teal Slops",feet="Orsn. Duckbills +2"
}
sets.Repose = {
main="Tamaxchi",sub="Genbu's Shield",ammo="Aqua Sachet",
head="Xux Hat",neck="Stoicheion Medal",lear="Star Earring",rear="Star Earring",
body="Augur's Jaseran",hands="Quauhpilli Gloves",lring="Strendu Ring",rring="Aqua Ring",
back="Hecate's Cape",waist="Cascade Belt",legs="Teal Slops",feet="Orsn. Duckbills +2"
}
sets.FastCast = { ammo="Incantor Stone",neck="Orison Locket",lear="Loquac. Earring",back="Swith Cape" }
sets.Curecast = {
main="Tamaxchi",sub="Genbu's Shield",ammo="Incantor Stone",neck="Orison Locket",
lear="Loquac. Earring",body="Heka's Kalasiris",back="Pahtli Cape",legs="Orsn. Pantaln. +2"
}
sets.Recast = {
head="Xux Hat",neck="Orison Locket",lear="Loquac. Earring",hands="Blessed Mitts",
back="Swith Cape",waist="Goading Belt",legs="Blessed Trousers",feet="Blessed Pumps"
}
sets.Cursna = {
head="Xux Hat",neck="Malison Medallion",lear="Loquac. Earring",
body="Orison Bliaud +2",hands="Augur's Gloves",lring="Ephedra Ring",rring="Ephedra Ring",
back="Swith Cape",waist="Goading Belt",legs="Cleric's Pantaln.",feet="Blessed Pumps"
}
sets.a_Idle = sets.Idle
end
function precast(spell,action)
if string.find(spell.english,"Cur") and not string.find(spell.english,"Cursna") then
equip(sets.Curecast)
elseif spell.english == "Stun" then
equip(sets.Stun)
elseif spell.english == "Cursna" then
equip(sets.Cursna, {legs="Orsn. Pantaln. +2"})
elseif action.type == 'Magic' then
equip(sets.Fastcast)
end
end
function midcast(spell,action)
if string.find(spell.english,'Cur') and not string.find(spell.english,"Cursna") then
local tempset = sets.Cure
if string.find(spell.english, 'Curaga') then
tempset.body = "Heka's Kalisiris"
end
equip(tempset)
elseif spell.skill == 'EnhancingMagic'
and not string.find(spell.english, "Protect")
and not string.find(spell.english, "Shell")
and not spell.english == "Haste"
and not spell.english == "Erase"
and not spell.english == "Stoneskin" then
local tempset = sets.Enhance
if string.find(spell.english, "Bar") then
tempset.head = "Orison Cap +2"
tempset.body = "Orison Bliaud +2"
tempset.hands = "Orison Mitts +2"
elseif spell == "Regen" then
tempset.body = "Cleric's Briault"
tempset.hands = "Orison Mitts +2"
end
equip(tempset)
elseif string.find(spell.english, "Holy") or string.find(spell.english, "Banish") then
equip(sets.Holy)
elseif spell.english == "Repose" then equip(sets.Repose)
elseif spell.english == "Haste" or spell.english == "Erase"
or spell.english == "Sacrifice" or spell.english == "Esuna" then
equip(sets.Recast)
elseif spell.english == "Stoneskin" then
equip(sets.Recast, {waist="Siegel Sash"})
end
if spell.english == 'sneak' and spell.target.name == "Atima" then
send_command('@wait 1.8;cancel 71')
end
end
function aftercast(spell,action)
equip(sets.a_Idle, sets.Movement)
end
function status_change(new,old)
if T{'Idle','Resting'}:contains(new) then
equip(sets.a_Idle, sets.Movement)
end
end
function buff_change(status,g_l)
end
function self_command(command)
end