[BETA] PQRotation - an automated ability priority queue.

[bu_ba_911]

Targeting is alot faster and the "auto"/cast on MS Beacon are just amazing!

cant tk u enouf...

ps.: cant wait for Xelper to upgread PQR so that check LoS.. them this profile and Sheurons holy priest will be 100% perfect!

---------edit -------------

having a small bug: Becon keeps casting om me after casting on target it recasts it on me

i thought that i had fixed that, when i first put the code into the pvp beacon i had forgotten to move it down below the autotarget ability. can u check if the HolyPvP: Beacon of Light is below or above the Autotarget Low HP? ignore the Beacon of Light (Mouseover), that's supposed to be at the top

[grayyman]

i thought that i had fixed that, when i first put the code into the pvp beacon i had forgotten to move it down below the autotarget ability. can u check if the HolyPvP: Beacon of Light is below or above the Autotarget Low HP? ignore the Beacon of Light (Mouseover), that's supposed to be at the top

beacon is below auto target

[bu_ba_911]

beacon is below auto target

weird works for me..... was testing it before i released it.... otherwise i wouldn't have released it haha

give me about 20 minutes to look into it and finish up some real world things then ill dedicate my time to fixing this.... only HolyPvP right?

[winkle21]

I cannot seem to get the mage profile to work anymore. It seems to just be random when it works. When I activated it and target a mob it goes through the functions, and does everything but after the 1st mob dies it seems to just stop and requires me to physically cast a spell on the next mob to restart the rotation. If I let everything reset after I have killed a mob the program will not work no matter what I do..

[grayyman]

local Beacon, _, _, _, _, _, BeaconExpire = UnitBuffID(beacontarget, 53563)

if Beacon ~= nil then
	BeaconExpire = (BeaconExpire - GetTime())
	if BeaconExpire <= 20  then
		CastSpellByID(53563,beacontarget)
		return true
	end
end

if you apply beacon usin alt this will make sure it stays on them

edit
that is, ofcourse "Holy: Beacon of Light"

[Xelper]

PQR 1.0.12 Released
http://dl.dropbox.com/u/39925787/PQR1012.zip

BUGFIX: Changing instance 'floors' will no longer break PQR_IsMoving(x) function.
NEW: 'Cancel Channel' functionality. This will allow individual abilities when flagged as 'True' to be cast while channeling a spell.
NEW: Added F1-F12 hotkeys.
NEW: Offsets are now stored in Offsets.xml for updating for PTR purposes. (If you know how, feel free to update them and post PTR updates! I have them named fairly simply, in my opinion.)
NEW TARGET: "Custom"... you can now specify a custom target in your Lua code BEFORE returning true. This will allow you to target specific mobs not on the "Target" list by default... example: boss1, party1, etc.
EXAMPLE:

PQR_CustomTarget = "boss1"
return true

NEW FUNCTION: PQR_IsOutOfSight([unit], [seconds]) - Returns true if a "Target not in line of sight." error has popped up for the specified unit in the last 3 seconds. Unit can be any unit (player, target, mouseover, etc.). Seconds can be any number down to 4 decimal place precision. NOTE: You will only get a single "Target not in line of sight" per unit per 3-5 seconds depending on other red text errors that have popped up. This is as good as can possibly be done, sorry! If you can find any other way to handle this please let me know and give me Lua code examples.

EXAMPLES:

if PQR_IsOutOfSight() then
    --"target" has been out of sight in the last 3 seconds.
end


if PQR_IsOutOfSight("mouseover", 10) then
    --"mouseover" has been out of sight in the last 10 seconds.
end

Added profiles by sheuron, if you enjoy his profiles please give him rep here: http://www.ownedcore.com/forums/world-of-warcraft/world-of-warcraft-bots-programs/329033-beta-pqrotation-automated-ability-priority-queue-114.html#post2132079 ([BETA] PQRotation - an automated ability priority queue.)


WARRIOR PROTECTION PVE
WARRIOR FURY PVE
MAGE ARCANE PVE
MAGE FROST PVP
HOLY PRIEST PVE
HUNTER MM PVE
ROGUE COMBAT PVE

[sheuron]

Love! ^^

One last petition. At this point there is plenty profile writers i think the easiest way to organice and update profiles from diferent sources is make separate abilities list for each profile. This is an example:

We have a DRUID and make a rotation named "Kitty PvE". A file named DRUID_Kitty PVE.xml is build, the file contain all abilities and rotation. That way we can download profiles and directory strcuture will show this way:

