PQR - Rotation Bot

[WWF]

Looks like I found solution to my problem.
@vitalic The problem is not in calling functions.
I'm using: StopAttack(), StartAttack(), ClearTarget(), SpellStopCasting, GetSpellLink(), CastSpellByName(GetSpellInfo(), " "), etc...
and even Notify_Short(), etc... -- not a WoW API functions
right inside SlashCmd functions and it works without causing errors.
The problem in the method of code. For example

if table[i][j] = (table[i][j] == 1) and 0 or 1 

usually works fine, but when I used it in SlashCmd or in a function called by SlashCmd, then it caused errors.
After I replaced it with a

if table[i][j] == 1 then table[i][j] = 0 else table[i][j] = 1 end 

rotation has become to work without crashing!
Оne small function

SLASH_TOGGLEMYSPELL1 = "/togglemyspell"
SlashCmdList["TOGGLEMYSPELL"] = function(SpellName)
    for i, v in pairs(VFQ) do
        if VFQ[i][1] == SpellName then
            if VFQ[i][2] == 1 then VFQ[i][2] = 0 else VFQ[i][2] = 1 end
            print(string.format("%s has been %s the rotation.", GetSpellLink(SpellName), VFQ[i][2] == 1 and "|cff00ff00included|r in" or "|cffff0000excluded|r from"))            
        end
    end
end 

for any number of spells!

[ZidaneT]

Hey guys... Not to be that guy or anything, but why don't we all just put people on ignore and be happy lil campers again. coders gonna code, haters gonna hate.

[paintpauller]

Hey Guys, is it possible to count through a enemy Team in a BG environment? Just Like arenaN something like bgteamN !?

Best regards
Mr.

yes it is, tho its a bit more complicated then just bgteamN unforchantly. developed this back when people were wanting a BG interrupt. dont have time to explain much but basically it will do its best to keep your focus on a enemy BG player who is in interrupt range. before you ask i dont remember why its not in a loop but i do know that there was a reason and thats why i manually step every time, also UnitFactionGroup("player") was returning doubles so thats why that is there. you should be able to adopt this for your needs so here is the interrupt ability as a whole.

if you have any questions just let me know and when i get more time i can help you out.

if AlphaInterrupt_stop()
or not AlphaInterrupt_AlphaBattleGroundInterrupt_enable
or UnitIsDeadOrGhost("player")
or ((GetBattlefieldInstanceRunTime()/1000) < 120)
or not PQR_SpellAvailable(PQR_InterruptSpell())
or IsActiveBattlefieldArena() == 1
then return false end


local name, realm = UnitName("target")
if realm == nil then
    if name == nil then
        lasttargetname = nil
    else lasttargetname = name end
else
    lasttargetname = name.."-"..realm
end


if AlphaInterrupt_targetProtect == nil then AlphaInterrupt_targetProtect = 0 end
if AlphaInterrupt_targetProtect < GetTime() then
    AlphaInterrupt_targetProtect = GetTime() + 1
    
    RequestBattlefieldScoreData()
    if BGnum == nil then BGnum = 0 end
    if BGnum >= GetNumBattlefieldScores() then BGnum = 0 end
    BGnum = BGnum + 1
    local BG_PlayerInfo, _, _, _, _, BG_PlayerFaction = GetBattlefieldScore(BGnum)
    local BG_PlayerName, BG_PlayerServer = strsplit("-", BG_PlayerInfo)


    if     UnitFactionGroup("player") == "Horde"             then CheckMyFaction = 0
    elseif UnitFactionGroup("player") == "Horde Horde"         then CheckMyFaction = 0
    elseif UnitFactionGroup("player") == "Alliance"             then CheckMyFaction = 1
    elseif UnitFactionGroup("player") == "Alliance Alliance" then CheckMyFaction = 1 end


    if CheckMyFaction == BG_PlayerFaction then
        --They are on my team dont need to focus
        AlphaInterrupt_targetProtect = GetTime() - 0.2
        return false
    end
    if UnitName("target") == BG_PlayerInfo then
        AlphaInterrupt_targetProtect = GetTime() - 0.2
        return false
    end
    if BG_PlayerInfo ~= nil then
        RunMacroText("/targetexact "..BG_PlayerInfo)
        RunMacroText("/focus [@target, exists]")
        if lasttargetname == nil then
            ClearTarget() 
        else
            RunMacroText("/targetexact "..lasttargetname)
        end
    end
    if UnitFactionGroup("player") == UnitFactionGroup("focus") then
        --They are on my team need to re focus (should not happen)
        AlphaInterrupt_targetProtect = GetTime() - 2
        return false
    end
    if IsSpellInRange(GetSpellInfo(PQR_InterruptSpell()), "focus") ~= 1 then
        AlphaInterrupt_targetProtect = GetTime() - 2
        return false
    end
    if UnitName("target") == UnitName("focus") then
        AlphaInterrupt_targetProtect = GetTime() - 2
        return false
    end
