Guild Wars Bot

[Mr.Llama]

Well, it's only in beta, but I need testers. If you want to offer any suggestions go ahead, but please don't take this and put your name on it. (Not that anyone would want to do it with mine)

Edit: Oh yea! I think I used some custom hotkeys, but I think most of them are default...

expandcollapse popup

; ----------------------------------------------------------------------------
;
;
; Author:        Mr. Llama <Kev10191@msn.com>
;
; Script Function:
;   Guild Wars bot, it can do the following:  FIGURE IT OUT!
;
;
;
; ----------------------------------------------------------------------------
#include <GUIConstants.au3>
HotKeySet("{ESC}", "Terminate")
Global $wait = 0
Global $Enemycheck
Global $enemythere
Global $enemybar
Global $PixelColor
Global $TimerNotMoving
Global $PixelColornow
Global $timertonotmoving
Global $itemcoordW
Global $itemcoordB
GUICreate("Guild Wars Bot", 200, 100)
GUICtrlCreateLabel("Choose Behavior", 50, 0, 100, 200)
$Smartbehave = GUICtrlCreateButton("Smart", 0, 0)
GUISetState()
While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then
        Exit 0
    EndIf
    If $msg = $Smartbehave Then
        SmartBehavior()
    EndIf
WEnd
Func SmartBehavior()
;Don't start until Guild Wars is up
    While $wait = 0
        Sleep(1000)
        If WinActive("Guild Wars") Then
            $wait = 1
            Sleep(2000)
        EndIf
    WEnd
;Start the bot-----------------
    While 1
        GuildWarscheck()
        EnemyCheck()
    WEnd
EndFunc ;==>SmartBehavior
Func GuildWarscheck()
    If Not WinActive("Guild Wars") Then
        $wait = 0
        While $wait = 0
            Sleep(2000)
            If WinActive("Guild Wars") Then
                $wait = 1
            EndIf
        WEnd
    EndIf
EndFunc ;==>GuildWarscheck
Func EnemyCheck()
    Send("c")
    $enemythere = "false"
    While $enemythere = "false"
        Send("c")
        Sleep(250)
        $enemybar = PixelSearch(398, 26, 625, 37, 0xD41A26, 5)
        If Not @error Then
            $enemythere = "true"
            Attack()
        EndIf
        If @error Then
            $enemythere = "false"
            Itemget()
        EndIf
        Send("{w down}")
        Sleep(2500)
        Send("{w up}")
        CheckNotmoving()
    WEnd
EndFunc ;==>EnemyCheck
Func Attack();;Use your skill combo below if you're a flare spammer this would be good.
    While $enemythere = "true"
        Send("{SPACE}")
        MouseClick("left", 533, 28, 2, 1)
        Send("1")
        Sleep(500)
        $enemybar = PixelSearch(398, 26, 625, 37, 0xD41A26, 5)
        If @error Then
            $enemythere = "false"
            Itemget()
        EndIf
    WEnd
EndFunc ;==>Attack
Func Itemget()
    $itemcoordW = PixelSearch(77, 113, 770, 649, 0xFFFFFF, 0)
    If Not @error Then
        MouseClick("Left", $itemcoordW[0], $itemcoordW[1], 1)
        Send("{SPACE}")
        Sleep(6000)
    EndIf
    $itemcoordB = PixelSearch(77, 113, 770, 649, 0x99EEFF, 0)
    If Not @error Then
        MouseClick("left", $itemcoordB[0], $itemcoordB[1], 1)
        Send("{SPACE}")
        Sleep(6000)
    EndIf
EndFunc ;==>Itemget
Func Terminate()
    Exit 0
EndFunc ;==>Terminate
Func CheckNotmoving()
    $PixelColor = PixelGetColor(405, 284)
    $TimerNotMoving = TimerInit()
    Send("{w down}")
    While $TimerNotMoving < 2000
        Sleep(1)
    WEnd
    Send("{w up}")
    $PixelColornow = PixelGetColor(405, 284)
    If $PixelColor = $PixelColornow Then
        Send("x")
    EndIf
EndFunc ;==>CheckNotmoving

Edited April 12, 2006 by Mr.Llama

[Sekkusu]

What mission/explorable zone do you use this at?

[Mr.Llama]

I've only tested it in pre-searing, but it could work anywhere with a bit of skill tweaking. Just make sure there's enemies where you can take on quite a few (5 maybe) and live. But then again I suppose it doesn't matter since you'll rez.

[Mr.Llama]

Any1 try this?!

[JoshDB]

I like it. You shoulc check out some of the Guildwars functions I've posted in the past.

[Mdeshame]

I like it. You shoulc check out some of the Guildwars functions I've posted in the past.

Interesting stuff.

JoshDB, I tried searching for your previous posts but can not find any. do you have alink to some of your older GuildWars posts?

[JoshDB]

http://www.autoitscript.com/forum/index.ph...ndpost&p=144811

[Zeebonics]

I'm to dumb to figure this out can someone help?

Edited September 4, 2006 by Zeebonics

[sweetlady]

I like your script, in fact I'm learning how to use Autoit and I often refer to your script and Josh's too. Thanks to you guys I've finally manage to make a decent bot. Well, it simply attacks and loot but still, it's a start right.

Thx to you guys and to Comi's tutorial too http://www.edgeofnowhere.cc/viewtopic.php?p=1166419<

Later all

[Echoman123]

I actually know to code in autoit (did a quick launch script for gw2 launch...) but I don't know how to use this. I tried recording it ask macro, no work... If someone would help, please.

[JLogan3o13]

Echoman123, you seem to have missed the forum rules on your way in. Notice this part:

"Do not discuss any of the following:

• Automating games or game servers. This rule is zero tolerance"

This is another reason it is not a good idea to resurrect such an old post. AutoIt has changed a lot in the last 3 years, and so have the rules on this forum.

Edited August 27, 2012 by JLogan3o13

[Melba23]

Echoman123,

What he said.

M23