.. Profiles
. DRUID_Kitty PvE.xml
. DRUID_Feral DPS.xml
. DRUID_Feral PVP.xml
etc...

On Abilty Editor we need to choose CLASS and a new box show the name of all rotations found

CLASS: DRUID

ROTATION: Kitty PVE
...................FERAL DPS
...................FERAL PVP

This changes will make bit slower to write profiles, because at this time some common abilities are used on various profiles, but is easy to copy paste on ability editor and you ll be able to load and update as many profiles as you want.

[bu_ba_911]

omg i feel like a freaking idiot

been trying to write in the new function for line of sight..... and everything was just erroring out..... idiot me forgot to download the new PQR

will release my new pally rotation with hopefully a fixed beacon soon and LoS check

i ran into the problem intermittently, like at first i did then i change the delay on beacon and then never again idk if that fixed it, but i hadn't been receiving that response before i released it weird

*edit*
fixed beacon, came at it from a different approach and it worked

[dyer678]

since a lot of the same people are writing profiles..and just finetuning them. I think you should look into SVN files and putting a link to each person's SVN on the front post below the other profiles.

[grayyman]

since a lot of the same people are writing profiles..and just finetuning them. I think you should look into SVN files and putting a link to each person's SVN on the front post below the other profiles.

not a bad idea.

[sheuron]

Updated my priest profile to last PQR version:

- Deleted obsolete shadow priest code. Download latest shadow priest rotation from mentally link on forum.
- Code cleanup

xeronpriest300911PQRProfiles.zip

The PQR_IsOutOfSight feature seem to work, but sometimes keep trying to heal a target out of sight, maybe is my fault the way i used it on autotarget function.

[cokx]

Love! ^^

One last petition. At this point there is plenty profile writers i think the easiest way to organice and update profiles from diferent sources is make separate abilities list for each profile. This is an example:

We have a DRUID and make a rotation named "Kitty PvE". A file named DRUID_Kitty PVE.xml is build, the file contain all abilities and rotation. That way we can download profiles and directory strcuture will show this way:

.. Profiles
. DRUID_Kitty PvE.xml
. DRUID_Feral DPS.xml
. DRUID_Feral PVP.xml
etc...

On Abilty Editor we need to choose CLASS and a new box show the name of all rotations found

CLASS: DRUID

ROTATION: Kitty PVE
...................FERAL DPS
...................FERAL PVP

This changes will make bit slower to write profiles, because at this time some common abilities are used on various profiles, but is easy to copy paste on ability editor and you ll be able to load and update as many profiles as you want.

Its the same thing i suggested a few page earlier.
We need this!

[SilentWarrior]

Hello guys.

I have made a "find clusters, rank them and heal them" type of code, and here it is :

local sqrt = sqrt
local GetPlayerMapPosition = GetPlayerMapPosition
local table = table
local twipe = table.wipe
local tsort = table.sort
local groupType = "raid"--"raid" --"party"
local groupSize = 10
local minHealthForGrowth = 7000 -- 10k for 5ppl min, deficit 0 means full health
local growthHealsHowManyTargets = 6
--

local function determineDistanceBetween(aUnit, anotherUnit)

	local tX1, tY1 = GetPlayerMapPosition(aUnit)
	if (tX1 + tY1 <= 0) then
		return nil -- not valid
	end

	local tX2, tY2 = GetPlayerMapPosition(anotherUnit)
	if (tX2 + tY2 <= 0) then
		return nil -- not valid
	end

  local xd = tX2-tX1
	local yd = tY2-tY1
	return sqrt(xd*xd + yd*yd)
end

local function IsInRange(u1,u2)
    local range = determineDistanceBetween(groupType..u1,groupType..u2) -- groupType used
    if range ~= nil and range<30 then
        return true
    end
    return false  
end
local function IsInRangeOfPlayer(u1)
    local range = determineDistanceBetween("player",groupType..u1) -- groupType used
    if range ~= nil and range<30 then
        return true
    end
    return false 
end

local function getDefHealth(unit)
  return UnitHealthMax(groupType..unit) - UnitHealth(groupType..unit) -- groupType used
end

local function sortDefHealth(aUnit, anotherUnit)
	return getDefHealth(aUnit) > getDefHealth(anotherUnit)
end