end


local customTarget = "focus"
local castName, _, _, _, castStartTime, castEndTime, _, _, castInterruptable = UnitCastingInfo(customTarget)
local channelName, _, _, _, channelStartTime, channelEndTime, _, channelInterruptable = UnitChannelInfo(customTarget)
local divineshield = UnitBuffID(customTarget,642)
local Inner_Focus = UnitBuffID(customTarget,89485)


if channelName ~= nil then
    --target is channeling a spell that is interruptable
    --load the channel variables into the cast variables to make logic a little easier.
    castName = channelName
    castStartTime = channelStartTime
    castEndTime = channelEndTime
    castInterruptable = channelInterruptable
end




--This is actually "Not Interruptable"... so lets swap it around to use in the positive.
if castInterruptable == false then
    castInterruptable = true
else
    castInterruptable = false
end


--we can't attack the target.
if UnitCanAttack("player", customTarget) == nil then
    return false
end
    
--we can't Interrupt when target has immunity.
if divineshield or Inner_Focus then
    AlphaInterrupt_targetProtect = GetTime() + 0.2
    return false
end
    
if castInterruptable then
    --target is casting something that is interruptable.
    --the following 2 variables are named logically... value is in seconds.
    local timeSinceStart = (GetTime() * 1000 - castStartTime) / 1000
    local timeLeft = ((GetTime() * 1000 - castEndTime) * -1) / 1000
    local castTime = castEndTime - castStartTime
    local currentPercent = timeSinceStart / castTime * 100000
    
    AlphaInterrupt_targetProtect = GetTime() + 0.5
    
    --make sure the interrupt spell is available
    local interruptSpell = PQR_InterruptSpell()
    if interruptSpell ~= 0 then
        local interruptName = GetSpellInfo(interruptSpell)
        if not PQR_SpellAvailable(interruptSpell) or IsSpellInRange(interruptName, customTarget) ~= 1 or SpellIsTargeting() then
            return false
        end
    else
        return false
    end    
    
    --Ignore spells on Ignore list
    if AlphaInterrupt_Ignorelist_enable then
        Alpha_Deserialize(AlphaInterrupt_Ignorelist, "Ignore")
        local unitname = GetUnitName(customTarget)
        local Interruptspellname = GetSpellInfo(PQR_InterruptSpell())
        for i = 1, #toIgnore do
            if type(toIgnore[i]) == "string" then
                if toIgnore[i] == castName then
                    PQR_Event("PQR_Text", "Ignoring - "..unitname..": "..castName, 20, "DC143C")
                    return false
                end
            elseif type(toIgnore[i]) == "number" then
                if (GetSpellInfo(toIgnore[i])) == castName then
                    PQR_Event("PQR_Text", "Ignoring - "..unitname..": "..castName, 20, "DC143C")
                    return false
                end
            end        
        end
    end
    
    --should we use InstantInterrupt delays or normal?
    if AlphaInterrupt_InstantInterruptlist_enable then
        Alpha_Deserialize(AlphaInterrupt_Instantlist, "Instant Interrupt")
        local OnInstantlist = false
        for i = 1, #toInstantInterrupt do
            if type(toInstantInterrupt[i]) == "string" then
                if toInstantInterrupt[i] == castName then OnInstantlist = true end
            elseif type(toInstantInterrupt[i]) == "number" then
                if (GetSpellInfo(toInstantInterrupt[i]))== castName then OnInstantlist = true end
        end    end
        if OnInstantlist then
            if timeSinceStart - AlphaInterrupt_Instant_InterruptDelay < 0 then return false end
            if currentPercent < AlphaInterrupt_Instant_InterruptPercent then return false end        
        else
            --interrupt percentage check
            if AlphaInterrupt_Protect1 == nil then AlphaInterrupt_Protect1 = 0 end
            if AlphaInterrupt_Protect1 < GetTime() then
                AlphaInterrupt_Protect1 = GetTime() + 1.5
                PQR_InterruptPercent = randompercentage()
            end
            if currentPercent < PQR_InterruptPercent then
                return false
            end
        
            --minimum interrupt time
            if AlphaInterrupt_Protect2 == nil then AlphaInterrupt_Protect2 = 0 end
            if AlphaInterrupt_Protect2 < GetTime() then
                AlphaInterrupt_Protect2 = GetTime() + 1.5
                PQR_InterruptDelay = randomdelay()
            end
            if timeSinceStart - PQR_InterruptDelay < 0 then
                return false
            end
        end    
    else
        --interrupt percentage check
        if AlphaInterrupt_Protect1 == nil then AlphaInterrupt_Protect1 = 0 end
        if AlphaInterrupt_Protect1 < GetTime() then
            AlphaInterrupt_Protect1 = GetTime() + 1.5
            PQR_InterruptPercent = randompercentage()
        end
        if currentPercent < PQR_InterruptPercent then
            return false
        end
    
        --minimum interrupt time
        if AlphaInterrupt_Protect2 == nil then AlphaInterrupt_Protect2 = 0 end
        if AlphaInterrupt_Protect2 < GetTime() then
            AlphaInterrupt_Protect2 = GetTime() + 1.5
            PQR_InterruptDelay = randomdelay()
        end
        if timeSinceStart - PQR_InterruptDelay < 0 then
            return false
        end
    end


    --Finally, make sure the spell they are casting is on the interrupt list or interrupt all is checked
    if PQR_IsOnInterruptList(castName) or PQR_IsInterruptAll() then
        --Nerder's DK priority
        if UnitClass("player") == "DEATHKNIGHT" then
            local name, _, _, count = UnitBuffID("player",114851)
            
            if PQR_InterruptSpell() ~= 47528 then
                 for i = 1, 2 do
                     local RuneCDstart, RuneCDduration = GetRuneCooldown(i)
                    if GetRuneType(i) == 1
                    and ( RuneCDstart + RuneCDduration - GetTime() > 0 ) then
                        if (name ~= nil and count >= 5) then
                            local unitname = GetUnitName(customTarget)
                            local Interruptspellname = GetSpellInfo(PQR_InterruptSpell())
                            PQR_Event("PQR_Text", "Interrupted - "..unitname..": "..castName.." - With: "..Interruptspellname.." - Used: "..GetSpellInfo(45529), 20, "DC143C")                        
                            CastSpellByName(GetSpellInfo(45529), "player")
                            CastSpellByID(interruptSpell, customTarget)
                            return true
                        end
                    else
                        return false
                    end
                end
            elseif PQR_InterruptSpell() == 47528 then
                local unitname = GetUnitName(customTarget)
                local Interruptspellname = GetSpellInfo(PQR_InterruptSpell())
                PQR_Event("PQR_Text", "Interrupted - "..unitname..": "..castName.." - With: "..Interruptspellname, 20, "DC143C")
                CastSpellID(interruptSpell, customTarget)
                return true
            end
        else
            local unitname = GetUnitName(customTarget)
            local Interruptspellname = GetSpellInfo(PQR_InterruptSpell())
            PQR_Event("PQR_Text", "Interrupted - "..unitname..": "..castName.." - With: "..Interruptspellname, 20, "DC143C")
            PQR_Debug("Casting interrupt on "..customTarget)
            CastSpellByID(interruptSpell, customTarget)
            return true
        end
    end
    
