AFK Killing Bot

05/17/2006 17:55 Maybe It's Maybelline#1
This bot is done without any hook/hack in game memory space.
100% autoit/pixels detection based

Pickup:
-Gold items
-Purple items
-Blue items

How to install:
1) Download it.
2) Open with winzip or program able to extract .zip files.
3) Extract it somewhere...
4) Run Guild Wars, go outside of town where are some monsters.
5) Run GuildWarsBot_v0.1.exe and press "Run GWBot".
6) Done :)

[Only registered and activated users can see links. Click Here To Register...]
05/17/2006 18:02 blackcommander#2
funzt das überall oder wie O.o
05/17/2006 18:05 Maybe It's Maybelline#3
Denke ich mal.
05/17/2006 18:46 lk92#4
VIRUS!
05/17/2006 19:09 Term!nX#5
Hmm allerdings TR/IM.Agent.G . Nun is mir aber auch klar, dass ganz viele harmlose sachen als Virus angesehen werden. Wir können ja auf Maries Bestätigung warten.
05/17/2006 20:02 Maybe It's Maybelline#6
Hatte ich auch schon gesagt das ich nur's kopiert hatte,
kann ein Virus drinn sein oder nicht. Werde einfach mal wenn ich Zeit habe das Disassemblen und mirs anschauen. Davor muss ich aber noch ein paar L2 Bots auf meinen Root machen.
05/17/2006 22:33 Kazza2003#7
Hmm klappt zwar ist aber nen recht "einfach" gestrickter Bot. Zum wirklichen farmen meiner Meinung nach nicht geignet.
05/18/2006 00:00 mickcr#8
ich kenn mich mit autoit nicht aus, vielleicht gehört der kram dazu, kann mir jemand sagen wie autoit typisch folgende sachen sind:

GuildWarsBot_v0.1.exe:

WSOCK32.dll
.data:004360B0 00000041 C SOFTWARE\Microsoft\Windows\CurrentV ersion\Explorer\Shell Folders
.data:00435188 0000000D C FtpOpenFileA
.data:004351D0 0000000C C FtpGetFileA
.data:00434384 00000012 C URLDOWNLOADTOFILE
.data:00435C28 0000000B C IPADDRESS1
.data:00435204 00000011 C InternetConnectA
.data:00435164 00000012 C InternetCrackUrlA
.data:00435258 0000000E C InternetOpenA
.data:004351DC 00000011 C InternetOpenUrlA
.data:0043522C 00000015 C InternetQueryOptionA
.data:004351F0 00000011 C InternetReadFile
05/18/2006 12:06 C0rnh0lio#9
Lohnt sich der Bot oder is der nur scheisse?
05/18/2006 14:20 Term!nX#10
Naja, ziemlich gewagt, wenn man nicht 100% weiss, ob was pöses drin ist :D
05/18/2006 15:01 Pavka#11
i have kaspersky antivirus, and he said that no dangerous objects found!
05/18/2006 16:20 blackcommander#12
antivir sagt böses zeug, also is böse
05/18/2006 18:05 Term!nX#13
AntiVir ist nicht immer right. Evtl einfach nur als böse angesehen, weil selbst gecodet.
05/18/2006 19:17 blackcommander#14
um genau zu sein hat er TR/IM.Agent.G angezeigt wie du schon sagtest xD
05/18/2006 19:40 mms#15
Vielleicht solltet ihr nicht einfach Sachen von anderen Board oder so klauen.

Hier ist glaub ich der Code dazu:

Code:
; ---------------------------------------------------------------------------- 
; 
; AutoIt Version: 3.1.0 
; Author:djomen * * * * *
; Name:Killbot 
; Script Function:For afk killing with Guild Wars. 
; * *
; 
; ---------------------------------------------------------------------------- 
;~~~~~~~~~~~~~~~ 
#NoTrayIcon 
#Include<GUIConstants.au3> 
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)&#59; Gold items 
 * *$CoordsB = PixelSearch(400, 300, 700, 550, 0xBB88EE)&#59; Purple items 
 * *$CoordsC = PixelSearch(400, 300, 700, 550, 0x99EEFF)&#59; Blue items 
 *; 
 *&#59; 
 * *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 
 *&#59; 
 * *If IsArray($CoordsB) Then 
 * * * *Sleep(500) * * * * * * * * * * * * *; The color B was found 
 * * * *MouseClick('Left', $CoordsB[0], $CoordsB[1], 1, 0) 
 * * * *Sleep(500) 
 * *Else * * * * *&#59; The color B was not found 
 * *EndIf 
 *&#59; 
 * *If IsArray($CoordsC) Then 
 * * * *Sleep(500) * * * * * * * * * * * * *; The color C was found 
 * * * *MouseClick('Left', $CoordsC[0], $CoordsC[1], 1, 0) 
 * * * *Sleep(500) 
 * *Else * * * * *&#59; The color C was not found 
 * *EndIf 
 *&#59; 
 * *Sleep(100) 
 *&#59; 
Send("{Alt down}")&#59;; hold (alt) * * * *
 * * * *Sleep(100) 
 * * * *Send("{c down}") 
 * * * *Sleep(15) 
 * * * *Send("{c up}") 
 * * * *Sleep(25) * * *;; * This is the attack sequence.&#59;; 
 * * * *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.&#59;; 
 * * * * * * * * * * Send("{3 up}") 
 * * * * * * * * * * Sleep(15) 
 * * * * * * * * * * Send("{4 *down}") 
 * * * * * * * * * * Sleep(15) * * * * * * * * * * * * * *
 * * * * * * * * * * Send("{4 up}") *
 * * * * * * * * * * Sleep(15) 
Send("{Alt up}") 
Sleep(100) 
EndFunc