[BETA] PQRotation - an automated ability priority queue.

[Meatglue]

I am looking forward to the retun of zenmex, he commented saying he would be releasing some pvp profiles when he popped in but haven't heard from him since. There are some coders like Sheuron and Cokx that still code for pvp just be patient and see what they release is my suggestion. There will be anti-pvp people but Xelper has been helping me code for pvp since he shared this with me privately so don't worry about them.

[bu_ba_911]

Can I pay money to him to make it do that? I a whole arena profile with similar abilities and fake casting etc i would pay a substantial amount for.

Lol for money I'd code that its not as difficult as you'd think it is in regards to arena lol

Sent from my Thunderbolt through the ether.

[brusterj88]

lets do this, how long would it take, and how much do you want?

[imdasandman]

It's a total crap shoot whether it will work on not. Holding down the button only casts it once and then it doesn't cast again. You have to spam ctrl and hope that it doesn't have a temper and will cast. Yes, the same problem happens when there's no other actions in the priority list.

it works just fine for me... You need to hold the button down and it will fire off once the correct runes are lined up and it is off CD and it will drop it at mouseover location.

Some ui's you need to disable the nameplates over enemies heads to make this work... To do that press the "V" key ingame

[bu_ba_911]

lets do this, how long would it take, and how much do you want?

lol send u a message was joking about money tho hahahaha

its way to simple of a code to charge for

[Kaolla]

I have a feeling he was referring to the dedicated arena profile, Bubba

[brusterj88]

just the intreput thing would be nice but a whole arena set would beastmode and i would pay a lot for it.

[brusterj88]

yes i would like the interrupt code, however I would pay whatever programming rates go for these days to write an arena warlock profile so i can hit 2400ish, im a combat ptsd veteran heavily medicated and i cant react faster than these young kids...

[bu_ba_911]

haha dedicated arena..... hmm that would be a lot of effort..... dunno if i have the time for another profile to start writing right now XD but ill do interrupt rq.... which interrupt are we talking about using tho? Fel Hound?

[brusterj88]

fel hound yes

[bu_ba_911]

fel hound yes

your inbox/sent box be full

[bu_ba_911]

local InterruptSpells = { 635, 47540, 19750, 82326, 51505, 62809, 331, 77472, 48500, 8936, 5782 }

if select(2, GetSpellCooldown(19647, "BOOKTYPE_PET")) == 0 and UnitExists("pet") and IsSpellKnown(19647, true) == true then
	for y=1, 5 do
		local aTarget = "arena"..tostring(y)
		if UnitExists(aTarget) and IsSpellInRange(tostring(GetSpellInfo(19647)), aTarget) == 1 then
			local spellName, _, _, _, _, endCast, _, _, canInterrupt = UnitCastingInfo(aTarget)
			for i, v in ipairs(InterruptSpells) do
				if GetSpellInfo(v) == spellName and canInterrupt == 1 then
					if (endCast/1000) - GetTime() < 0.5 then
						PQR_CustomTarget = aTarget
						return true
					end
				end
			end
		end
	end
end

and mage iteration i first made thinking he was a mage

local InterruptSpells = { 635, 47540, 19750, 82326, 51505, 62809, 331, 77472, 48500, 8936, 5782 }

if select(2, GetSpellCooldown(2139)) == 0 then
	for y=1, 5 do
		local aTarget = "arena"..tostring(y)
		if UnitExists(aTarget) and IsSpellInRange(tostring(GetSpellInfo(2139)), aTarget) == 1 then
			local spellName, _, _, _, _, endCast, _, _, canInterrupt = UnitCastingInfo(aTarget)
			for i, v in ipairs(InterruptSpells) do
				if GetSpellInfo(v) == spellName and canInterrupt == 1 then
					if (endCast/1000) - GetTime() < 0.5 then
						PQR_CustomTarget = aTarget
						return true
					end
				end
			end
		end
	end
end

none of these are tested and i almost guarantee them to be broken

[Kaolla]

Mentally, your new Shadowpriest rotation has been absolutely phenomenal. I have a couple of suggestions to make, however.

Firstly, the rotation lists an ability to cast Dispersion when the left Alt key is held down, but the actual ability appears to have been removed.