end 

[Ninjaderp]

Yeah indeed, when I wake up tomorrow Im gonna check this thread for that video ^^

[Vinshom]

Yeah indeed, when I wake up tomorrow Im gonna check this thread for that video ^^

I wont even brush my teeth before I see the video.

[sparkyiezz]

How many cores should I run pqr on? I have 4, no mattere what profile I run for somereason I dont loose much FPS but what happens is it makes the game much more unsmooth its like not laggy but un-smooth

[Sivers]

Just wondering for people on PTR, has anyone had issues getting the 32bit client to start? I changed the options in the launcher, I launch the WoW.exe (instead of WoW-64.exe) in the directory, but whenever the game loads, it's always the 64-bit client instead of the 32-bit client. No idea how that happened as I just installed the PTR now. Can't seem to force the 32-bit client to launch no matter what I do

[cokx]

rename your wow-64.exe to anything else and it will work

[MrHeroe]

yes it is, tho its a bit more complicated then just bgteamN unforchantly. developed this back when people were wanting a BG interrupt. dont have time to explain much but basically it will do its best to keep your focus on a enemy BG player who is in interrupt range. before you ask i dont remember why its not in a loop but i do know that there was a reason and thats why i manually step every time, also UnitFactionGroup("player") was returning doubles so thats why that is there. you should be able to adopt this for your needs so here is the interrupt ability as a whole.

