Trollin's Honor Bot

[Trollin]

- Created by Trollin of MMOwned -

[ame="http://www.youtube.com/watch?v=_o2Y0uasyqk"]YouTube - MMOwned.com - Trollin's Honor Bot V0.3 Beta - Honor Leech Bot[/ame]

-------------------------------------------------------------------------------------




RapidShare: Easy Filehosting -- Version 0.2 (BETA) -- OLD
RapidShare: Easily Filehosting -- Version 0.3 (BETA) -- NEWEST
-------------------------------------------------------------------------------------



Virus Scan -- False Positives

File size: 249236 bytes
MD5...: e4d992cefd87f155b6ea1ca2a952a6f2
SHA1..: 84109fbc76141570a81c44e6a12a662469462558
-------------------------------------------------------------------------------------

ChangeLog:

• Re-organized Func_ ID's ($YesID, $NoID, $HelpID, $ExitID)
• Change (ms) limits (Sleep)
• Edited the Send Keys to make moving more realistic (Still need to set a HotKey for this, when you Alt - Tab to disable bot, you will get a massive CPU up, until you Exit or Pause the script)
• Run command now should work on all directories (@ProgramFilesDir newer version)
• ..Other minor updates
-------------------------------------------------------------------------------------

If you have any suggestions, please PM me and I will see what I can do!

[KRYPTON88]

Good job for a first lil project. Put some more time into it, and Do your research. No one will hold your hand +Rep Tho for the contrib

[mudfish]

I didn't Virus Scan, but it's fully coded in AutoIt3

--Trollin

It's not that people don't trust you and you need to post a virus scan, it's that it's the rules to post a scan.

So if your going to be releasing more programs, you should get into the habit of posting them

[Trollin]

It isn't much.. I'm looking into it more tho..

[natt_]

Well. its okay fora first project as Krypton said. But this is more like an anti-afk script.
And to open wow use RegRead to retrive the wow install dir instead.

RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Blizzard Entertainment\World of Warcraft", "InstallPath")

and just add &"wow.exe" to run ex:
c:\games\wow\wow.exe

[Zacred]

sexy script

[Mango Jerry]

Thanks for the release.
I recommend you all to use this if you are trying to gain Honor.

Probably the best Honor Bot out right now, keep it up and Reputation for you, Trollin'.

[drsmallo]

Coooollll....

[manowarlock]

sdwif it could sign up to battlemaster automaticallsdwy id <3 it. simple bot that works, although because it doesnt autsdwo sign up its hardly a honour bot sosdw im keeping my rep untill/if you getsdw it to autosdw sign somehow

[[ Prototype ]]

I would like some more information. What does it do?

[Emuchild]

@ Pvpede, it's really nothing special, it just presses "W" then waits 8 seconds and presses "S" and "D" and just repeats.

@ Trollin, your script was a mess, and did not work for me.
1.

$ExitID = GUICtrlCreateButton("Help", 210, 50, 70, 20)
$AboutID = GUICtrlCreateButton("Exit", 310, 50, 70, 20)

Thats completely wrong.

(I Fixed)
2. My WoW.exe was not in your specified directory which was C:\Program Files\World Of Warcraft\
(Fixed so that your select your World Of Warcraft directory)

Fixed Source, hope you like it Trollin

#include <GUIConstantsEx.au3>

Opt('MustDeclareVars', 1)

_Main()

Func _Main()
    Local $RunWoW, $StartBot, $Helpme, $Exitplease, $msg, $PATH


    GUICreate("Trollin's Honor Bot V0.2 BETA", 390, 80)

    GUICtrlCreateLabel("Please select Help if this is your first time using this bot!", 30, 10)
    $RunWow = GUICtrlCreateButton("Run WoW", 10, 50, 70, 20)
    $StartBot = GUICtrlCreateButton("Start Botting!", 110, 50, 70, 20)
    $Helpme = GUICtrlCreateButton("Help", 210, 50, 70, 20)
    $Exitplease = GUICtrlCreateButton("Exit", 310, 50, 70, 20)

    GUISetState()
    
    

    Do
        $msg = GUIGetMsg()

        Select
            Case $msg = $RunWow
            $PATH = FileSelectFolder("Select Your World Of Warcraft Folder","",1)

        If FileExists($PATH & "\WoW.exe") Then
            MsgBox(4096, $PATH & "\WoW.exe", "WoW.exe exists in " & $PATH & ", starting WoW")
            FileCreateShortcut($PATH & "\WoW.exe", @DesktopDir & "\WoW.lnk")
            Sleep(3000)
            ShellExecute("WoW.lnk", @DesktopDir)
            Else
            MsgBox(4096, $PATH & "\WoW.exe", "WoW.exe does not exist" & $PATH & ", aborting.")
        EndIf
        
            Case $msg = $StartBot
                MsgBox(0, "Starting bot..", "Press OK to proceed.")
                Sleep("1000")
                WinActivate("World of Warcraft")
                WinWaitActive("World of Warcraft")
                
                While 1
                    
                    Send("{w}")
                    Sleep("8000")
                    Send("{s}")
                    Send("{d}")
                    
                    WEnd
            
            Case $msg = $Helpme
                MsgBox(0, "Help document..", ">> Run WoW -- This starts World of Warcraft, but not the bot" & @CRLF & ">>Start Botting! -- This opens World of Warcraft up, and starts the botting!" & @CRLF & ">>Exit -- Closes program..")
                
                
            Case $msg = $Exitplease
                MsgBox(0, "Closing Trollin's Honor Bot V0.2 BETA", "Thanks for using my bot!")
            Case $msg = $GUI_EVENT_CLOSE
                MsgBox(0, "Closing Trollin's Honor Bot V0.2 BETA", "Thanks for using my bot!")
        EndSelect
    Until $msg = $GUI_EVENT_CLOSE Or $msg = $Exitplease
EndFunc

Credits if you use this, please. =)

[Trollin]

Updated!!!!!!!!

[rafin]

I know this may sound strange but can you please make a short youtube movie to see it in action . And also how do we know its safe?

[Emuchild]

Define 'safe'?

Safe as in undetected by Warden
or
Safe as in undetected by Players?

[Trollin]

it's basically just as safe/unsafe as any other bot.. It's in autoit, scan.DLL will prolly see it, but i dont really think you will get banned for usage.. i truly cant answer the detectability issue atm, but in newer versions, ill work on some anti-warden things..