Anti-AFK Honor Leech Bot (AutoIt)

[Subset]

Thanks for the feedback, will update macros!

[taz0r]

i am thinking of starting pvp botting. how secure is this program? and if i do get caught what kind of ban can i expect for using 3rd party program honor leeching programs? perma ban or just 3 day or what. thanks

[Aesop]

Also, how about a way to turn off AutoBG or Join BG while you are in a WG battle. Then turn it on again once the WG battle is over.

Just an idea, though it seems like it would need some heavy scripting / pixel reading to implement.

[Subset]

Taz0r, I have been leeching honor for a good 2 weeks before I posted this. The updates and suggestions and help I have recieved have improved this be less detectable.
As with all bots, USE WITH YOUR OWN RISK.
This is undetected, at the moment.

[Subset]

Also to the guy who made that macro, it does not move you around as intended. I have changed the macro back to its original state. Maybe this macro?

/autobg max 1
/autobg marks
/script AcceptBattlefieldPort(1,1)
/cast [nomounted] Turbostrider
/targetfriendplayer
/follow
/stopmacro [player=dead]
/targetfriendplayer [dead]
/follow

Not sure, haven't played with /stopmacro commands.

EDIT: Change the Turbostrider, testing this macro atm.

[keiguil]

Also to the guy who made that macro, it does not move you around as intended. I have changed the macro back to its original state. Maybe this macro?

Not sure, haven't played with /stopmacro commands.

EDIT: Change the Turbostrider, testing this macro atm.[/COLOR]

Okay, figured it out. This may take more buttons to achieve properly. /stopmacro [dead] at the beginning of the macro works, but haven't tested in ghostmode of a BG yet. You can use /stopmacro [dead] to automatically check if you are dead. no need to target yourself first. still testing, will post updates

UPDATE 1: cannot combine parameters in /stopmacro. example:

/stopmacro [dead, combat] DOES NOT WORK


/stopmacro [dead] DOES WORK
/stopmacro [combat]

so you must do separate /stopmacros for separate conditions, but they can be used on the same macro

UPDATE 2: Tried to accomplish everything in 3 macros, works just fine I think.

See later post!!!

[Aesop]

EDIT: Great work Keiguil, I wish i knew how to script AutoIt to add your changes, but we'll leave that to the experts.

Can't wait to test it out.

One thing I have done is to add a /cast [nomount] "mountname" into all of the macros to make sure I am always mounted. If at any time I am not mounted, there is a chance of missing the opportunity to follow a friendly and therefore you will be left in the dust to be afk'd.

[keiguil]

One thing I have done is to add a /cast [nomount] "mountname" into all of the macros to make sure I am always mounted. If at any time I am not mounted, there is a chance of missing the opportunity to follow a friendly and therefore you will be left in the dust to be afk'd.

There's a pretty easy safeguard I figured out for that as well...
Autoit's ControlSend function can also periodically send {SPACE} commands to the window so that you'll appear to jump around while doing your normal stuff, and if you happen to get left behind you'll be able to resist afk'ing.

I can see one minor flaw with this, however - it could interrupt your mount cast

Edit: Can't send a, w, s, or d either, or you'd break your follow on current targets.

ET VOILA!!
Okay, by no stretch of the imagination am I good at AutoIt - I just tweaked the code and repeated the last segment a few times for the sake of thoroughness.
ps. I added a self-plug. Am I selfish yet?

UPDATE: Here's what I came up with - I'll post everything!

Script:

HotKeySet("{F5}", "TogglePause")

Global $Paused, $WinTitle ='World of Warcraft'
TogglePause()

While 1
If WinExists($WinTitle) Then
ControlSend($WinTitle, "", "", "1", 1)
Sleep(1800)
$repeat = 0
While $repeat < 1
ControlSend($WinTitle, "", "", "2", 1)
Sleep(1000)
$repeat = $repeat + 1
WEnd
ControlSend($WinTitle, "", "", "3", 1)
Sleep(500)
ControlSend($WinTitle, "", "", "3", 1)
Sleep(500)
ControlSend($WinTitle, "", "", "3", 1)
Sleep(500)
ControlSend($WinTitle, "", "", "3", 1)
Sleep(500)
Else
MsgBox(0, "WoW Client not found!", "Have you looked under the bed?" &@CRLF& "TRY HARDER", "", "")
Exit
EndIf
WEnd

Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Paused (Nagics BG Bot Thanks Freehand and keiguil), F5 to resume.',0,0)
WEnd
ToolTip("")
EndFunc

Func Terminate()
Exit 0
EndFunc

PRIMER:

/autobg max 1
/autobg marks

Primer should be pressed upon starting the game, only one time.

ONE:

/script AcceptBattlefieldPort(1,1)
/stopmacro [dead]
/stopmacro [combat]
/stopmacro [mounted]
/cast [nomounted] your mount name here

TWO:

/stopmacro [dead]
/targetfriendplayer [nodead]
/follow

THREE:

/stopmacro [dead]
/targetenemy [noharm][dead]
/console targetNearestDistance 36.000000
/cast [harm,nodead] Arcane Barrage

NearestDistance should be the range of your instant cast ranged attack (spell, shot, whatever)



Let me know what you think! Rep if you want, or feel free to clean up my *.au3!
Once again, I'm no real coder, I just kind of messed with it until it did what I thought was acceptable.

-Keiguil

[dethter]

the /autobg thing doesnt work for me..

-nvm figured out it was a mod.

[Aesop]

haha good work man, i'll test it out.

I've been messing with the .au3 script but it looks horrible compared to yours.

P.S. Does anyone know a way to change the name of a Window so that it can run a different script? I would like to run different scripts in a separate WoW window if its possible.

[drunreal]

haha good work man, i'll test it out.

I've been messing with the .au3 script but it looks horrible compared to yours.

P.S. Does anyone know a way to change the name of a Window so that it can run a different script? I would like to run different scripts in a separate WoW window if its possible.

Sure there is Use WinGetHandle()

[Aesop]

Sure there is Use WinGetHandle()

So:

For instance, set the second script to WinGetHandle(World of Warcraft2). But then how do I add the #2 to a WoW window so that the script can recognize it?

[Subset]

Fixed an error in the script, above, the download link should be up and ready in a few.

[keiguil]

So:

For instance, set the second script to WinGetHandle(World of Warcraft2). But then how do I add the #2 to a WoW window so that the script can recognize it?

Easy peasy, buddy!
That is, if you can run 2 separate instances of AutoIt, which I believe you can.
Just change (at the very top of the script) where it defines what the window is called and instead of 'World of Wacraft' change it to 'World of Warcraft2', then save as a different name, then compile, then save again (I don't know the right order so just do this, lol).

Then, the original script will run on the default window and the new script will run on the #2 window.

[drunreal]

Easy peasy, buddy!
That is, if you can run 2 separate instances of AutoIt, which I believe you can.
Just change (at the very top of the script) where it defines what the window is called and instead of 'World of Wacraft' change it to 'World of Warcraft2', then save as a different name, then compile, then save again (I don't know the right order so just do this, lol).

Then, the original script will run on the default window and the new script will run on the #2 window.

Actually no .... If you start WoW 2 times both are called World Of Warcraft .... Althrought they have different handles so you may do an functions that does $handle = WinGetHandle("World of Warcraft") and asks you if it should use that window if not search for other wow windows