if you have any questions just let me know and when i get more time i can help you out.

if AlphaInterrupt_stop()
or not AlphaInterrupt_AlphaBattleGroundInterrupt_enable
or UnitIsDeadOrGhost("player")
or ((GetBattlefieldInstanceRunTime()/1000) < 120)
or not PQR_SpellAvailable(PQR_InterruptSpell())
or IsActiveBattlefieldArena() == 1
then return false end


local name, realm = UnitName("target")
if realm == nil then
    if name == nil then
        lasttargetname = nil
    else lasttargetname = name end
else
    lasttargetname = name.."-"..realm
end


if AlphaInterrupt_targetProtect == nil then AlphaInterrupt_targetProtect = 0 end
if AlphaInterrupt_targetProtect < GetTime() then
    AlphaInterrupt_targetProtect = GetTime() + 1
    
    RequestBattlefieldScoreData()
    if BGnum == nil then BGnum = 0 end
    if BGnum >= GetNumBattlefieldScores() then BGnum = 0 end
    BGnum = BGnum + 1
    local BG_PlayerInfo, _, _, _, _, BG_PlayerFaction = GetBattlefieldScore(BGnum)
    local BG_PlayerName, BG_PlayerServer = strsplit("-", BG_PlayerInfo)


    if     UnitFactionGroup("player") == "Horde"             then CheckMyFaction = 0
    elseif UnitFactionGroup("player") == "Horde Horde"         then CheckMyFaction = 0
    elseif UnitFactionGroup("player") == "Alliance"             then CheckMyFaction = 1
    elseif UnitFactionGroup("player") == "Alliance Alliance" then CheckMyFaction = 1 end


    if CheckMyFaction == BG_PlayerFaction then
        --They are on my team dont need to focus
        AlphaInterrupt_targetProtect = GetTime() - 0.2
        return false
    end
    if UnitName("target") == BG_PlayerInfo then
        AlphaInterrupt_targetProtect = GetTime() - 0.2
        return false
    end
    if BG_PlayerInfo ~= nil then
        RunMacroText("/targetexact "..BG_PlayerInfo)
        RunMacroText("/focus [@target, exists]")
        if lasttargetname == nil then
            ClearTarget() 
        else
            RunMacroText("/targetexact "..lasttargetname)
        end
    end
    if UnitFactionGroup("player") == UnitFactionGroup("focus") then
        --They are on my team need to re focus (should not happen)
        AlphaInterrupt_targetProtect = GetTime() - 2
        return false
    end
    if IsSpellInRange(GetSpellInfo(PQR_InterruptSpell()), "focus") ~= 1 then
        AlphaInterrupt_targetProtect = GetTime() - 2
        return false
    end
    if UnitName("target") == UnitName("focus") then
        AlphaInterrupt_targetProtect = GetTime() - 2
        return false
    end
end


local customTarget = "focus"
local castName, _, _, _, castStartTime, castEndTime, _, _, castInterruptable = UnitCastingInfo(customTarget)
local channelName, _, _, _, channelStartTime, channelEndTime, _, channelInterruptable = UnitChannelInfo(customTarget)
local divineshield = UnitBuffID(customTarget,642)
local Inner_Focus = UnitBuffID(customTarget,89485)


if channelName ~= nil then
    --target is channeling a spell that is interruptable
    --load the channel variables into the cast variables to make logic a little easier.
    castName = channelName
    castStartTime = channelStartTime
    castEndTime = channelEndTime
    castInterruptable = channelInterruptable
end




--This is actually "Not Interruptable"... so lets swap it around to use in the positive.
if castInterruptable == false then
    castInterruptable = true
else
    castInterruptable = false
end


