Runes of Magic US / AU

Source code

 -function BuffParty(arg1,arg2)

Source code

 function BuffParty(arg1,arg2) 

Source code

     local othersbuffs = { "Holy Protection" } 

Source code

     for num=1,GetNumPartyMembers()-1 do
        TargetUnit("party"..num)
        if GetActionUsable(arg1) and (UnitHealth("party"..num) > 0) then
            if vocal then Msg("- Checking group buffs on "..UnitName("party"..num)) end
            for i,buff in ipairs(groupbuffs) do
                if (g_skill[buff] ~= nil) and CD(buff) and (BuffTimeLeft("target",buff) <= buffrefresh) then
                    if UnitIsUnit("target","party"..num) then
                        if vocal then Msg("- Casting "..buff.." on "..UnitName("target")) end
                        CastSpellByName(buff)
                        return
                    else
                        if vocal then Msg("- Error: "..UnitName("target").." != "..UnitName("party"..num)) end
                    end
                end
            end
            if vocal then Msg("- Checking others buffs on "..UnitName("party"..num)) end
            for i,buff in ipairs(othersbuffs) do
                if (g_skill[buff] ~= nil) and CD(buff) and (BuffTimeLeft("target", buff) <= buffrefresh) then
                    if UnitIsUnit("target","party"..num) then
                        if vocal then Msg("- Casting "..buff.." on "..UnitName("target")) end
                        CastSpellByName(buff)
                        return
                    else
                        if vocal then Msg("- Error: "..UnitName("target").." != "..UnitName("party"..num)) end
                    end
                end
            end
        else
            if vocal then Msg("- Player "..UnitName("party"..num).." out of range or dead.") end
        end
    end 

Source code

DIYCE.lua
CustomFunctions.lua

Source code

-- DIY Combat Engine version 2.2

local g_skill  = {}
local g_lastaction = ""

function Msg(outstr,a1,a2,a3)
	DEFAULT_CHAT_FRAME:AddMessage(tostring(outstr),a1,a2,a3)
end

function ReadSkills()
	g_skill = {}
	local skillname,slot

	for page = 1,4 do
		slot = 1
		skillname = GetSkillDetail(page,slot)
		repeat
			local a1,a2,a3,a4,a5,a6,a7,a8,skillusable = GetSkillDetail(page,slot)
			if skillusable then
				g_skill[skillname] = { ['page'] = page, ['slot'] = slot }
			end
			slot = slot + 1
			skillname = GetSkillDetail(page,slot)
		until skillname == nil
	end
end

-- Read Skills on Log-In/Class Change/Level-Up
		local DIYCE_EventFrame = CreateUIComponent("Frame","DIYCE_EventFrame","UIParent")
			DIYCE_EventFrame:SetScripts("OnEvent", [=[ 
					if event == 'PLAYER_SKILLED_CHANGED' then
						ReadSkills()
						end
					]=] )
			DIYCE_EventFrame:RegisterEvent("PLAYER_SKILLED_CHANGED")

function PctH(tgt)
	return (UnitHealth(tgt)/UnitMaxHealth(tgt))
end

function PctM(tgt)
	return (UnitMana(tgt)/UnitMaxMana(tgt))
end

function PctS(tgt)
	return (UnitSkill(tgt)/UnitMaxSkill(tgt))
end

function CancelBuff(buffname)
	local i = 1
	local buff = UnitBuff("player",i)

	while buff ~= nil do
		if buff == buffname then
			CancelPlayerBuff(i)
			return true
		end

		i = i + 1
		buff = UnitBuff("player",i)
	end
	return false
end

function BuffList(tgt)
    local list = {}
    local buffcmd = UnitBuff
    local infocmd = UnitBuffLeftTime

    if UnitCanAttack("player",tgt) then
        buffcmd = UnitDebuff
        infocmd = UnitDebuffLeftTime
    end

    -- There is a max of 100 buffs/debuffs per unit apparently
    for i = 1,100 do
        local buff, _, stackSize, ID = buffcmd(tgt, i)
        local timeRemaining = infocmd(tgt,i)
        if buff then
            -- Ad to list by name
            list[buff:gsub('(%()(.)(%))', '%2')] = { stack = stackSize, time = timeRemaining, id = ID }
            -- We also list by ID in case two different buffs/debuffs have the same name.
            list[ID] = {stack = stackSize, time = timeRemaining, name = buff:gsub("(%()(.)(%))", "%2") }
        else
            break
        end
    end

    return list
end

function CD(skillname)
	local firstskill = GetSkillDetail(2,1)
	if (g_skill[firstskill] == nil) or (g_skill[firstskill].page ~= 2) then
		ReadSkills()
	end

	if g_skill[skillname] ~= nil then
		local tt,cd = GetSkillCooldown(g_skill[skillname].page,g_skill[skillname].slot)
		return cd <= 0.4
	elseif skillname == nil then
		return false
	else
		Msg("Skill not available: "..skillname)		--Comment this line out if you do not wish to recieve this error message.
        return
	end
end

function MyCombat(Skill, arg1)
	local spell_name = UnitCastingTime("player")
	local talktome = ((arg1 == "v1") or (arg1 == "v2"))
	local action,actioncd,actiondef,actioncnt
	
	if spell_name ~= nil then
		if (arg1 == "v2") then Msg("- ['..spell_name..']", 0, 1, 1) end
		return true
	end

	for x,tbl in ipairs(Skill) do
		
	local useit = type(Skill[x].use) ~= "function" and Skill[x].use or (type(Skill[x].use) == "function" and Skill[x].use() or false)
		if useit then
			if string.find(Skill[x].name, "Action:") then
				action = tonumber((string.gsub(Skill[x].name, "(Action:)( *)(%d+)(.*)", "%3")))
				_1,actioncd = GetActionCooldown(action)
				actiondef,_1,actioncnt = GetActionInfo(action)
				if GetActionUsable(action) and (actioncd == 0) and (actiondef ~= nil) and (actioncnt > 0) then
					if talktome then Msg("- "..Skill[x].name) end
					UseAction(action)
					return true
				end
			elseif string.find(Skill[x].name, "Custom:") then
				action = string.gsub(Skill[x].name, "(Custom:)( *)(.*)", "%3")
				if CustomAction(action) then
					return true
				end
			elseif string.find(Skill[x].name, "Item:") then
				action = string.gsub(Skill[x].name, "(Item:)( *)(.*)", "%3")
				if talktome then Msg("- "..Skill[x].name) end
				UseItemByName(action)
				return true
			elseif CD(Skill[x].name) then
				if talktome then Msg("- "..Skill[x].name) end
				CastSpellByName(Skill[x].name)
				return true
			elseif string.find(Skill[x].name, "Pet Skill:") then
				action = string.gsub(Skill[x].name, "(Pet Skill:)( *)(%d+)(.*)", "%3")
					UsePetAction(action)
				if (arg1 == "v2") then Msg(Skill[x].name.." has been fully processed") end
				return true
			end
		end
	end
	if (arg1 == "v2") then Msg("- [IDLE]", 0, 1, 1) end
	
	return false
end

function CustomAction(action)
    if CD(action) then
        if IsShiftKeyDown() then Msg("- "..action) end
        g_lastaction = action
        CastSpellByName(action)
        return true
    else
        return false
    end
