WHM

function get_sets()

        send_command("exec whm.txt")

        sets.precast = {}
            sets.precast["Divine Caress"] = {"Mending Cape"}
            sets.precast.fastcast = {
                main="Winged Wand",
                sub="Genbu's Shield",
                ammo="Incantor Stone",

                head="Nahtirah Hat",
                neck="Orunmila's Torque",
                lear="Gifted Earring",
                rear="Loquac. earring",

                body="Marduk's Jubbah +1",
                hands="Gende. Gages +1",
                lring="Prolix Ring",
                rring="Sheltered Ring",

                back="Swith Cape",
                waist="Witful Belt",
                legs="Artsieq Hose",
                feet="Chelona Boots"}
            --Precast Cures
        sets.precast.healing = set_combine(sets.precast.fastcast, {
            body="Heka's Kalasiris",

            back="Pahtli Cape",
            legs="Orsn. Pantaln. +2",
            feet="Cure Clogs"})

        --Precast Haste, Refresh, Flurry, Poisona, Paralyna, Blindna, Silena, Stona, Viruna
        sets.precast.quickcast = set_combine(sets.precast.fastcast{
            ammo="Impatiens",

            waist="Witful Belt"})


        --Precast/Midcast Cursna
        sets.precast.na = set_combine(sets.precast.fastcast{
            ammo="Impatiens",

            rring="Ephedra Ring",

            back="Mending Cape",
            waist="Witful Belt",
            legs="Orsn. Pantaln. +2",
            feet="Gende. Galosh +1"})


        sets.idle = {
                main="Owleyes",
                sub="Genbu's Shield",
                ammo="Incantor Stone",

                head="Nefer Khat",
                neck="Wiglen Gorget",
                lear="Gifted Earring",
                rear="Loquac. Earring",

                body="Heka's Kalasiris",
                hands="Serpentes Cuffs",
                lring="Paguroidea Ring",
                rring="Sheltered Ring",

                back="Umbra Cape",
                waist="Fucho-no-obi",
                legs="Nares Trews",
                feet="Serpentes Sabots"}



        sets.dt = {
                main="Terra's Staff",
                sub="Mephitis Grip",

                head="Gende. Caubeen +1",
                neck="Twilight Torque",
                lear="Merman's Earring",
                rear="Merman's Earring",

                body="Gende. Bilaut +1",
                hands="Gende. Gages+1",
                lring="Dark Ring",
                rring="Dark Ring",

                back="Umbra Mantle",
                waist="Flume Belt",
                legs="Gende. Spats +1",
                feet="Gende. Galoshes +1"}




        sets.heal = {
                main="Tamaxchi",
                sub="Genbu's Shield",
                ammo="Mana Ampulla",

                head="Orison Cap +2",
                neck="Orunmila's Torque",
                lear="Lifestorm Earring",
                rear="Novia Earring",

                body="Orison Bliaud +2",
                hands="Bokwus Gloves",
                lring="Ephedra Ring",
                rring="Sirona's Ring",

                back="Tempered Cape",
                waist="Cascade Belt",
                legs="Orsn. Pantaln. +2",
                feet="Rubeus Boots"}


        sets.whmmacc = {
                main="Twebuliij",
                sub="Mephitis",
                ammo="Mana Ampulla",

                head="Nahtirah Hat",
                neck="Orunmila's Torque",
                lear="Lifestorm Earring",
                rear="Psystrom Earring",

                body="Gendewitha Bliaut",
                hands="Gende. Gages +1",
                lring="Strendu Ring",
                rring="Omega Ring",

                back="Pahtli Cape",
                waist="Witful Belt",
                legs="Gende. Spats +1",
                feet="Rubeus Boots"}


        --Midcast Haste, Refresh, Flurry, Poisona, Paralyna, Blindna, Silena, Stona, Viruna
        sets.haste = {
                main="Winged Wand",
                sub="Genbu's Shield",
                ammo="Incantor Stone",

                head="Nahtirah Hat",
                neck="Orunmila's Torque",
                lear="Lifestorm Earring",
                rear="Loquac. Earring",

                body="Goliard Saio",
                hands="Blessed Mitts +1",
                lring="Prolix Ring",
                rring="Sheltered Ring",

                back="Swith Cape",
                waist="Goading Belt",
                legs="Artsieq Hose",
                feet="Chelona Boots"}


        sets.enhancing = {
                main="Beneficus",
                sub="Genbu's Shield",
                ammo="Incantor Stone",

                head="Umuthi Hat",
                neck="Enhancing Torque",
                lear="Lifestorm Earring",
                rear="Loquac. Earring",

                body="Orison Bliaud +2",
                hands="Ayao's Gages",
                lring="Prolix Ring",
                rring="Sheltered Ring",

                back="Merciful Cape",
                waist="Olympus Sash",
                legs="Piety Pantaloons",
                feet="Orsn. Duckbills +2"}

            sets.enhancing.barspell = set_combine(sets.enhancing, {
                head="Orison Cap +2"
                hands="Orison Mitts +2"})

            sets.enhancing.protect = set_combine(sets.enhancing, {
                feet="Piety Duckbills"})

            sets.enhancing.stoneskin = set_combine(sets.enhancing, {
                legs="Haven Hose"})




        maccspells = S{"Head Butt", "Sudden Lunge", "Geist Wall", "Blank Gaze", "Actinic Burst",
                        "Sheep Song", "Yawn", "Dream Flower", "Auroral Drape", "Embalming Earth",
                        "Frightful Roar"}
        noswap = S{"Animating Wail", "Triumphant Roar", "Nat. Meditation", "Winds of Promy.",
                    "Erratic Flutter", "Cocoon", "Battery Charge"}
        skillspells = S{"Occultation"}