--we can't attack the target.
if UnitCanAttack("player", customTarget) == nil then
    return false
end
    
--we can't Interrupt when target has immunity.
if divineshield or Inner_Focus then
    AlphaInterrupt_targetProtect = GetTime() + 0.2
    return false
end
    
if castInterruptable then
    --target is casting something that is interruptable.
    --the following 2 variables are named logically... value is in seconds.
    local timeSinceStart = (GetTime() * 1000 - castStartTime) / 1000
    local timeLeft = ((GetTime() * 1000 - castEndTime) * -1) / 1000
    local castTime = castEndTime - castStartTime
    local currentPercent = timeSinceStart / castTime * 100000
    
    AlphaInterrupt_targetProtect = GetTime() + 0.5
    
    --make sure the interrupt spell is available
    local interruptSpell = PQR_InterruptSpell()
    if interruptSpell ~= 0 then
        local interruptName = GetSpellInfo(interruptSpell)
        if not PQR_SpellAvailable(interruptSpell) or IsSpellInRange(interruptName, customTarget) ~= 1 or SpellIsTargeting() then
            return false
        end
    else
        return false
    end    
    
    --Ignore spells on Ignore list
    if AlphaInterrupt_Ignorelist_enable then
        Alpha_Deserialize(AlphaInterrupt_Ignorelist, "Ignore")
        local unitname = GetUnitName(customTarget)
        local Interruptspellname = GetSpellInfo(PQR_InterruptSpell())
        for i = 1, #toIgnore do
            if type(toIgnore[i]) == "string" then
                if toIgnore[i] == castName then
                    PQR_Event("PQR_Text", "Ignoring - "..unitname..": "..castName, 20, "DC143C")
                    return false
                end
            elseif type(toIgnore[i]) == "number" then
                if (GetSpellInfo(toIgnore[i])) == castName then
                    PQR_Event("PQR_Text", "Ignoring - "..unitname..": "..castName, 20, "DC143C")
                    return false
                end
            end        
        end
    end
    
    --should we use InstantInterrupt delays or normal?
    if AlphaInterrupt_InstantInterruptlist_enable then
        Alpha_Deserialize(AlphaInterrupt_Instantlist, "Instant Interrupt")
        local OnInstantlist = false
        for i = 1, #toInstantInterrupt do
            if type(toInstantInterrupt[i]) == "string" then
                if toInstantInterrupt[i] == castName then OnInstantlist = true end
            elseif type(toInstantInterrupt[i]) == "number" then
                if (GetSpellInfo(toInstantInterrupt[i]))== castName then OnInstantlist = true end
        end    end
        if OnInstantlist then
            if timeSinceStart - AlphaInterrupt_Instant_InterruptDelay < 0 then return false end
            if currentPercent < AlphaInterrupt_Instant_InterruptPercent then return false end        
        else
            --interrupt percentage check
            if AlphaInterrupt_Protect1 == nil then AlphaInterrupt_Protect1 = 0 end
            if AlphaInterrupt_Protect1 < GetTime() then
                AlphaInterrupt_Protect1 = GetTime() + 1.5
                PQR_InterruptPercent = randompercentage()
            end
            if currentPercent < PQR_InterruptPercent then
                return false
            end
        
            --minimum interrupt time
            if AlphaInterrupt_Protect2 == nil then AlphaInterrupt_Protect2 = 0 end
            if AlphaInterrupt_Protect2 < GetTime() then
                AlphaInterrupt_Protect2 = GetTime() + 1.5
                PQR_InterruptDelay = randomdelay()
            end
            if timeSinceStart - PQR_InterruptDelay < 0 then
                return false
            end
        end    
    else
        --interrupt percentage check
        if AlphaInterrupt_Protect1 == nil then AlphaInterrupt_Protect1 = 0 end
        if AlphaInterrupt_Protect1 < GetTime() then
            AlphaInterrupt_Protect1 = GetTime() + 1.5
            PQR_InterruptPercent = randompercentage()
        end
        if currentPercent < PQR_InterruptPercent then
            return false
        end
    
        --minimum interrupt time
        if AlphaInterrupt_Protect2 == nil then AlphaInterrupt_Protect2 = 0 end
        if AlphaInterrupt_Protect2 < GetTime() then
            AlphaInterrupt_Protect2 = GetTime() + 1.5
            PQR_InterruptDelay = randomdelay()
        end
        if timeSinceStart - PQR_InterruptDelay < 0 then
            return false
        end
    end


    --Finally, make sure the spell they are casting is on the interrupt list or interrupt all is checked
    if PQR_IsOnInterruptList(castName) or PQR_IsInterruptAll() then
        --Nerder's DK priority
        if UnitClass("player") == "DEATHKNIGHT" then
            local name, _, _, count = UnitBuffID("player",114851)
            
            if PQR_InterruptSpell() ~= 47528 then
                 for i = 1, 2 do
                     local RuneCDstart, RuneCDduration = GetRuneCooldown(i)
                    if GetRuneType(i) == 1
                    and ( RuneCDstart + RuneCDduration - GetTime() > 0 ) then
                        if (name ~= nil and count >= 5) then
                            local unitname = GetUnitName(customTarget)
                            local Interruptspellname = GetSpellInfo(PQR_InterruptSpell())
                            PQR_Event("PQR_Text", "Interrupted - "..unitname..": "..castName.." - With: "..Interruptspellname.." - Used: "..GetSpellInfo(45529), 20, "DC143C")                        
                            CastSpellByName(GetSpellInfo(45529), "player")
                            CastSpellByID(interruptSpell, customTarget)
                            return true
                        end
                    else
                        return false
                    end
                end
            elseif PQR_InterruptSpell() == 47528 then
                local unitname = GetUnitName(customTarget)
                local Interruptspellname = GetSpellInfo(PQR_InterruptSpell())
                PQR_Event("PQR_Text", "Interrupted - "..unitname..": "..castName.." - With: "..Interruptspellname, 20, "DC143C")
                CastSpellID(interruptSpell, customTarget)
                return true
            end
        else
            local unitname = GetUnitName(customTarget)
            local Interruptspellname = GetSpellInfo(PQR_InterruptSpell())
            PQR_Event("PQR_Text", "Interrupted - "..unitname..": "..castName.." - With: "..Interruptspellname, 20, "DC143C")
            PQR_Debug("Casting interrupt on "..customTarget)
            CastSpellByID(interruptSpell, customTarget)
            return true
        end
    end
    
