taultunleashed
http://www.taultunleashed.com/phpbb3/

AutoIT killbot Marco
http://www.taultunleashed.com/guild-wars-submissions/autoit-killbot-marco-t56522.html		 Page 1 of 1
Author:  zorgzcomawhite [ December 5th, 2007, 12:01 pm ]
Post subject:  AutoIT killbot Marco
The following code is to be used in AutoIT.
It needs to be configured depending on your resolution and other factors so expect to have to change the code if you want it to work.


CODE
; AutoIt Version: 3.1.0

; Author:djomen

; Name:Killbot

; Script Function:For afk killing with Guild Wars.

;

;

; ----------------------------------------------------------------------------

;~~~~~~~~~~~~~~~

#NoTrayIcon

#Include

Global $Paused

;~~~~~~~~~~~~~~~

HotKeySet("{Pause}", "Pause")

HotKeySet("{End}", "Hide")

HotKeySet("{Home}", "Show")

;~~~~~~~~~~~~~~~

GuiCreate("Killbot", 100, 50,(@DesktopWidth-100)/2, (@DesktopHeight-50)/2, $WS_DLGFRAME)

WinSetOnTop("Killbot", "", 1)

;~~~~~~~~~~~~~~~

$startKB = GuiCtrlCreateCheckbox("Start", 4, 1, 50, 20)

$Button_1 = GuiCtrlCreateButton("X", 95, 3, 18, 18)

$ButtonHelp = GUICtrlCreateButton("Help", 60, 3, 35, 18)

GuiSetState()

;~~~~~~~~~~~~~~~

While 1

$msg = GuiGetMsg()

;~~~~~~~~~~~~~~~

Select

Case GUICtrlRead($startKB) <> 4

While GUICtrlRead($startKB) <> 4

Kill()

WEnd

Case GUICtrlRead($startKB) = -15

ExitLoop

EndSelect

;~~~~~~~~~~~~~~~

Select

Case $msg = $ButtonHelp

msgbox(0, "Help", "Press (Pause) to pause, press (End) to hide the window and press (Home) to show the window.Killbot was created for educational purposes only.")

EndSelect

;~~~~~~~~~~~~~~~

Select

Case $msg = $Button_1

ExitLoop

EndSelect

WEnd

;~~~~~~~~~~~~~~~

Func Pause()

$Paused = NOT $Paused

While $Paused

sleep(100)

ToolTip('GWit is currently paused.',0,0)

WEnd

ToolTip("")

EndFunc

;~~~~~~~~~~~~~~~

Func Hide()

GUISetState(@SW_HIDE)

EndFunc

;~~~~~~~~~~~~~~~

Func Show()

GUISetState(@SW_SHOW)

EndFunc

;~~~~~~~~~~~~~~~

;

;Funtion Kil

Func Kill()

;

Sleep(100)

$CoordsA = PixelSearch(400, 300, 700, 550, 0xE3C243); Gold items

$CoordsB = PixelSearch(400, 300, 700, 550, 0xBB88EE); Purple items

$CoordsC = PixelSearch(400, 300, 700, 550, 0x99EEFF); Blue items

;

;

If IsArray($CoordsA) Then

Sleep(500); The colour A was found

MouseClick('Left', $CoordsA[0], $CoordsA[1], 1, 0)

Sleep(500)

Else; The color A was not found

EndIf

;

If IsArray($CoordsB) Then

Sleep(500); The color B was found

MouseClick('Left', $CoordsB[0], $CoordsB[1], 1, 0)

Sleep(500)

Else; The color B was not found

EndIf

;

If IsArray($CoordsC) Then

Sleep(500); The color C was found

MouseClick('Left', $CoordsC[0], $CoordsC[1], 1, 0)

Sleep(500)

Else; The color C was not found

EndIf

;

Sleep(100)

;

Send("{Alt down}");; hold (alt)

Sleep(100)

Send("{c down}")

Sleep(15)

Send("{c up}")

Sleep(25);; This is the attack sequence.;;

Send("{SPACE down}")

Sleep(15)

Send("{SPACE up}")

Sleep(15)

Send("{2 down}")

Sleep(15)

Send("{2 up}")

Sleep(15)

Send("{3 down}")

Sleep(15);; Skills sequence.;;

Send("{3 up}")

Sleep(15)

Send("{4 down}")

Sleep(15)

Send("{4 up}")

Sleep(15)

Send("{Alt up}")

Sleep(100)

EndFunc
Author:  Tault_admin [ December 5th, 2007, 4:41 pm ]
Post subject: 
Can members say yay or nay to this being moved to a confirmed section.
Author:  thebullion24k [ December 5th, 2007, 10:09 pm ]
Post subject: 
More info on this bot please...

Does it attack on it's own? Does it know when to re cast enchants? Can it be used anywhere?
Author:  hardsell [ December 6th, 2007, 5:33 am ]
Post subject: 
Nay C & P

http://www.lethal-gaming.com/lofiversio ... p/f34.html
Author:  joshuamanster [ May 9th, 2008, 11:34 am ]
Post subject:  ooo
?nay zorm guys jsut does C and PEveryWhere
Author:  g_force111 [ April 6th, 2009, 6:21 pm ]
Post subject: 
This was so C and P'd

Here is the link, http://www.autoitscript.com/forum/index ... opic=20223

My bot is the same, but I have modded it, and personally to my belief, made it better. Especially for its purpose, pre-searing lvling.
Page 1 of 1 All times are UTC - 8 hours
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/