end

function BuffTimeLeft(tgt, buffname)
    local cnt = 1
	local buff = UnitBuff(tgt,cnt)

	while buff ~= nil do
		if string.find(buff,buffname) then
			return UnitBuffLeftTime(tgt,cnt)
		end
		cnt = cnt + 1
		buff = UnitBuff(tgt,cnt)
	end

	return 0
end

-function BuffParty(arg1,arg2)
--    arg1 = Quickbar slot # for targetable, instant-cast buff without a cooldown (eg. Amp Attack) for range checking.
--    arg2 = buff expiration time cutoff (in seconds) for refreshing buffs, default is 45 seconds.

    local selfbuffs = { "Soul Bond", "Enhanced Armor", "Holy Seal" }
    local groupbuffs = { "Grace of Life", "Amplified Attack", "Angel's Blessing", "Essence of Magic", "Magic Barrier", "Blessed Spring Water", "Fire Ward", "Savage Blessing", "Concentration Prayer", "Shadow Fury"  }

    local buffrefresh = arg2 or 45           -- Refresh buff time (seconds)
    local spell = UnitCastingTime("player")  -- Spell being cast?
    local vocal = IsShiftKeyDown()           -- Generate feedback if Shift key held

    if (spell ~= nil) then
        return
    end

    if vocal then Msg("- Checking self buffs on "..UnitName("player")) end
    for i,buff in ipairs(selfbuffs) do
        if (g_skill[buff] ~= nil) and CD(buff) and (BuffTimeLeft("player",buff) <= buffrefresh) then
            if vocal then Msg("- Casting "..buff.." on "..UnitName("player")) end
            TargetUnit("player")
            CastSpellByName(buff)
            return
        end
    end

    if vocal then Msg("- Checking group buffs on "..UnitName("player")) end
    for i,buff in ipairs(groupbuffs) do
        if (g_skill[buff] ~= nil) and CD(buff) and (BuffTimeLeft("player",buff) <= buffrefresh) then
            if vocal then Msg("- Casting "..buff.." on "..UnitName("player")) end
            TargetUnit("player")
            CastSpellByName(buff)
            return
        end
    end

    for num=1,GetNumPartyMembers()-1 do
        TargetUnit("party"..num)
        if GetActionUsable(arg1) and (UnitHealth("party"..num) > 0) then
            if vocal then Msg("- Checking group buffs on "..UnitName("party"..num)) end
            for i,buff in ipairs(groupbuffs) do
                if (g_skill[buff] ~= nil) and CD(buff) and (BuffTimeLeft("target",buff) <= buffrefresh) then
                    if UnitIsUnit("target","party"..num) then
                        if vocal then Msg("- Casting "..buff.." on "..UnitName("target")) end
                        CastSpellByName(buff)
                        return
                    else
                        if vocal then Msg("- Error: "..UnitName("target").." != "..UnitName("party"..num)) end
                    end
                end
            end
        else
            if vocal then Msg("- Player "..UnitName("party"..num).." out of range or dead.") end
        end
    end

    if vocal then Msg("- Nothing to do.") end
end

Source code

-function BuffParty(arg1,arg2)

Source code

local WHITE = "|cffffffff"
local SILVER = "|cffc0c0c0"
local GREEN = "|cff00ff00"
local LTBLUE = "|cffa0a0ff"