end 

Thank you so much =) +rep

[Mavmins]

does no one else remember failroad ?? its the same guy again trolling and moaning about PQR ! either that or his twin brother, always saying he has something WAY better and never letting anyone else use it

[crystal_tech]

How many cores should I run pqr on? I have 4, no mattere what profile I run for somereason I dont loose much FPS but what happens is it makes the game much more unsmooth its like not laggy but un-smooth

whos profile are you using?

also Ment brought up this up, If your using PQR_UnitDistance(), or the one to if behind or facing try adding a global PQR_UnitInfo("player") and PQR_UnitInfo("target") and see if that helps with the laggeness.

[vitalic]

whos profile are you using?

also Ment brought up this up, If your using PQR_UnitDistance(), or the one to if behind or facing try adding a global PQR_UnitInfo("player") and PQR_UnitInfo("target") and see if that helps with the laggeness.

How would that help exactly?

[sparkyiezz]

whos profile are you using?

also Ment brought up this up, If your using PQR_UnitDistance(), or the one to if behind or facing try adding a global PQR_UnitInfo("player") and PQR_UnitInfo("target") and see if that helps with the laggeness.

using cokx profile, he told me to change some numbers and its more stable now xD

[Kinky]

@vitalic: It calls the player tracker that Xelper uses for those functions, like current coordinates and more. Without it, you'll get errors in form of "Action blocked by Blizzard" through the interface resulting in the Lua being disabled (fixed with a restart) or in a worst case scenario, a lagging profile. I'd find the documentation on it, but I'm not home right now.

Sent from my HTC One using Tapatalk 4

[vitalic]

@vitalic: It calls the player tracker that Xelper uses for those functions, like current coordinates and more. Without it, you'll get errors in form of "Action blocked by Blizzard" through the interface resulting in the Lua being disabled (fixed with a restart) or in a worst case scenario, a lagging profile. I'd find the documentation on it, but I'm not home right now.

Sent from my HTC One using Tapatalk 4

I'll try that out, sometimes I feel like I start to lag after a while with PQR_UnitFacing() calls, I try to mitigate it as much as possible by making it the very last check or providing an option to bypass it completely, but it would be good to have that fixed.