Ah, so it was the patch that caused everything to disconnect. Ha, thanks for the update guys!
For those who's PQR isn't working, what is this returning?
Code:/dump GetBuildInfo()Code:[1]="5.2.0", [2]="16650", [3]="Feb 26 2013", [4]=50200
Do or Die
[PQR] Monk Mistweaver
Getting this
Code:Dump: value=GetBuildInfo() [1]="5.2.0", [2]="16669", [3]="Mar 6 2013", [4]=50200
Weird, I am still in game, better not get offline. Hopefully they don't restart the servers.
Do or Die
[PQR] Monk Mistweaver
A wild patch appears!
Ill get an updated offset out soon.
Sent from my iPhone using Tapatalk
This express patch its probably to fix the pet battles xp exploit
Thank you! This is the very first time I have ever (since I started using Pqr, and man its been a while now) went to log in and Pqr not work. I mean thats since the beginning of Cata, lol. Mad love Xelper and +rep again with that legendary ass.
Repost from 555
Xelper, did you add a function to place aoe on targets? I don't remember.
need ids from people for snares/roots for hof and cleanse for ret/prot/holy soon.
Will rep+
edit: Why won't this work? Seems correct to me.
PHP Code:
if GetShapeshiftForm() ~= 0 then hasSeal = true else hasSeal = false end
local PQ_MarkTimer = 16
local PQ_JudTarget = "target"
local PQ_JeopardyTargets = {
[1] = "mouseover",
[2] = "focus",
}
if UnitExists("target") then
if UnitDebuffID("target",31801,"player") then
PQ_MarkTimer = select(7,UnitDebuffID("target",31801,"player")) - GetTime()
end
end
if hasSeal and UnitPower("player", 9) < 5 then
for i=1,#PQ_JeopardyTargets do
if UnitExists(PQ_JeopardyTargets[i]) and not UnitGUID(PQ_JeopardyTargets[i]) == PQ_LastJudGUID then
if UnitDebuffID(PQ_JeopardyTargets[i],31801,"player") then
local timer = select(7,UnitDebuffID(PQ_JeopardyTargets[i],31801,"player")) - GetTime()
if timer < PQ_MarkTimer then
PQ_MarkTimer = timer
PQ_JudTarget = PQ_JeopardyTargets[i]
end
else
PQ_MarkTimer = 0
PQ_JudTarget = PQ_JeopardyTargets[i]
break
end
end
end
PQR_CustomTarget = PQ_JudTarget
return true
end
still online, no problems for me. using pqr still, can relog and everything.PHP Code:
-- Frames
PQ_EventHandlerFrame, events = CreateFrame("Frame"), {};
function events:COMBAT_LOG_EVENT_UNFILTERED(...)
if (select(2, ...) == "SPELL_DAMAGE") and bit.band(select(6, ...), COMBATLOG_OBJECT_AFFILIATION_MASK) == COMBATLOG_OBJECT_AFFILIATION_MINE and bit.band(select(10, ...), COMBATLOG_OBJECT_AFFILIATION_MASK) == COMBATLOG_OBJECT_AFFILIATION_OUTSIDER then
if select(12, ...) == 20271 then
PQ_LastJudGUID = select(8, ...)
end
end
end
PQ_EventHandlerFrame:SetScript("OnEvent", function(self, event, ...) events[event](self, ...); end);
for k, v in pairs(events) do
PQ_EventHandlerFrame:RegisterEvent(k);
end
Last edited by averykey; 03-08-2013 at 02:56 PM.
My Svn - https://subversion.assembla.com/svn/averykeys-svn/
Yes it was a patch to fix the pet battles xp exploit, unfortunately it broke a lot of things. I didn't even have to relog, it booted me from game and showed every server unavailable. Odd. Anyway, ty for working on the update and good luck!
Avey you can add this to your ret/prot profile for dispells.
Code:function ValidDispel(t) local HasValidDispel = false local i = 1 local debuff = UnitDebuff(t, i) while debuff do local debuffType = select(5, UnitDebuff(t, i)) if debuffType == "Poison" or debuffType == "Disease" then HasValidDispel = true end i = i + 1 debuff = UnitDebuff(t, i) end return HasValidDispel endCode:if ValidDispel("player") then CastSpellByName(GetSpellInfo(4987), "player") end if ValidDispel("party1") and PQR_IsOutOfSight("party1") == false and IsSpellInRange("Cleanse", "party1") == 1 and not UnitIsEnemy("party1", "player") then CastSpellByName(GetSpellInfo(4987), "party1") end if ValidDispel("party2") and PQR_IsOutOfSight("party2") == false and IsSpellInRange("Cleanse", "party2") == 1 and not UnitIsEnemy("party2", "player") then CastSpellByName(GetSpellInfo(4987), "party2") end if ValidDispel("party3") and PQR_IsOutOfSight("party3") == false and IsSpellInRange("Cleanse", "party3") == 1 and not UnitIsEnemy("party3", "player") then CastSpellByName(GetSpellInfo(4987), "party3") end if ValidDispel("party4") and PQR_IsOutOfSight("party4") == false and IsSpellInRange("Cleanse", "party4") == 1 and not UnitIsEnemy("party4", "player") then CastSpellByName(GetSpellInfo(4987), "party4") end if ValidDispel("party5") and PQR_IsOutOfSight("party5") == false and IsSpellInRange("Cleanse", "party5") == 1 and not UnitIsEnemy("party5", "player") then CastSpellByName(GetSpellInfo(4987), "party5") end
Its what i added to my personal edit of your profile for the 2nd boss in throne of thunder.
Last edited by cpowroks; 03-08-2013 at 03:03 PM.
WoW LUA Script Developer
Need Something Custom? WarmaneScripts.com
Skype - grapejuice111