Since the expansion is almost over i want to share my AU3 script that i used to level pets with you guys.
You need:
- AutoIt 3 installed
- 2 pets you want to level
- 1 pet that can carry the other 2. I recommend a [Only registered and activated users can see links. Click Here To Register...] (i use a S/P breed). Leel 25 Rare ofc. Skills are Leech Life, Cauterize, Brittle Webbing. Its basicly unkillable (but slow).
How to set up:
- Bind your "pet journal" key to "Z"
- Bind your "interact with target" key to "U"
- Create a macro "/tar Marsh" and bind it to "9"
- Bind a single target Dot or a Pet attack macro (Hunter, WL, Mage etc.) to "1". I use "Nether Tempest".
- Your pet battle team should lokk like this:
1. Pet: pet to level
2. Pet: pet to level
3. Pet Molten Hatchling
- Set your wow to "window mode", Resolution "1366x768".
- Creat a new .txt File on your desktop or where ever an rename it to something like "pets.au3"
- Right click - "Edit Script" - copy/paste the code below into the file and save it.
- ingame: fly to [Only registered and activated users can see links. Click Here To Register...] and stand infront of him ~10 yards away.
- resize your wow window as small as possible. Should look like this: [Only registered and activated users can see links. Click Here To Register...]
- Double click your "Pets.au3" and click back into your wow window. The window must remaine in focus, there is no backround clicking.
- "p" terminates the script
Important: dont use an addon that changes the pet battle UI. I used a pixel search on the standart blizzard pet battly ui to detect if you are in battle or not.
If you have any problems.... well good luck
code:
if i find this reposted on the core ill hunt you down and hit you with rainbows!
You need:
- AutoIt 3 installed
- 2 pets you want to level
- 1 pet that can carry the other 2. I recommend a [Only registered and activated users can see links. Click Here To Register...] (i use a S/P breed). Leel 25 Rare ofc. Skills are Leech Life, Cauterize, Brittle Webbing. Its basicly unkillable (but slow).
How to set up:
- Bind your "pet journal" key to "Z"
- Bind your "interact with target" key to "U"
- Create a macro "/tar Marsh" and bind it to "9"
- Bind a single target Dot or a Pet attack macro (Hunter, WL, Mage etc.) to "1". I use "Nether Tempest".
- Your pet battle team should lokk like this:
1. Pet: pet to level
2. Pet: pet to level
3. Pet Molten Hatchling
- Set your wow to "window mode", Resolution "1366x768".
- Creat a new .txt File on your desktop or where ever an rename it to something like "pets.au3"
- Right click - "Edit Script" - copy/paste the code below into the file and save it.
- ingame: fly to [Only registered and activated users can see links. Click Here To Register...] and stand infront of him ~10 yards away.
- resize your wow window as small as possible. Should look like this: [Only registered and activated users can see links. Click Here To Register...]
- Double click your "Pets.au3" and click back into your wow window. The window must remaine in focus, there is no backround clicking.
- "p" terminates the script
Important: dont use an addon that changes the pet battle UI. I used a pixel search on the standart blizzard pet battly ui to detect if you are in battle or not.
If you have any problems.... well good luck
code:
Code:
Opt("MouseCoordMode", 0)
Opt("PixelCoordMode", 0)
Opt("CaretCoordMode", 0)
HotKeySet("{p}", "Terminate")
$shinyColor = "957905"
$xShiny = 165
$yShiny = 35
$counter = 0
sleep(5000)
While 1
sleep(3000)
_Main()
Wend
Func _Main()
If _FightCheck($xShiny, $yShiny) Then ;check if in fight
_Fight()
EndIF
Send("{z}") ; open pet journal
sleep(1000)
MouseClick("left", 170, 44) ; heal pets
Send("{9}") ; target macro
sleep(500)
Send("{u}") ; interact with target (start fight)
sleep(2000)
send("{1}") ; Kill critter if you cant interact
sleep(2500)
EndFunc
Func _Fight()
sleep(3000)
Send("{1}")
sleep(10000)
Send("{4}") ;switch pets
Sleep(1000)
MouseClick("left", 164, 153) ; pet 2
Sleep(10000)
Send("{1}")
sleep(10000)
Send("{4}") ;switch pets
Sleep(1000)
MouseClick("left", 220, 170) ; pet 3
Sleep(10000)
$counter = 0
While $shinyColor = Hex(PixelGetColor( $xShiny, $yShiny), 6)
If $counter < 200 Then
Send("{1}") ;cast stuff
Sleep(500)
Send("{2}")
Sleep(500)
Send("{3}")
Sleep(1500)
$counter = $counter + 1
sleep(2000)
else
_cancleFight()
EndIf
WEnd
EndFunc
Func _cancleFight()
MouseClick("left", 183, 200)
sleep(1000)
MouseClick("left", 147, 85)
Sleep(10000)
EndFunc
Func _FightCheck($xShiny, $yShiny)
$newColor = Hex(PixelGetColor( $xShiny, $yShiny), 6)
If $newColor = $shinyColor Then Return True
sleep(10)
EndFunc
Func Terminate()
Exit 0
EndFunc ;==>Terminate