end

function precast(spell)

    if spell.name == "Animating Wail" then
        cancel_spell()
        send_command("Erratic Flutter")
    end

    if spell.name == "Divine Waltz" then
        cancel_spell()
        send_command('input /item "Capacity Ring" <me>')
    end

    if sets.precast[spell.name] then
        equip(sets.precast[spell.name])

    elseif spell.type == 'WeaponSkill' then
        if player.tp < 1000  then
            cancel_spell()
            return
        elseif sets.ws[spell.name] then
            equip(sets.ws[spell.name])
        else
            equip(sets.ws["Chant du Cygne"])
        end

    elseif spell.type == "BlueMagic" then
        equip(sets.precast.blu)

    elseif spell.prefix == "/magic" or spell.prefix == "/ninjutsu" then
        equip(sets.precast.fastcast)

    elseif spell.name == "Lunge" or spell.name == "Swipe" then
        equip(sets.magical)

    elseif spell.name == "*step" or spell.name == "*flourish" then
        equip({waist="Chaac Belt"})

    end

    if spell.name == "Spectral Jig" then
        send_command("cancel 71")
    end
end

 function midcast(spell)

    if spell.type == "BlueMagic" then
        if spell.element == "Physical" then
            if sets.physical[spell.name] then
                equip(sets.physical, sets.physical[spell.name])
            else
                equip(sets.physical)
            end

        elseif spell.name == "Plenilune Embrace" or "Magic Fruit" then
            equip(sets.cure)

        elseif maccspells:contains(spell.name) then
            equip(sets.blumacc, sets.precast.blu)

        elseif noswap:contains(spell.name) then
            equip(sets.Engaged)

        elseif skillspells:contains(spell.name) then
            equip(sets.bluskill)

        else
            equip(sets.magical)
        end

    elseif spell.skill == "Healing Magic" then
        equip(sets.cure)
    end

 end

function aftercast(spell)
    if player.status == "Engaged" then
        equip(sets.Engaged)

    else
        equip(sets.Idle)
    end

    if spell.name == "Nat. Meditation" then
        send_command("timers c Nat.Med 60 down")
    end

end

function status_change(new,old)
    if new == "Engaged" then
        equip(sets.Engaged)

    elseif new == "Idle" or new == "Resting" then
        equip(sets.Idle)

    elseif new == "Dead" or "Engaged Dead" then
        equip(sets.dt)

    end
end

function self_command(command)
    if command == "normal" then
        sets.Engaged = sets.tp
        add_to_chat(5, "tp")

    elseif command == "dt" then
        sets.Engaged = sets.dt
        add_to_chat(5, "dt")

    elseif command == "acc" then
        sets.Engaged = sets.acc
        add_to_chat(5, "acc")

    elseif command == "bd" then
        sets.Engaged = set_combine(sets.tp, {body="Iuitl Vest +1"})
        add_to_chat(5, "bd")

    end

    sets.Idle = set_combine(sets.Engaged, sets.refresh)
    equip(sets.Engaged)
end