Runes of Magic US / AU

Source code

[string '?']:23: attempt to concatenate field 'time' (a nil value)

Source code

            -- Ad to list by name
            list[buff:gsub('(%()(.)(%))', '%2')] = { stack = stackSize, time = timeRemaining or 0, id = ID }
            -- We also list by ID in case two different buffs/debuffs have the same name.
            list[ID] = {stack = stackSize, time = timeRemaining or 0, name = buff:gsub("(%()(.)(%))", "%2") }

Source code

 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

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 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 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
        
    if (LockedOn and (UnitLevel("target") < 2)) then
        TargetUnit("")
        TargetNearestEnemy()
        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 == "THIEF" then
                local SurpriseAttack = GetActionUsable(14)
    
            --Potions and Buffs
            Skill = {
                { name = "Action: "..healthpot,            use = (phealth <= .70) },
                { name = "Survival Instinct",              use = (phealth <= .40) and combat },
                { name = "Action: "..manapot,              use = (pctEB2 <= .40) },
                    }
                    
            --Combat
                if enemy then
                Skill2 = {
                    { name = "Enraged",                    use = (EnergyBar1 <= 30) and (boss or elite) },
                    { name = "Slash",                      use = ( not tbuffs[500081]) and(EnergyBar1 >= 25) },
                    { name = "Probing Attack",             use = ( not tbuffs[501502]) and (EnergyBar1 >= 20)  },
                    { name = "Open Flank",                 use = ( tbuffs[501502])  and (not tbuffs[503161]) and(EnergyBar1 >= 10) },
                    { name = "Keen Attack",                use = ( tbuffs[501502]) and(EnergyBar2 >= 20) },
                    { name = "Splitting Chop",             use = ( tbuffs[501503])  and (EnergyBar1 >= 15)  },
                    { name = "Tactical Attack",            use = ( tbuffs[500081]) and (EnergyBar1 >= 15) },
                    { name = "Blood Dance",                use = (phealth >= .70) and combat },
                    { name = "Shadowstab",                 use = (EnergyBar2 >= 20) },
                    { name = "Attack",                     use = (thealth == 1) },
                        }
                end

        --Class: Knight/Scout
            elseif mainClass == "KNIGHT" and subClass == "RANGER" then
            
            --Potions and Buffs
            Skill = {
                { name = "Action: "..healthpot,           use = (phealth <= .70) },
                { name = "Action: "..manapot,             use = (pctEB2 <= .40) },
                { name = "Resolution",                    use = (phealth <= .30) and combat },
                    }
            
            --Combat
                if enemy then
                Skill2 = {
                --  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 = "Schock",                       use = (silenceThis) },
                    { 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 = "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 = "Charge",                       use = (combat and (tspell ~= nil)) or (not melee and not tbuffs['Charge']) }, -- charge spellcasters
                    { name = "Whirlwind Shield",             use = (CD("Whirlwind Shield") and (EnergyBar1 >= 189)) },            
                    { name = "Holy Strike",                  use = (EnergyBar1 >= 145 ) and not tbuffs['Light Seal III'] },
                        }
            --Combat & arrow
                if enemy and (mode == "arrow") then 
                Skill2 = {
                    { name = "Vampire Arrows",             use = (CD("Vampire Arrows")) }, 
                    { name = "Sacred Resistance",          use = (CD("Sacred Resistance")) },
                    { name = "Shot",                       use = (CD("Shot")) },
                         }    
                end
                
            --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 (not MyCombat(Skill, arg1)) then
        MyCombat(Skill2, arg1)
    end
        
    --Select Next Enemy
    if (tDead) then
        TargetUnit("")
        TargetNearestEnemy()
        return
    elseif (not LockedOn) or (not enemy) then
        TargetNearestEnemy()
        return
    end
    
end