local function averageClusterDefHealth(unit)
   local playersInRange = {}
   local groupCount = 0
   for x=1, groupSize do   
       if IsInRange(unit,x) then -- count oneself
          table.insert(playersInRange, x)
          groupCount = groupCount + 1
       end
   end     
   tsort(playersInRange, sortDefHealth)
   local sumHP = 0
   groupCount = math.min(growthHealsHowManyTargets, groupCount) -- possible targets
   for x=1, groupCount do 
      sumHP = sumHP + getDefHealth(playersInRange[x])
   end
   return sumHP/groupCount
end

local function findGoodTarget()
   local goodTarget = nil
   local maxDefHealth = minHealthForGrowth -- 10k for 5ppl min, deficit 0 means full health
   local tempDef = 0 -- temporary var to help performance
   for player=1, groupSize do   
    if IsInRangeOfPlayer(player) then
        tempDef=averageClusterDefHealth(player)         
        if tempDef > maxDefHealth then
           goodTarget = player
           maxDefHealth = tempDef
        end
    end    
   end --for
   return goodTarget
end

local start, duration, enabled = GetSpellCooldown("Wild Growth")
if (enabled ~= nil and enabled == 0) then
    return false
elseif ( (start ~= nil and start > 0) and ( duration ~= nil and duration > 0)) then
    return false   
else
   local target = findGoodTarget()
   if target ~=nil then
      print ("Casting Wild Growth on "..UnitName(groupType..target))
      CastSpellByID(48438,groupType..target) 
   end
end



return false

Right now, I noticed it likes to cast on the first member of raid or party alot, maybe because he is always the lowest (beeing tank and all), hopefully it isnt a bug

[bu_ba_911]

Updated my priest profile to last PQR version:

- Deleted obsolete shadow priest code. Download latest shadow priest rotation from mentally link on forum.
- Code cleanup

xeronpriest300911PQRProfiles.zip

The PQR_IsOutOfSight feature seem to work, but sometimes keep trying to heal a target out of sight, maybe is my fault the way i used it on autotarget function.

Yea i was running into that sort of thing to. Maybe it's because the function actually needs the error of Out of Line of Sight before it trigger, you can't just run a check out of the blue like this

Kind of funny how we both ha the exact same idea on how to use this and where to put it..... it's a shame that maybe we'll need to run a separate check somewhere else tho to make it most effective..... i'm not done exploring yet, but i'm gonna release my updated beacon with early implementations of this code shortly

*edit*
ugh coding is stupid sometimes..... now to find out when my beacon works and when it doesn't..... seems to have something to do with not being in a group.... but if you join a group it doesn't automatically start working. if u remove beacon from rotation, renable it, then add it back in, works wonders... need to find out whats breaking it before i go crazy!

I FOUND THE BUG

bah i've been an idiot lol........
updating pally rotation as soon as i find a better way to use PQR_IsOutOfSight

until then do not target the player you want to cast Beacon on, only use the mouseover or vuhdoh to cast it on them

[R4g4t0kk]

Re posting as I got no answer:

What have I done wrong, what is the reason this does not work?

local TC, _, _, _, _, _, timera = UnitDebuffID("target", 6343)
local WL, _, _, _, _, _, timerb = UnitDebuffID("target", 51696)
local JG, _, _, _, _, _, timerc = UnitDebuffID("target", 53696)
local IF, _, _, _, _, _, timerd = UnitDebuffID("target", 48484)
local IT, _, _, _, _, _, timere = UnitDebuffID("target", 45477)
local ES, _, _, _, _, _, timerf = UnitDebuffID("target", 8042)
local TS, _, _, _, _, _, timerg = UnitDebuffID("target", 90314)
local DC, _, _, _, _, _, timerh = UnitDebuffID("target", 50285)

if TC ~= nil then
	if timera - GetTime() < 2.5 then
		return true
	end
else
	if WL ~= nil then
		if timerb - GetTime() < 2.5 then
			return true
		end
	else
		if JG ~= nil then
			if timerc - GetTime() < 2.5 then
				return true
			end
		else
			if IF ~= nil then
				if timerd - GetTime() < 2.5 then
					return true
				end
			else
				if IT ~= nil then
					if timere - GetTime() < 2.5 then
						return true
					end
				else
					if ES ~= nil then
						if timerf - GetTime() < 2.5 then
							return true
						end
					else
						if TS ~= nil then
							if timerg - GetTime() < 2.5 then
								return true
							end
						else
							if DC ~= nil then
								if timerh - GetTime() < 2.5 then
									return true
								end
							else
								return true
							end
						end
					end
				end
			end
		end
	end
end