function DIYCE_DebugSkills(skillList)
    DEFAULT_CHAT_FRAME:AddMessage(GREEN.."Skill List:")
    
    for i,v in ipairs(skillList) do
        DEFAULT_CHAT_FRAME:AddMessage(SILVER.."  ['..WHITE..i..SILVER..']: "..LTBLUE..""..WHITE..v.name..LTBLUE..""  use = "..WHITE..(v.use and "true" or "false"))
    end

    DEFAULT_CHAT_FRAME:AddMessage(GREEN.."----------")
end

function DIYCE_DebugBuffList(buffList)
    DEFAULT_CHAT_FRAME:AddMessage(GREEN.."Buff List:")
    
    for k,v in pairs(buffList)
        -- We ignore numbered entries because both the ID and name 
        -- are stored in the list. This avoids doubling the output.
        if type(k) ~= "number" then
            DEFAULT_CHAT_FRAME:AddMessage(SILVER.."  ['..WHITE..k..SILVER..']:  "..LTBLUE.."id: "..WHITE..v.id..LTBLUE.."  stack: "..WHITE..v.stack..LTBLUE.."  time: "..WHITE..v.time)
        end
    end
    
    DEFAULT_CHAT_FRAME:AddMessage(GREEN.."----------")    
end

Source code

/run DIYCE_DebugBuffList(BuffList("player"))

Source code

-- DIY Combat Engine version 2.2

local g_skill  = {}
local g_lastaction = ""

function Msg(outstr,a1,a2,a3)
    DEFAULT_CHAT_FRAME:AddMessage(tostring(outstr),a1,a2,a3)
end

function ReadSkills()
    g_skill = {}
    local skillname,slot

    for page = 1,4 do
        slot = 1
        skillname = GetSkillDetail(page,slot)
        repeat
            local a1,a2,a3,a4,a5,a6,a7,a8,skillusable = GetSkillDetail(page,slot)
            if skillusable then
                g_skill[skillname] = { ['page'] = page, ['slot'] = slot }
            end
            slot = slot + 1
            skillname = GetSkillDetail(page,slot)
        until skillname == nil
    end
end

-- Read Skills on Log-In/Class Change/Level-Up
        local DIYCE_EventFrame = CreateUIComponent("Frame","DIYCE_EventFrame","UIParent")
            DIYCE_EventFrame:SetScripts("OnEvent", [=[ 
                    if event == 'PLAYER_SKILLED_CHANGED' then
                        ReadSkills()
                        end
                    ]=] )
            DIYCE_EventFrame:RegisterEvent("PLAYER_SKILLED_CHANGED")

function PctH(tgt)
    return (UnitHealth(tgt)/UnitMaxHealth(tgt))
end

function PctM(tgt)
    return (UnitMana(tgt)/UnitMaxMana(tgt))
end

function PctS(tgt)
    return (UnitSkill(tgt)/UnitMaxSkill(tgt))
end

function CancelBuff(buffname)
    local i = 1
    local buff = UnitBuff("player",i)

    while buff ~= nil do
        if buff == buffname then
            CancelPlayerBuff(i)
            return true
        end

        i = i + 1
        buff = UnitBuff("player",i)
    end
    return false
end

function BuffList(tgt)
    local list = {}
    local buffcmd = UnitBuff
    local infocmd = UnitBuffLeftTime

    if UnitCanAttack("player",tgt) then
        buffcmd = UnitDebuff
        infocmd = UnitDebuffLeftTime
    end

    -- There is a max of 100 buffs/debuffs per unit apparently
    for i = 1,100 do
        local buff, _, stackSize, ID = buffcmd(tgt, i)
        local timeRemaining = infocmd(tgt,i)
        if buff then
            -- Ad to list by name
            list[buff:gsub('(%()(.)(%))', '%2')] = { stack = stackSize, time = timeRemaining, id = ID }
            -- We also list by ID in case two different buffs/debuffs have the same name.
            list[ID] = {stack = stackSize, time = timeRemaining, name = buff:gsub("(%()(.)(%))", "%2") }
        else
            break
        end
    end

    return list
end

function CD(skillname)
    local firstskill = GetSkillDetail(2,1)
    if (g_skill[firstskill] == nil) or (g_skill[firstskill].page ~= 2) then
        ReadSkills()
    end

    if g_skill[skillname] ~= nil then
        local tt,cd = GetSkillCooldown(g_skill[skillname].page,g_skill[skillname].slot)
        return cd <= 0.4
    elseif skillname == nil then
        return false
    else
--        Msg("Skill not available: "..skillname)        --Comment this line out if you do not wish to recieve this error message.
        return
    end
end

function MyCombat(Skill, arg1)
    local spell_name = UnitCastingTime("player")
    local talktome = ((arg1 == "v1") or (arg1 == "v2"))
    local action,actioncd,actiondef,actioncnt
    
    if spell_name ~= nil then
        if (arg1 == "v2") then Msg("- ['..spell_name..']", 0, 1, 1) end
        return true
    end

    for x,tbl in ipairs(Skill) do
        
    local useit = type(Skill[x].use) ~= "function" and Skill[x].use or (type(Skill[x].use) == "function" and Skill[x].use() or false)
        if useit then
            if string.find(Skill[x].name, "Action:") then
                action = tonumber((string.gsub(Skill[x].name, "(Action:)( *)(%d+)(.*)", "%3")))
                _1,actioncd = GetActionCooldown(action)
                actiondef,_1,actioncnt = GetActionInfo(action)
                if GetActionUsable(action) and (actioncd == 0) and (actiondef ~= nil) and (actioncnt > 0) then
                    if talktome then Msg("- "..Skill[x].name) end
                    UseAction(action)
                    return true
                end
            elseif string.find(Skill[x].name, "Custom:") then
                action = string.gsub(Skill[x].name, "(Custom:)( *)(.*)", "%3")
                if CustomAction(action) then
                    return true
                end
            elseif string.find(Skill[x].name, "Item:") then
                action = string.gsub(Skill[x].name, "(Item:)( *)(.*)", "%3")
                if talktome then Msg("- "..Skill[x].name) end
                UseItemByName(action)
                return true
            elseif CD(Skill[x].name) then
                if talktome then Msg("- "..Skill[x].name) end
                CastSpellByName(Skill[x].name)
                return true
            elseif string.find(Skill[x].name, "Pet Skill:") then
                action = string.gsub(Skill[x].name, "(Pet Skill:)( *)(%d+)(.*)", "%3")
                    UsePetAction(action)
                if (arg1 == "v2") then Msg(Skill[x].name.." has been fully processed") end
                return true
            end
        end
    end
    if (arg1 == "v2") then Msg("- [IDLE]", 0, 1, 1) end
    
    return false
end

function CustomAction(action)
    if CD(action) then
        if IsShiftKeyDown() then Msg("- "..action) end
        g_lastaction = action
        CastSpellByName(action)
        return true
    else
        return false
    end
end

function BuffTimeLeft(tgt, buffname)
    local cnt = 1
    local buff = UnitBuff(tgt,cnt)

    while buff ~= nil do
        if string.find(buff,buffname) then
            return UnitBuffLeftTime(tgt,cnt)
        end
        cnt = cnt + 1
        buff = UnitBuff(tgt,cnt)
    end

    return 0
end

function BuffParty(arg1,arg2)
--    arg1 = Quickbar slot # for targetable, instant-cast buff without a cooldown (eg. Amp Attack) for range checking.
--    arg2 = buff expiration time cutoff (in seconds) for refreshing buffs, default is 45 seconds.

    local selfbuffs = { "Soul Bond", "Enhanced Armor", "Holy Seal" }
    local groupbuffs = { "Grace of Life", "Amplified Attack", "Angel's Blessing", "Essence of Magic", "Magic Barrier", "Blessed Spring Water", "Fire Ward", "Savage Blessing", "Concentration Prayer", "Shadow Fury"  }
    local othersbuffs = { "Holy Protection" }
    
    local buffrefresh = arg2 or 45           -- Refresh buff time (seconds)
    local spell = UnitCastingTime("player")  -- Spell being cast?
    local vocal = IsShiftKeyDown()           -- Generate feedback if Shift key held

    if (spell ~= nil) then
        return
    end

    if vocal then Msg("- Checking self buffs on "..UnitName("player")) end
    for i,buff in ipairs(selfbuffs) do
        if (g_skill[buff] ~= nil) and CD(buff) and (BuffTimeLeft("player",buff) <= buffrefresh) then
            if vocal then Msg("- Casting "..buff.." on "..UnitName("player")) end
            TargetUnit("player")
            CastSpellByName(buff)
            return
        end
    end

    if vocal then Msg("- Checking group buffs on "..UnitName("player")) end
    for i,buff in ipairs(groupbuffs) do
        if (g_skill[buff] ~= nil) and CD(buff) and (BuffTimeLeft("player",buff) <= buffrefresh) then
            if vocal then Msg("- Casting "..buff.." on "..UnitName("player")) end
            TargetUnit("player")
            CastSpellByName(buff)
            return
        end
    end

    for num=1,GetNumPartyMembers()-1 do
        TargetUnit("party"..num)
        if GetActionUsable(arg1) and (UnitHealth("party"..num) > 0) then
            if vocal then Msg("- Checking group buffs on "..UnitName("party"..num)) end
            for i,buff in ipairs(groupbuffs) do
                if (g_skill[buff] ~= nil) and CD(buff) and (BuffTimeLeft("target",buff) <= buffrefresh) then
                    if UnitIsUnit("target","party"..num) then
                        if vocal then Msg("- Casting "..buff.." on "..UnitName("target")) end
                        CastSpellByName(buff)
                        return
                    else
                        if vocal then Msg("- Error: "..UnitName("target").." != "..UnitName("party"..num)) end
                    end
                end
            end
            if vocal then Msg("- Checking others buffs on "..UnitName("party"..num)) end
            for i,buff in ipairs(othersbuffs) do
                if (g_skill[buff] ~= nil) and CD(buff) and (BuffTimeLeft("target", buff) <= buffrefresh) then
                    if UnitIsUnit("target","party"..num) then
                        if vocal then Msg("- Casting "..buff.." on "..UnitName("target")) end
                        CastSpellByName(buff)
                        return
                    else
                        if vocal then Msg("- Error: "..UnitName("target").." != "..UnitName("party"..num)) end
                    end
                end
            end
        else
            if vocal then Msg("- Player "..UnitName("party"..num).." out of range or dead.") end
        end
    end

    if vocal then Msg("- Nothing to do.") end
end 

Source code

 -- DIYCE 2.1
local WHITE = "|cffffffff"
local SILVER = "|cffc0c0c0"
local GREEN = "|cff00ff00"
local LTBLUE = "|cffa0a0ff"

function DIYCE_DebugSkills(skillList)
    DEFAULT_CHAT_FRAME:AddMessage(GREEN.."Skill List:")
    
    for i,v in ipairs(skillList) do
        DEFAULT_CHAT_FRAME:AddMessage(SILVER.."  ['..WHITE..i..SILVER..']: "..LTBLUE.."" "..WHITE..v.name..LTBLUE..""  use = "..WHITE..(v.use and "true" or "false"))
    end

    DEFAULT_CHAT_FRAME:AddMessage(GREEN.."----------")
end

function DIYCE_DebugBuffList(buffList)
    DEFAULT_CHAT_FRAME:AddMessage(GREEN.."Buff List:")
    
    for k,v in pairs(buffList) do
        -- We ignore numbered entries because both the ID and name 
        -- are stored in the list. This avoids doubling the output.
        if type(k) ~= "number" then
            DEFAULT_CHAT_FRAME:AddMessage(SILVER.."  ['..WHITE..k..SILVER..']:  "..LTBLUE.."id: "..WHITE..v.id..LTBLUE.."  stack: "..WHITE..v.stack..LTBLUE.."  time: "..WHITE..v.time)
        end
    end
    
    DEFAULT_CHAT_FRAME:AddMessage(GREEN.."----------")    
end

local silenceList = {
        ['Annihilation']     = true,
        ['King Bug Shock']     = true,
        ['Mana Rift']         = true,
        ['Dream of Gold']     = true,
        ['Flame']             = true,
        ['Flame Spell']     = true,
        ['Wave Bomb']         = true,
        ['Silence']         = true,
        ['Recover']         = true,
        ['Restore Life']     = true,
        ['Heal']             = true,
        ['Curing Shot']     = true,
        ['Leaves of Fire']     = true,
        ['Urgent Heal']     = true,
                    }
                    
function PriestFairySequence(arg1)
    local Skill = {}
    local Skill2 = {}
    local i = 0
    local FairyExists = UnitExists("playerpet")
    local FairyBuffs = BuffList("playerpet")
    local combat = GetPlayerCombatState()
    
    --Determine Class-Combo
    mainClass, subClass = UnitClassToken( "player" )

    --Summon Fairy
    if (not FairyExists) and (not combat) then
        if mainClass == "AUGUR" then
            if subClass == "THIEF" then
                Skill = {
                    { name = "Shadow Fairy",            use = true },
                        }
            elseif subClass == "RANGER" then
                Skill = {
                    { name = "Water Fairy",                use = true },
                        }
            elseif subClass == "MAGE" then
                Skill = {
                    { name = "Wind Fairy",                use = true },
                        }            
            elseif subClass == "KNIGHT" then
                Skill = {
                    { name = "Light Fairy",                use = true },
                        }            
            elseif subClass == "WARRIOR" then
                Skill = {
                    { name = "Fire Fairy",                use = true },
                        }
            end
        end
    end    
    
    --Cast Halo
    if FairyExists then
        if mainClass == "AUGUR" then
            if subClass == "THIEF" then
                if (not FairyBuffs[503459]) then
                    if (arg1 == "v1") then
                        Msg("- Activating Halo", 0, 1, 1)
                    end
                    Skill = {
                        { name = "Pet Skill: 6 (Wraith Halo)",    use = true },
                            }
                end
            elseif subClass == "RANGER" then
                if (not FairyBuffs[503457]) then
                    if (arg1 == "v1") then
                        Msg("- Activating Halo", 0, 1, 1)
                    end
                    Skill = {
                        { name = "Pet Skill: 6 (Frost Halo)",    use = true },
                            }
                end
            elseif subClass == "MAGE" then
                if (not FairyBuffs[503461]) then
                    if (arg1 == "v1") then
                        Msg("- Activating Halo", 0, 1, 1)
                    end
                    Skill = {
                        { name = "Pet Skill: 6 (Windrider Halo)",    use = true },
                            }
                end
            elseif subClass == "KNIGHT" then
                if (not FairyBuffs[503507]) then
                    if (arg1 == "v1") then
                        Msg("- Activating Halo", 0, 1, 1)
                    end
                    Skill = {
                        { name = "Pet Skill: 6 (Devotion Halo)",    use = true },
                            }
                end
            elseif subClass == "WARRIOR" then
                if (not FairyBuffs[503455]) then
                    if (arg1 == "v1") then
                        Msg("- Activating Halo", 0, 1, 1)
                    end
                    Skill = {
                        { name = "Pet Skill: 6 (Accuracy Halo)",    use = true },
                            }
                end
            end
        
            --Cast Conceal
        if (not MyCombat(Skill, arg1)) and not combat then
            if (not FairyBuffs[503753]) then
                if (arg1 == "v1") then
                    Msg("- Activating Conceal", 0, 1, 1)
                end
                Skill2 = {
                    { name = "Pet Skill: 7 (Conceal)",    use = true },
                        }
            end
        end
        end
    end
    
    if (not MyCombat(Skill, arg1)) then
        MyCombat(Skill2, arg1)
    end
end
                        
function KillSequence(arg1, healthpot, manapot, foodslot)
--arg1 = "v1" or "v2" for debugging
--healthpot = # of actionbar slot for health potions
--manapot = # of actionbar slot for mana potions
--foodslot = # of actionbar slot for food (add more args for more foodslots if needed)

    local Skill = {}
    local Skill2 = {}
    local i = 0
    
    -- Player and target status.
    local combat = GetPlayerCombatState()
    local enemy = UnitCanAttack("player","target")
    local EnergyBar1 = UnitMana("player")
    local EnergyBar2 = UnitSkill("player")
    local pctEB1 = PctM("player")
    local pctEB2 = PctS("player")
    local tbuffs = BuffList("target")
    local pbuffs = BuffList("player")
    local tDead = UnitIsDeadOrGhost("target")
    local behind = (not UnitIsUnit("player", "targettarget"))
    local melee = GetActionUsable(13) -- # is your melee range spell slot number
    local a1,a2,a3,a4,a5,ASon = GetActionInfo(14)  -- # is your Autoshot slot number
    local phealth = PctH("player")
    local thealth = PctH("target")
    local LockedOn = UnitExists("target")
    local boss = UnitSex("target") > 2
    local elite = UnitSex("target") == 2
    local party = GetNumPartyMembers() >= 2
    
    
    --Determine Class-Combo
    mainClass, subClass = UnitClassToken( "player" )

    --Silence Logic
    local tSpell,tTime,tElapsed = UnitCastingTime("target")
    local silenceThis = tSpell and silenceList[tSpell] and ((tTime - tElapsed) > 0.1)
    
    --Potion Checks
    healthpot = healthpot or 0
    manapot = manapot or 0
    
    --Equipment and Pet Protection
    if phealth <= .04 then
            --SwapEquipmentItem()        --Note: Remove the first double dash to re-enable equipment protection.
        for i=1,6 do
            if (IsPetSummoned(i) == true) then
                ReturnPet(i);
            end
        end        
    end
        
    --Check for level 1 mobs, if it is, drop target and acquire a new one.
    if (LockedOn and (UnitLevel("target") < 2)) then
        TargetUnit("")
        return
    end
    
    --Begin Player Skill Sequences
    
        --Priest = AUGUR, Druid = DRUID, Mage = MAGE, Knight = KNIGHT, 
        --Scout = RANGER, Rogue = THIEF, Warden = WARDEN, Warrior = WARRIOR
        
        -- Class: Warrior/Mage
            if mainClass == "WARRIOR" and subClass == "MAGE" then
                local SurpriseAttack = GetActionUsable(14)
    
            --Potions and Buffs
            Skill = {
                { name = "Action: "..healthpot,            use = (phealth <= .70) },
                { name = "Survival Instinct",              use = (phealth <= .30) and combat },
                { name = "Sense of Danger",                use = (phealth <= .30) and combat },
                { name = "Action: "..manapot,              use = (pctEB2 <= .40) },
                { name = "Action: "..Healslot,             use = (phealth < .70) and (not combat) and (not party) },
                { name = "Action: "..HoTslot,              use = (phealth < .80) and (not party) },
                { name = "Intensification",                use = (pctEB2 >= .05) and (not pbuffs['Intensification']) and boss and enemy },
                { name = "Aggressiveness",                 use = boss and enemy },
                { name = "Electric Attack",                use = (pctEB2 >= .05) and ((not pbuffs['Electric Attack']) or (pbuffs['Electric Attack'].time <= 45)) },
                    }
                    
            --Combat
                if enemy then
                Skill2 = {
                    { name = "Silence",                    use = (silenceThis) },
                    { name = "Surprise Attack",            use = SurpriseAttack },
                    { name = "Enraged",                    use = (EnergyBar1 <= 30) and (boss or elite) },
                    { name = "Electrical Rage",            use = (EnergyBar1 >= 15) and (pctEB2 >=.05) and (not pbuffs['High Voltage III']) },
                    { name = "Thunder Sword",              use = (pctEB2 >= .05) },
                    { name = "Lightning's Touch",          use = (pctEB2 >= .05) },
                    { name = "Attack",                     use = (thealth == 1) },
                        }
            end

            --Class: Rogue/Priest
            elseif mainClass == "THIEF" and subClass == "AUGUR" then
            
            --Potions and Buffs
            Skill = {
                { name = "Regenerate",                    use = (phealth <= .90) and (pctEB2 >= .05) and (not pbuffs['Regenerate']) },
                { name = "Action: "..healthpot,           use = (phealth <= .70) },
                { name = "Action: "..manapot,             use = (pctEB2 <= .40) },
                { name = "Magic Barrier",                 use = (pctEB2 >= .05) and ((not pbuffs['Magic Barrier']) or (pbuffs['Magic Barrier'].time <= 45)) },
                { name = "Quickness Aura",                use = (pctEB2 >= .05) and ((not pbuffs['Quickness Aura']) or (pbuffs['Quickness Aura'].time <= 45)) },
                { name = "Poison",                        use = ((not pbuffs['Poisonous']) or (pbuffs['Poisonous'].time <= 45))},
                }
                    
            --Combat
                if enemy then
                Skill2 = {
                    { name = "Premeditation",             use = (not combat) and boss and (EnergyBar1 >= 50) },
                    { name = "Slowing Poison",          use = boss },
                    { name = "Informer",                   use = boss },
                    { name = "Fervent Attack",             use = boss },
                    { name = "Assassins Rage",             use = boss },
                    { name = "Kick",                       use = (pctEB2 >= .05) },
                    { name = "Sneak Attack",               use = (EnergyBar1 >= 20) and boss and behind and party },
                    { name = "Blind Spot Attack",        use = (EnergyBar1 >= 20) and boss and behind and party },
                    { name = "Shadowstab",              use = (EnergyBar1 >= 20) and (not tbuffs[620313]) },
                    { name = "Low Blow",                use = (EnergyBar1 >= 30) and (tbuffs[620313]) and (not tbuffs[500704]) },
                    { name = "Wound Attack",              use = (EnergyBar1 >= 35) },
                    { name = "Shadowstab",                 use = (EnergyBar1 >= 20) },
                    { name = "Attack",                    use = (thealth == 1) },                    
                    }
            end

    -- Class: Knight/Priest
    -- DIYCE 2.1
            elseif mainClass == "KNIGHT" and subClass == "AUGUR" then

                local shield = true
                if GetEquipSlotInfo(17) == nil then
                    shield = false
                end
    
        --Potions and Buffs
            Skill = {
                { name = "Action: "..healthpot,        use = (phealth <= .40) },
                { name = "Action: "..manapot,        use = ((pctEB1 <= .50) and (phealth >= .40)) }, -- only mana pot if decent health
                { name = "Magic Barrier",            use = (pctEB1 >= .05 and (not pbuffs['Magic Barrier'])) },
                { name = "Holy Seal",                use = (pctEB1 >= .05 and (not pbuffs['Holy Seal'])) },
                { name = "Enhanced Armor",            use = (pctEB1 >= .05 and (not pbuffs['Enhanced Armor'])) },
                { name = "Blessed Spring Water",    use = (pctEB1 >= .05 and (not pbuffs['Blessed Spring Water'])) },

        -- Heals
                { name = "Holy Shield",                use = (phealth <= .20) },
                { name = "Holy Illumination",          use = (combat and (phealth <= .75) and (not pbuffs['Holy Illumination'])) },
                { name = "Holy Aura",                use = (phealth <= .30) },
                { name = "Resolution",                use = (combat and (phealth <= .65)) },
                { name = "Urgent Heal",                use = (phealth <= .65) },
                { name = "Regenerate",                use = ((phealth <= .90) and (not pbuffs['Regenerate'])) },
                }

        -- Combat
                if enemy then
                Skill2 = {
                { name = "Shield of Valor",         use = ((phealth <= .8) and shield) },
                { name = "Shield of Discipline",    use = (silenceThis and shield) },
                { name = "Shield of Atonement",     use = (combat and shield and (not tbuffs['Restrained'])) },
                { name = "Rising Tide",                use = ((not melee) and (thealth >= .99)) }, -- To Pull with
                { name = "Mana Return",               use = (tbuffs['Holy Seals 3']) and (pctEB1 <= .70) },
                { name = "Threaten",                  use = (tbuffs['Holy Seals 3']) and (not tbuffs['Threaten']) },
                { name = "Hatred Strike",             use = (combat and party) },-- Agro Multiplier if in party only
                { name = "Disarmament",                use = ((UnitLevel("target") >= (UnitLevel("player") - 10)) and (boss or elite) and ((not tbuffs['Disarmament IV']) or (tbuffs['Disarmament IV'].time <= 3))) }, -- stack to 4
                { name = "Whirlwind Shield",           use = (melee and shield and pctEB1 >= .2 ) },
                { name = "Charge",                    use = (combat and not tbuffs['Charge'] and (tspell ~= nil) or not melee)}, -- charge spellcasters
                { name = "Holy Light's Fury",         use = (pctEB1 >= .2 ) and not tbuffs['Holy Light's Fury'] }, -- Knight/Priest 15 Elite
                { name = "Holy Smite",                use = (pctEB1 >= .2 ) and tbuffs['Holy Light's Fury'] }, -- Knight/Priest 20 Elite
                { name = "Holy Strike",               use = (pctEB1 >= .2 ) and not tbuffs['Light Seal III'] },
                { name = "Punishment",                 use = (tbuffs['Light Seal III']) },
                }
            end

    -- Class: Priest/Knight 2.22
    -- DIYCE 2.2
            elseif mainClass == "AUGUR" and subClass == "KNIGHT" then
            
                local FairyExists = UnitExists("playerpet")
                
                if FairyExists then
                    if (PctH("playerpet") <= 0.80) then
                            TargetUnit("playerpet")
                            CastSpellByName("Regenerate")
                        return
                    end
                end

        --Potions and Buffs
            Skill = {
                { name = "Last Prayer",             use = ((not FairyExists) and combat) },
                { name = "Light Fairy",                use = ((not FairyExists) and combat) },
                { name = "Action: "..healthpot,      use = (phealth <= .40) },
                { name = "Action: "..manapot,          use = ((pctEB1 <= .50) and (phealth >= .40)) }, -- only mana pot if decent health
                { name = "Magic Barrier",             use = ((pctEB1 >= .05) and (not pbuffs['Magic Barrier'])) },
                { name = "Enhanced Armor",            use = ((pctEB1 >= .05) and (not pbuffs['Enhanced Armor'])) },
                { name = "Blessed Spring Water",       use = ((pctEB1 >= .05) and (not pbuffs['Blessed Spring Water'])) },
                { name = "Holy Power",                 use = (combat and (pctEB1 <= .80) and (not pbuffs['Holy Power'])) },
                { name = "Wave Armor",                 use = (combat and not pbuffs['Wave Armor']) },
                { name = "Soul Bond",                  use = (not pbuffs['Soul Bond']) },
                { name = "Grace of Life",              use = (not pbuffs['Enhanced Grace of Life']) },
                { name = "Amplified Attack",        use = (LockedOn and not enemy and not UnitIsUnit("playertarget","playerpet") and not tdead and not tbuffs['Amplified Attack']) },
                { name = "Amplified Attack",        use = (not pbuffs['Amplified Attack']) },
                { name = "Healing Salve",            use = ((phealth <= .85) and not pbuffs['Healing Salve'] ) },
                { name = "Healing Salve",            use = ((phealth <= .85) and pbuffs['Healing Salve'] and (pbuffs['Healing Salve'].time <= 10)) },

        -- Self Heals
                { name = "Regenerate",              use = ((phealth <= .85) and (not pbuffs['Regenerate'])) },
                { name = "Urgent Heal",                use = (phealth <= .55) },
                { name = "Heal",                      use = (phealth <= .40) },
                { name = "Holy Aura",                 use = (phealth <= .30) },
                { name = "Soul Source",                use = (phealth <= .25) },

        -- Target Heals
                { name = "Regenerate",                use = (LockedOn and not enemy and (thealth <= .80) and (not tbuffs['Regenerate'])) },
                { name = "Urgent Heal",               use = (LockedOn and not enemy and (thealth <= .55)) },
                { name = "Healing Salve",            use = (LockedOn and not enemy and (thealth <= .85) and not tbuffs['Healing Salve'] ) },
                { name = "Heal",                       use = (LockedOn and not enemy and (thealth <= .40)) },
                    }

                    
                -- Combat
                if enemy then
                Skill2 = {
                { name = "Bone Chill",                 use = (not tbuffs['Bone Chill']) },
                { name = "Rising Tide",                use = true },
                }
    
            end

    -- Class: Druid/MAGE
    -- DIYCE 2.1
            elseif mainClass == "DRUID" and subClass == "MAGE" then
        -- Silence
            Skill = {
                { name = "Silence",                      use = (silenceThis) },
                
        -- Potions
                { name = "Action: "..healthpot,           use = (phealth <= .40) },
                { name = "Action: "..manapot,             use = ((pctEB1 <= .50) and (phealth >= .40)) }, -- only mana pot if decent health
                
        -- Heals
                { name = "Mother Earth's Protection",      use = (phealth <= .30) },
                { name = "Recover",                       use = (phealth <= .40) },
                { name = "Curing Seed",                    use = (phealth <= .50) },
                { name = "Restore Life",                   use = ((phealth <= .60) and (pbuffs['Nature's Power'].stack <=2))}, -- use this ahead of Recover if low on Natures Power
                { name = "Recover",                     use = (not enemy and (thealth <= .60) and (not tbuffs['Recover'])) },
                { name = "Recover",                     use = ((phealth <= .60) and (not pbuffs['Recover'])) },
                { name = "Antidote",                     use = (not enemy and tbuffs['Poisoned']) },
                { name = "Purify",                         use = (not enemy and tbuffs['Curse']) },
                { name = "Antidote",                     use = (pbuffs['Poisoned']) },
                { name = "Purify",                         use = (pbuffs['Curse']) },
                { name = "Blossoming Life",             use = ((phealth <= .80) and (not pbuffs['Blossoming Life'])) },
                { name = "Blossoming Life",             use = ((phealth <= .90) and not combat) },
                { name = "Blossoming Life",             use = (not enemy and (thealth <= .80)) },

        -- Buffs
                { name = "Savage Blessing",             use = (not pbuffs['Savage Blessing']) },
                { name = "Concentration Prayer",         use = (not pbuffs['Concentration Prayer']) },
                { name = "Fire Ward",                    use = (not pbuffs['Fire Ward']) },
                }

        -- Ranged Attack
                if enemy then
                Skill2 = {
                { name = "Intensification",                use = (not pbuffs['Intensification']) },
                { name = "Binding Silence",              use = (tspell ~= nil and ttime >= 1 and (ttime - telapsed) > 0.5 and pctEB1 >= .05) },
                { name = "Briar Entwinement",             use = (not tbuffs['Briar Entwinement'] or BuffTimeLeft("target", "Briar Entwinement") <=2) },
                { name = "Fireball",                       use = (combat) },
                { name = "Earth Pulse",                   use = (combat) },
                { name = "Weakening Seed",                use = ((boss or elite) and (not tbuffs['Weakening Seed']) and (pbuffs['Nature's Power'].stack >= 3)) },
                { name = "Lightning",                     use = (not tbuffs['Lightning']) },
                { name = "Rockslide",                     use = (true) },
                { name = "Earth Arrow",                   use = (true) },
                }
                    
            end

    -- Class: Mage/Druid
    -- DIYCE 2.1
            elseif mainClass == "MAGE" and subClass == "DRUID" then

        -- Silence
            Skill = {
                { name = "Silence",                        use = (silenceThis) },

        -- Potions
                { name = "Action: "..healthpot,            use = (phealth <= .50) },
                { name = "Action: "..manapot,              use = ((pctEB1 <= .50) and (phealth >= .50)) }, -- only mana pot if decent health
        -- Heals
                { name = "Recover",                       use = ((phealth <= .60) and (not pbuffs['Recover'])) },
                { name = "Recover",                       use = (phealth <= .30) },
                { name = "Recover",                       use = ((phealth <= .90) and (not combat)) }, -- top off before fight
        -- Buffs
                { name = "Perception",                    use = (not pbuffs['Perception']) }, -- Mage/Druid Elite 15
                { name = "Magic Target",                  use = (not combat and not pbuffs['Magic Target']) }, -- Mage/Druid Elite 20
                { name = "Savage Blessing",               use = (not pbuffs['Savage Blessing']) },
                { name = "Fire Ward",                     use = (not pbuffs['Fire Ward']) },
            -- In case Electrostatic Charge is still on cooldown and you're getting hit hard
                { name = "Mother Earth's Protection",     use = ((phealth <= .30) and not pbuffs['Electrostatic Charge']) },  
                }

        -- Ranged Attack
                if enemy then
                Skill2 = {
                { name = "Fireball",                    use = (true) },
                { name = "Elemental Catalysis",           use = (not pbuffs['Elemental Catalysis']) },
                { name = "Intensification",               use = (not pbuffs['Intensification']) },
                { name = "Electrostatic Charge",          use = (not pbuffs['Electrostatic Charge']) },
                { name = "Lightning",                      use = (not tbuffs['Lightning']) },
                { name = "Meteor Shower",                use = (combat and tbuffs['Lightning']) },
                { name = "Phoenix",                       use = (combat and melee) },
                { name = "Earth Pulse",                  use = (combat and melee) },
                { name = "Discharge",                   use = (combat and melee) },
                { name = "Flame",                        use = (not tbuffs['Lightning']) },
                { name = "Plasma Arrow",                  use = (not pbuffs['Charged']) },
                }
            end

    -- Class: Scout/Warden
    -- DIYCE 2.1
            elseif mainClass == "RANGER" and subClass == "WARDEN" then

                local a1,a2,a3,a4,a5,ASon = GetActionInfo(22) -- Qbarslot for AutoShot
    
        --  Cancel Blood Arrows out of combat or at less than 40% health, without invoking the GCD.    
            if friendly or (not UnitExists("target")) or tdead or (phealth <= .40) and (pbuffs['Blood Arrow']) then 
                CancelBuff("Blood Arrow")
                return
            end

        -- Potions
            Skill = {
                { name = "Action: "..healthpot,        use = (phealth <= .50) },
                { name = "Action: "..manapot,          use = ((pctEB2 <= .50) and (phealth >= .50)) }, -- only mana pot if decent health

        -- Self Bufffs
                { name = "Frost Arrow",                use = (EnergyBar1 >= 20 and not pbuffs['Frost Arrow']) },
                { name = "Concentration",              use = (EnergyBar1 >= 20 and not pbuffs['Concentration']) },
                { name = "Briar Shield",              use = (not pbuffs['Briar Shield']) },
                }

            --  Use Throat Attack on detect enemy spell cast.
                if enemy then
                Skill2 = {
                { name = "Throat Attack",            use = (melee and (tspell ~= nil) and (ttime >= 1) and ((ttime - telapsed) > 0.5) and pctEB1 >= 15) },

        -- Combat
                { name = "Savage Power",               use = (combat and not pbuffs['Savage Power']) },
                { name = "Elven Amulet",               use = (combat and (not pbuffs['Elven Amulet'])) },
                { name = "Arrow of Essence",           use = (EnergyBar1 >= 20 and boss) },
                { name = "Target Area",                use = (combat and boss) },
            -- I only use Blood Arrow in partys.
                { name = "Blood Arrow",              use = (phealth >= .80 and party and combat and not pbuffs['Blood Arrow']) },

        -- Shots
                { name = "Shot",                    use = (combat) },
                { name = "Autoshot",                use = (not ASon and combat) },
                { name = "Hidden Peril",               use = (pbuffs[ 'Hidden'] and EnergyBar1 >= 35) }, -- Warden 25 Elite
                { name = "Snipe",                      use = (pbuffs[ 'Hidden Peril']) },
                { name = "Vampire Arrows",             use = (EnergyBar1 >= 50 and not tbuffs['Vampire Arrows']) },
                { name = "Piercing Arrow",             use = (true) },
                { name = "Wind Arrows",                use = (thealth >= .75 and EnergyBar1 >= 50) },
                { name = "Combo Shot",                use = (true) },
                { name = "Thorn Arrow",                use = (pbuffs['Briar Shield']) }, -- Warden 15 Elite
                { name = "Reflected Shot",             use = (true) },

            -- Wrist and Joint- only if focus is plentiful.  I dunno if Joint attack is even worthwhile- maybe for kiting?
                { name = "Wrist Attack",                  use = (not tbuffs['Wrist Attack'] and EnergyBar1 >= 50 and melee) },
                { name = "Joint Blow",                    use = (not tbuffs['Joint Blow'] and EnergyBar1 >= 50 and melee) },
                { name = "Power of the Wood Spirit",    use = (melee) },
                { name = "Gryphon Bash",                     use = (melee) },
                { name = "Charged Chop",                  use = (melee) },
                }
            end

    -- Class: Warden/Scout
    -- DIYCE 2.1
            elseif mainClass == "WARDEN" and subClass == "RANGER" then

                local PetExists = UnitExists("playerpet")
                local petname = UnitName("playerpet")
                local pethealth = PctH("playerpet")
                local petAttackActive = false
            
            if (PetExists and UnitExists("pettarget") and UnitCanAttack("player","pettarget") and combat) then
                petAttackActive = true
                return
            end

        --  Cancel Blood Arrows out of combat or at less than 40% health, without invoking the GCD.    
            if friendly or (not UnitExists("target")) or tdead or (phealth <= .40) and (pbuffs['Blood Arrow']) then 
                CancelBuff("Blood Arrow")
                return
            end

        -- Potions
            Skill = {
                { name = "Action: "..healthpot,           use = (phealth <= .60) },
                { name = "Action: "..manapot,             use = ((pctEB1 <= .50) and (phealth >= .40)) }, -- only mana pot if decent health
                { name = "Elven Prayer",                   use = ((pethealth <= .70) and PetExists) },


        -- Buffs
                { name = "Briar Shield",                  use = (not pbuffs['Briar Shield']) },
                { name = "Protection of Nature",         use = (not pbuffs['Protection of Nature']) },
        -- Pet
                { name = "Summon Spirit of the Oak",     use = ((not PetExists) and (not pbuffs['Heart of the Oak']) and (not combat)) },
                { name = "Summon Spirit of the Oak",     use = ((PetExists) and (not string.find(petname,"Spirit of the Oak")) and (not pbuffs['Heart of the Oak']) and (not combat)) } ,
            -- Cheaper to Recast weak pet than to heal        
                { name = "Summon Spirit of the Oak",     use = ((pethealth <= .25) and (PetExists) and (not pbuffs['Heart of the Oak'])) },
            -- Hold Shift to Absorb Spirit of the Oak to Tank 
                { name = "Heart of the Oak",             use = (IsShiftKeyDown() and (not combat) and (PetExists) and (string.find(petname,"Spirit of the Oak")) and (not pbuffs['Heart of the Oak'])) },
                }


        -- Combat
            if enemy then
            Skill2 = {
            -- the following is my pet's basic attack command, and it is listed first in order to use it as a combat opener and help ensure that the pet gets first aggro, making aggro management easier.
                { name = "Pet Skill: 3 (Pet Attack)",     use = ((not petAttackActive) and (not tdead) and PetExists) },
            -- Make sure pet is assisting me.
                { name = "Pet Skill: 3 (Pet Attack)",     use = ((petAttackActive) and (not UnitIsUnit( "playerpettarget", "playertarget" )) and PetExists) }, 
            --  Use Throat Attack on detect enemy spell cast.                
                { name = "Throat Attack",                use = (melee and (tspell ~= nil) and (ttime >= 1) and ((ttime - telapsed) > 0.5) and pctEB1 >= 15) },

                { name = "Damage Transfer",                use = (PetExists and combat and (pctEB1 <= .50) and (not pbuffs['Energy Absorb'])) },
                { name = "Energy Absorb",               use = (combat and (pctEB1 <= .50) and (not pbuffs['Energy Absorb'])) },
                { name = "Blood Arrow",                    use = ((phealth >= .80) and party and combat and (not pbuffs['Blood Arrow'])) },
                { name = "Savage Power",                   use = (combat and (not pbuffs['Savage Power'])) },
                { name = "Elven Amulet",                   use = (combat and (UnitIsUnit( "targettarget", "player" )) and (not pbuffs['Elven Amulet'])) },
                { name = "Vampire Arrows",                 use = ((EnergyBar2 >= 40) and (not tbuffs['Vampire Arrows'])) },
                { name = "Anti-Magic Arrow",             use = (true) },
                { name = "Shot",                         use = (combat) },
                { name = "Wrist Attack",                  use = ((melee) and (not tbuffs['Wrist Attack']) and (EnergyBar2 >= 50)) },
                { name = "Thorny Vines",                 use = ((pctEB1 >= .05) and melee and (not tbuffs['Thorny Vines'])) },
                { name = "Power of the Wood Spirit",     use = (melee) },
                { name = "Untamable",                     use = ((EnergyBar2 >= 60) and melee) },
                { name = "Cross Chop",                     use = (melee) },
                { name = "Charged Chop",                 use = (melee) },
                { name = "Frantic Briar",                 use = (melee) },
                }
            end
                
                
                
                
                
            --ADD MORE CLASS COMBOS HERE. 
            --ADD MORE CLASS COMBOS HERE. 
            --ADD MORE CLASS COMBOS HERE. 
            --ADD MORE CLASS COMBOS HERE. 
            --ADD MORE CLASS COMBOS HERE. 
            --ADD MORE CLASS COMBOS HERE. 
            --ADD MORE CLASS COMBOS HERE. 
            --ADD MORE CLASS COMBOS HERE. 
            --ADD MORE CLASS COMBOS HERE. 
            --ADD MORE CLASS COMBOS HERE. 
            --ADD MORE CLASS COMBOS HERE. 
            --USE AN "ELSEIF" TO CONTINUE WITH MORE CLASS COMBOS.
            --THE NEXT "END" STATEMENT IS THE END OF THE CLASS COMBOS STATEMENTS.
            --DO NOT POST BELOW THE FOLLOWING "END" STATEMENT!
            end
    --End Player Skill Sequences
    
    if (arg1=="debugskills") then        --Used for printing the skill table, and true/false usability
        DIYCE_DebugSkills(Skill)
        DIYCE_DebugSkills(Skill2)
    elseif (arg1=="debugpbuffs") then    --Used for printing your buff names, and buffID
        DIYCE_DebugBuffList(pbuffs)
    elseif (arg1=="debugtbuffs") then    --Used for printing target buff names, and buffID
        DIYCE_DebugBuffList(tbuffs)
    elseif (arg1=="debugall") then        --Used for printing all of the above at the same time
        DIYCE_DebugSkills(Skill)
        DIYCE_DebugSkills(Skill2)
        DIYCE_DebugBuffList(pbuffs)
        DIYCE_DebugBuffList(tbuffs)
    end
    
    if (not MyCombat(Skill, arg1)) then
        MyCombat(Skill2, arg1)
    end
        
    --Select Next Enemy
    if (tDead) then
        UseSkill(1,1) -- Loot Corpse
          TargetUnit("")
        return
    end
    if mainClass == "RANGER" and (not party) then        --To keep scouts from pulling mobs without meaning to.
        if (not LockedOn) or (not enemy) then
            TargetNearestEnemy()
            return
        end
    elseif mainClass ~= "RANGER" then                    --Let all other classes auto target.
        if (not LockedOn) or (not enemy) then
            TargetNearestEnemy()
            return
        end
    end
end

-- Custom Local Functions
-- DoTMaster Function adds target to focus and keeps spell refreshed.
-- usage /run DoTMaster("Spell Name")

function DoTMaster(spellname)

    local LockedOn = UnitExists("target")
    local tDead = UnitIsDeadOrGhost("target")
    local enemy = UnitCanAttack("player","target")
    local spell = UnitCastingTime("player")  -- Spell being cast?

    
    -- Stops if spell is mid cast
    if (spell ~= nil) then
        return
    end

--Check for level one mobs before doing combat
    if (LockedOn and (UnitLevel("target") < 2)) then
        TargetNearestEnemy()
        return
    end

    local function add_to_focus(thisunit)
        local onlist = false
        local freeslot = 0

        for i = 1,10 do
            if (not UnitExists("focus"..i)) and (freeslot == 0) then
                freeslot = i
            elseif UnitIsUnit(thisunit, "focus"..i) then
                return false
            end
        end

        if freeslot == 0 then
            Msg("All slots full, skipping "..thisunit)
            return false
        else
            FocusUnit(freeslot, thisunit)
        end
    end

    if enemy and not tDead and (UnitLevel("target") > 1) then
        if add_to_focus("target") then
            CastSpellByName(spellname)
            return true
        end
    end

    for i = 1,10 do
        if UnitIsDeadOrGhost("focus"..i) and (not UnitIsPlayer("focus"..i)) then
            FocusUnit(i, "")
        elseif UnitExists("focus"..i) and UnitCanAttack("player", "focus"..i)
        and (BuffTimeLeft("focus"..i, spellname) <= 2) then
            FocusUnit(11, "target")
            TargetUnit("focus"..i)
            CastSpellByName(spellname)
            TargetUnit("focus11")
            FocusUnit(11, "")
            return true
        end
    end
end

Source code

/run if not BuffParty(14) then if not PartyHealer.Main() then KillSequence("",11,12); end
/run if GetPlayerCombatState() then DoTMaster("Holy Light's Fury"); end  

Source code

 /run if not PriestFairySequence("v1") then if not BuffParty(14) then if not PartyHealer.Main() then KillSequence("v1",11,12); end end end
/run DoTMaster("Bone Chill") 

Source code

 /run if not BuffParty(14) then if not PartyHealer.Main() then KillSequence("v1",11,12); end end

Source code

local WHITE = "|cffffffff"
local SILVER = "|cffc0c0c0"
local GREEN = "|cff00ff00"
local LTBLUE = "|cffa0a0ff"

function DIYCE_DebugSkills(skillList)
    DEFAULT_CHAT_FRAME:AddMessage(GREEN.."Skill List:")
    
    for i,v in ipairs(skillList) do
        DEFAULT_CHAT_FRAME:AddMessage(SILVER.."  ['..WHITE..i..SILVER..']: "..LTBLUE..""..WHITE..v.name..LTBLUE..""  use = "..WHITE..(v.use and "true" or "false"))
    end

    DEFAULT_CHAT_FRAME:AddMessage(GREEN.."----------")
end

function DIYCE_DebugBuffList(buffList)
    DEFAULT_CHAT_FRAME:AddMessage(GREEN.."Buff List:")
    
    for k,v in pairs(buffList)
        -- We ignore numbered entries because both the ID and name 
        -- are stored in the list. This avoids doubling the output.
        if type(k) ~= "number" then
            DEFAULT_CHAT_FRAME:AddMessage(SILVER.."  ['..WHITE..k..SILVER..']:  "..LTBLUE.."id: "..WHITE..v.id..LTBLUE.."  stack: "..WHITE..v.stack..LTBLUE.."  time: "..WHITE..v.time)
        end
    end
    
    DEFAULT_CHAT_FRAME:AddMessage(GREEN.."----------")    
end