Event-Item-Bot//Vaettire unlimited

Bei mir "funzt" er nur zum Teil. Also der von Horstschl3mmer mein ich
Hab die h�lfte rausgenommen so das er nur die rechte Gruppe killt, da er auf dem weg zur 2ten Gruppe immer Schattenform hat auslaufen lassen und ihn ein paar Gegner dann vorzeitig gekillt hatten.

Nun hab ich aber noch das Problem das, wenn er ordnungsgem�� wieder in die bjora s�mpfe l�uft, er dort angekommen sofort wieder schattenform castet und irgendwohin l�uft... nur nicht zur�ck zur jaga mor�ne...
weiss zuf�llig einer wieso er das bei mir macht? ^^

Code:

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_outfile=blub.exe
#AutoIt3Wrapper_UseUpx=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.2.10.0
 Author:         deine mutter

 Script Function:
	Template AutoIt script.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

Opt("WinWaitDelay",100)
Opt("WinTitleMatchMode",4)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
Global $Paused
Global $mousespeed = 4
HotKeySet("{PAUSE}", "TogglePause")
hotkeyset("{F8}", "end")
#include <nomadmemory.au3>
Global $CurrentPosX, $CurrentPosY, $PID, $hprocess, $dll, $Map, $GTime,$Death, $Paused
$dll = DllOpen("gpcomms.dll")
$PID = ProcessExists("Gw.exe")
$hprocess = _MemoryOpen($PID)
$CourseStat =IniRead("setting.ini", "settings", "Course", "0")
Global $memoryx = IniRead("setting.ini", "settings", "memory x", "0")
Global $invslot_x1 = 34
Global $invslot_x2 = 71
Global $invslot_x3 = 106
Global $invslot_x4 = 140
Global $invslot_x5 = 177
Global $invslot_y1 = 543
Global $invslot_y2 = 583
Global $invslot_y3 = 633
Global $invslot_y4 = 683
$gold_color = 0xFFCC55
$runs = 0


func end() ;- ENDE HOTKEY mit F8 beendet ihr das Script
	Exit
EndFunc

Func TogglePause() ;- ENDE HOTKEY mit PAUSE Taste k�nnt ihr den bot Pausieren lassen
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script is "Paused"',0,0)
WEnd
ToolTip("Script is running")
If Not WinActivate("Guild Wars") Then
WinActivate("Guild Wars")
EndIf
Sleep(2000)
EndFunc


func RandomSleep($min, $max)
    $time = Random($min, $max)
    Sleep($time)
endfunc



Func Check_Gold_Item ($x, $y)
	Sleep(Random(200,400))
	$x = $x + Random (-5, 5)
	$y = $y + Random (-5, 5)
	MouseMove ($x, $y)
	$color = Pixelsearch(0,403,249,663, $gold_color, 1)
	If not @error Then
		MouseClick("left", Random(32,36),random(975,980),2)
		RandomSleep(200,300)
		MouseClick("left", $x, $y, 1)
		RandomSleep(1400,1500)
		MouseClickDrag ("left", $x, $y, random(270,300), random(540,600))
	elseif @error Then
		MouseClickDrag ("left", $x, $y, random(270,300), random(540,600))
	EndIf
EndFunc

func gold()
	Check_Gold_Item ($invslot_x1, $invslot_y1) ;01
	Check_Gold_Item ($invslot_x2, $invslot_y1) ;02
	Check_Gold_Item ($invslot_x3, $invslot_y1) ;03
	Check_Gold_Item ($invslot_x4, $invslot_y1) ;04
	Check_Gold_Item ($invslot_x5, $invslot_y1) ;05
	
	Check_Gold_Item ($invslot_x1, $invslot_y2) ;06
	Check_Gold_Item ($invslot_x2, $invslot_y2) ;07
	Check_Gold_Item ($invslot_x3, $invslot_y2) ;08
	Check_Gold_Item ($invslot_x4, $invslot_y2) ;09
	Check_Gold_Item ($invslot_x5, $invslot_y2) ;10
	
	Check_Gold_Item ($invslot_x1, $invslot_y3) ;11
	Check_Gold_Item ($invslot_x2, $invslot_y3) ;12
	Check_Gold_Item ($invslot_x3, $invslot_y3) ;13
	Check_Gold_Item ($invslot_x4, $invslot_y3) ;14
	Check_Gold_Item ($invslot_x5, $invslot_y3) ;15
	
	Check_Gold_Item ($invslot_x1, $invslot_y4) ;16
	Check_Gold_Item ($invslot_x2, $invslot_y4) ;17
	Check_Gold_Item ($invslot_x3, $invslot_y4) ;18
	Check_Gold_Item ($invslot_x4, $invslot_y4) ;19
	Check_Gold_Item ($invslot_x5, $invslot_y4) ;20
EndFunc

func kampf()
	RandomSleep(1000, 1100)
	send("{F1}")
	randomsleep(100,150)
	send("1")
	randomsleep(1300,1400)
	send("2")
	randomsleep(100,130)
	send("3")
	randomsleep(900, 1000)
	send("6")
	randomsleep(1100,1200)
    send("{w down}")
    send("{q down}")
	send("4")
	RandomSleep(3000,3010)
	send("{w up}")
    send("{q up}")
	send("v")
	randomsleep(500, 510)
	send("{space}")
	randomsleep(3000,3100)
	MouseClick("left", 635,535)
	randomsleep(400, 500)
	send("{e down}")
	send("5")
	randomsleep(900, 910)
	send("{e up}")
	send("r")
	randomsleep(5000, 5010)
	send("{d down}")
	randomsleep(950, 960)
	send("{d up}")
	randomsleep(7500, 7510)
	send("{a down}")
	randomsleep(950, 960)
	send("{a up}")
	randomsleep(2000, 2010)
	send("{a down}")
	randomsleep(950, 960)
	send("{a up}")
	randomsleep(1500, 1510)
	send("s")
	randomsleep(2500, 2510)
	send("1")
	randomsleep(1300,1400)
	send("2")
	randomsleep(100,130)
	send("3")
	randomsleep(3500, 3510)
	send("v")
	randomsleep(990, 1000)
	send("8")
	randomsleep(990, 1000)
	
	
	for $i=0 to 30;Anzahl der Wiederholungen
        Send("{space}")
        randomsleep(40, 50)
        Send("{j}")
        randomsleep(40, 50)
    next
	Send("{j}")
	Send("{j}")
	randomsleep(4500,4510)
	For $i=0 to 20
		Send("{�}")
        randomsleep(100, 200)
        Send("{space}")
        randomsleep(100, 200)
	Next
	randomsleep(5000, 6000)
	send("{F2}")
	randomsleep(1000, 1500)
	send("�")
	randomsleep(200,300)
	Send("{space}")
	randomsleep(1300,1400)
	send("5")
	randomsleep(15000,15300)
    EndFunc

func bjora()
	send("�")
	randomsleep(200,300)
	$runs = $runs + 1
	if $runs = 3 Then
		$runs = 0
		gold()
	EndIf
	randomsleep(200,300)
	Send("{space}")
	randomsleep(1300,1400)
	send("5")
	randomsleep(10000,10300)
EndFunc

If Not WinActivate("Guild Wars") Then
WinActivate("Guild Wars")
EndIf
Sleep(6000)

While 1
	kampf()
	bjora()
wend