Secondly, I added a simple IsLeftAltKeyDown() ability to cast Mind Spike, as well as an ability to cast Mind Blast with 2 stacks of Mind Melt. It's not a huge improvement, but it does make killing little, low-HP things a bit less cumbersome. I've been writing a Shadow PvP profile, but I think this option could also be helpful in certain PvE situations.

Thirdly, you're awesome ^^

[sheuron]

Working on a Polymorph function:

Polymorph
Spell ID: 118
Delay: 2000
Target: Custom

if not polyfunctions then

  function HaveCC(t) 
    local debuff = { 118, 90337, 82676, 49203, 1499, 51514, 6770, 20066, 19386, 5484, 6358, 8122, 5782, 2094, 
                             33786, 605, 19503 }
    for _,v in ipairs(debuff) do 
      local name,_,_,_,_,_,expiration = UnitDebuffID(t,v)
      if name and expiration - GetTime() > 1 then return true end 
    end
  end

  function BeingTarget(t)
    if UnitIsUnit("target",t) then return true end
    for i=1, GetNumPartyMembers(), 1 do
      local member = "party"..tostring(i)
      if UnitIsUnit(member.."target",t) then return true end
    end
  end

  function CanbeCC(t)
    if not HaveCC(t) 
    and not BeingTarget(t) 
    and not PQR_IsOutOfSight(t) 
    and not UnitIsDeadOrGhost(t) 
    and UnitCanAttack("player",t) 
    and IsSpellInRange(tostring(GetSpellInfo(118)),t) == 1 
    then return true end
  end

  polyfunctions = true

end

if IsLeftControlKeyDown() and not GetCurrentKeyBoardFocus() then 
  if CanbeCC("mouseover") then PQR_CustomTarget = "mouseover" return true 
  elseif CanbeCC("focus") then PQR_CustomTarget = "focus" return true 
  else 
    local n  = 1
    while UnitExists("arena"..n) do
      if CanbeCC("arena"..n) then PQR_CustomTarget = "arena"..n return true end
      n = n + 1
    end
  end
end

What this do?

When you press LEFT CONTROL polymorph this priority: Your mouseover > Your focus.

If none target is found, check the arena frames for a enemy not being target by you or any friend and polymorph him.

The script also check if the enemy is already CC by you or any friend and wait till current cc effect end to polymorph.

This function ll never polymorph your current target.

[Meatglue]

Working on a Polymorph function:

Polymorph
Spell ID: 118
Delay: 2000

if not polyfunctions then

  function HaveCC(t) 
    local debuff = { 118, 90337, 82676, 49203, 1499, 51514, 6770, 20066, 19386, 5484, 6358, 8122, 5782, 2094, 
                             33786, 605, 19503 }
    for _,v in ipairs(debuff) do 
      local name,_,_,_,_,_,expiration = UnitDebuffID(t,v)
      if name and expiration - GetTime() > 1 then return true end 
    end
  end

  function BeingTarget(t)
    if UnitIsUnit("target",t) then return true end
    for i=1, GetNumPartyMembers(), 1 do
      local member = "party"..tostring(i)
      if UnitIsUnit(member.."target",t) then return true end
    end
  end

  function CanbeCC(t)
    if not HaveCC(t) 
    and not BeingTarget(t) 
    and not PQR_IsOutOfSight(t) 
    and not UnitIsDeadOrGhost(t) 
    and UnitCanAttack("player",t) 
    and IsSpellInRange(tostring(GetSpellInfo(118)),t) == 1 
    then return true end
  end

  polyfunctions = true

end

if IsLeftControlKeyDown() and not GetCurrentKeyBoardFocus() then 
  if CanbeCC("mouseover") then PQR_CustomTarget = "mouseover" return true 
  elseif CanbeCC("focus") then PQR_CustomTarget = "focus" return true 
  else 
    local n  = 1
    while UnitExists("arena"..n) do
      if CanbeCC("arena"..n) then PQR_CustomTarget = "arena"..n return true end
      n = n + 1
    end
  end
end

What this do?

When you press LEFT CONTROL polymorph this priority: Your mouseover > Your focus.

If none target is found, check the arena frames for a enemy not being target by you or any friend and polymorph him.

The script also check if the enemy is already CC by you or any friend and wait till current cc effect end to polymorph.

This function ll never polymorph your current target.

That shit is hot! You say youre working on it, does that mean it's done but not tested? I will try it out soon.