Thermallquellen Bot (Hardmode)

i4mSoH34Vy · 11/06/2008, 22:46

OMG das muss man beim Botten mit einberechnen -.-

D_S · 11/07/2008, 08:30

Quote:

Originally Posted by spookycloud

Bitte seien Sie vorsichtig mit diesem Bot als mein Konto ist jetzt noch verboten, und ich nur den Bot für 10 Stunden.

stimmt weil die Seite hier es dir auch erlaubt dass du bottest ....

Rastigan · 11/14/2008, 20:13

argggh

i was need format my pc and i lost this bot, anyone can ping me new link for this bot? i dont want play with t3 pls, send me link old bot ^^

exit_Z · 11/14/2008, 21:28

Dark Killerking · 11/15/2008, 17:09

Hey Leute! brauch hilfe! bei mir ist das so ich hab den Bot runtergeladen den von seite 32 glaub und alles so eingestellet aber nun ist das so das der am rand entlang rutscht also nur kurz vor dem Portal er läuft schon ein stück weit aber kurz davor läuft er keine kurve sondern gerade aus weiter und wenn er aus dem portal raus ist farmt er nicht die gruppe gerade aus sondern so ne gruppe links entlang am protal? stimmt das so??
Wie kann ich das ändern das der nicht mehr am Portal entlang rutscht?
Danke im voraus : )

exit_Z · 11/15/2008, 18:49

Beleg doch einfach mal die "Tasten" so wie beschrieben^^ dann sollte es doch funktionieren. So wie du es beschreibst hört sich das mehr an als würde er das Schild nicht anwählen.

Dark Killerking · 11/15/2008, 19:24

...So bin die Tasten durchgegangen aber war alles richtig eingestellt mhmm... das schild visiert er schon an lauft aber kurz vor dem tor gegen die wand und rutscht raus -_-

exit_Z · 11/15/2008, 19:30

Q/E seitlich drehen
A/D seitlich gehen

??

Dark Killerking · 11/15/2008, 21:05

Hab alles richtig eingestellt aber geht ned läuft trotzdem so komisch -_-

Dark Killerking · 11/15/2008, 21:29

gehts bei dir??
@ exit_Z

exit_Z · 11/15/2008, 21:31

Ja der geht bei mir.

Dark Killerking · 11/15/2008, 21:35

mhmm... is komisch vieleicht liegts am Bot weil ich hab alles richtig eingestellt -_- könnest du mal deinen posten pls ?

exit_Z · 11/15/2008, 22:01

Source

Code:

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=..\BoneBot v2.0\Data\icon\favicon(3).ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#cs################################################################################################
	
	- Autor: BlackWorkX -
	- Project Name: GuildWars FarmBots - BoneBot version2b -
	- Edit: 02.06.2008 Berlin / Germany -
	- Copyrigth: (c)BlackWorkX 2007 GuildWars Tools -
	
									Warning do not delet the copyrigths or the header of this Bot!	
#ce################################################################################################
TrayTip("GuildWars - FarmBots", "Regelmäßige Updates für die FarmBots" & @CRLF & "Kostengünstige Update gebühr auf neuere Versionen" & @CRLF & "Sehr gute Anti- Detection in GuildWars" & @CRLF & "" & @CRLF & "Für mehr Infos zum Bot )", 11, 1)
SplashImageOn("1", @ScriptDir & "\data\laden1.jpg", 200, 200, -1, -1, 17)
sleep(300)
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", WinGetHandle("1"), "int", 900, "long", 0x00090000);fade-out
SplashOff()
SplashImageOn("2", @ScriptDir & "\data\laden2.jpg", 200, 200, -1, -1, 17)
sleep(300)
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", WinGetHandle("2"), "int", 900, "long", 0x00090000);fade-out
SplashOff()
SplashImageOn("Splash Screen", @ScriptDir & "\data\laden3.jpg", 200, 200, -1, -1, 17)
Sleep(2500)
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", WinGetHandle("Splash Screen"), "int", 2000, "long", 0x00090000);fade-out
SplashOff();>Start Up Loading Screen

#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\BlackSun\Desktop\Form3.kxf
$Form3 = GUICreate("Guild Wars FarmBots - BoneBot v2b", 578, 520, -1, -1)
GUISetFont(8, 400, 0, "Verdana")
GUISetBkColor(0xFFFFFF)
$Group1 = GUICtrlCreateGroup("Bot Funktionen", 8, 0, 313, 201)
$Radio1 = GUICtrlCreateRadio("Farmen in Thermalquellen von Bergen", 32, 16, 257, 17)
GUICtrlSetState(-1, $GUI_CHECKED)
$Checkbox1 = GUICtrlCreateCheckbox("Automatisch Hardmode Check", 32, 48, 209, 17)
GUICtrlSetState(-1, $GUI_CHECKED)
$Checkbox2 = GUICtrlCreateCheckbox("Identifizieren und Verkaufen", 32, 72, 201, 17)
GUICtrlSetState(-1, $GUI_CHECKED)
$Checkbox3 = GUICtrlCreateCheckbox("Keine Goldenen Items Identifizieren", 32, 96, 241, 17)
$Checkbox4 = GUICtrlCreateCheckbox("Pause in der Gildenhalle", 32, 128, 153, 17)
$Checkbox5 = GUICtrlCreateCheckbox("Pause in Löwenstein", 32, 152, 137, 17)
$Checkbox6 = GUICtrlCreateCheckbox("Pausen mit Emotion", 32, 176, 145, 17)
$Label4 = GUICtrlCreateLabel("Runden", 240, 144, 47, 17)
$Input4 = GUICtrlCreateInput("14", 232, 168, 65, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Automatischer Account Login", 8, 208, 313, 161)
$Checkbox7 = GUICtrlCreateCheckbox("Auto Account Login", 32, 240, 161, 17)
$Input1 = GUICtrlCreateInput("", 112, 272, 169, 21)
$Label1 = GUICtrlCreateLabel("Login eM@il", 32, 280, 70, 17)
$Input2 = GUICtrlCreateInput("passwort", 112, 304, 169, 21, BitOR($ES_PASSWORD,$ES_AUTOHSCROLL))
$Label2 = GUICtrlCreateLabel("Passwort", 32, 312, 55, 17)
$Input3 = GUICtrlCreateInput("C:\Programme\GUILD WARS\Gw.exe", 112, 336, 185, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label3 = GUICtrlCreateLabel("Gw.exe Pfad", 32, 344, 76, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup("Extra Einstellungen", 8, 376, 313, 113)
$Label5 = GUICtrlCreateLabel("Login Zeit", 192, 400, 60, 17)
$Input5 = GUICtrlCreateInput("20000", 256, 392, 57, 21)
$Input6 = GUICtrlCreateInput("12000", 256, 424, 57, 21)
$Label6 = GUICtrlCreateLabel("Lade Zeit", 192, 432, 57, 17)
$Label7 = GUICtrlCreateLabel("Emotion1", 16, 400, 57, 17)
$Input7 = GUICtrlCreateInput("/dance", 88, 392, 65, 21)
$Label8 = GUICtrlCreateLabel("Emotion2", 16, 432, 57, 17)
$Input8 = GUICtrlCreateInput("/laugh", 88, 424, 65, 21)
$Label9 = GUICtrlCreateLabel("Emotion3", 16, 464, 57, 17)
$Input9 = GUICtrlCreateInput("/sit", 88, 456, 65, 21)
$Label18 = GUICtrlCreateLabel("Pause Zeit", 192, 464, 64, 17)
$Input17 = GUICtrlCreateInput("110000", 256, 456, 57, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group4 = GUICtrlCreateGroup("Koordinaten X/Y", 328, 128, 241, 249)
$Label10 = GUICtrlCreateLabel("Hardmode Button", 344, 152, 104, 17)
$Input10 = GUICtrlCreateInput("777, 64", 496, 144, 57, 21)
$Label11 = GUICtrlCreateLabel("Gildenhallen Button", 344, 184, 115, 17)
$Input11 = GUICtrlCreateInput("897, 86", 496, 176, 57, 21)
$Label12 = GUICtrlCreateLabel("Verkaufen -Oben- Button", 344, 216, 148, 17)
$Input12 = GUICtrlCreateInput("797, 711", 496, 208, 57, 21)
$Label13 = GUICtrlCreateLabel("Verkaufen -Unten- Button", 344, 248, 151, 17)
$Input13 = GUICtrlCreateInput("585, 57", 496, 240, 57, 21)
$Label15 = GUICtrlCreateLabel("GiveUp  Button", 344, 280, 90, 17)
$Input14 = GUICtrlCreateInput("512, 413", 496, 272, 57, 21)
$Label16 = GUICtrlCreateLabel("Truhen Slot 1", 344, 312, 81, 17)
$Label17 = GUICtrlCreateLabel("Truhen Slot 2", 344, 344, 81, 17)
$Input15 = GUICtrlCreateInput("816, 431", 496, 304, 57, 21)
$Input16 = GUICtrlCreateInput("754, 431", 496, 336, 57, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("Start Bot", 328, 432, 243, 42, 0)
$Button2 = GUICtrlCreateButton("ObjecktMapper Tool", 328, 384, 243, 42, 0)
$Pic1 = GUICtrlCreatePic(@ScriptDir & "\data\header2.jpg", 328, 8, 241, 113, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Label14 = GUICtrlCreateLabel("(c)BlackWorkX´s 2007-FarmBots", 384, 480, 193, 17)
$MenuItem1 = GUICtrlCreateMenu("&Hauptmenü")
$MenuItem2 = GUICtrlCreateMenuItem("Speichern...", $MenuItem1)
$MenuItem3 = GUICtrlCreateMenuItem("Laden", $MenuItem1)
$MenuItem4 = GUICtrlCreateMenuItem("GuildWars Trader Tool", $MenuItem1)
$MenuItem5 = GUICtrlCreateMenuItem("", $MenuItem1)
$MenuItem16 = GUICtrlCreateMenuItem("Beenden", $MenuItem1)
$MenuItem6 = GUICtrlCreateMenu("&Einstellungen")
$MenuItem7 = GUICtrlCreateMenu("GuildWars Einstellungen", $MenuItem6)
$MenuItem11 = GUICtrlCreateMenuItem("GuildWars Tastenbelegungen", $MenuItem7)
$MenuItem12 = GUICtrlCreateMenuItem("GuildWars Interface Grafik", $MenuItem7)
$MenuItem13 = GUICtrlCreateMenuItem("GuildWars Skillcode", $MenuItem7)
$MenuItem10 = GUICtrlCreateMenu("BoneBot Einstellungen", $MenuItem6)
$MenuItem14 = GUICtrlCreateMenuItem("BoneBot Hotkeys", $MenuItem10)
$MenuItem15 = GUICtrlCreateMenuItem("ObjecktMapper Tool", $MenuItem10)
$MenuItem8 = GUICtrlCreateMenu("Ü&ber")
$MenuItem9 = GUICtrlCreateMenuItem("Über FarmBots Programme", $MenuItem8)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Opt("SendKeyDelay", 77)
_laden()

Dim $iii, $ii, $i
Dim $xyOben = StringSplit(GUICtrlRead($Input12), ",") , $xyUnten = StringSplit(GUICtrlRead($Input13), ",")
Dim $xytruhe1 = StringSplit(GUICtrlRead($Input15), ","), $xytruhe2 = StringSplit(GUICtrlRead($Input16), ",") , $xygiveup = StringSplit(GUICtrlRead($Input14), ",")
Dim $hardxy = StringSplit(GUICtrlRead($Input10), ","), $xyghall = StringSplit(GUICtrlRead($Input11), ",")
Dim $xybook1 = GUICtrlSetData(112, 501) , $xybook2 = GUICtrlSetData(168, 510) , $xybook3 = GUICtrlSetData(222, 508)
Dim $pause = GUICtrlRead($Input17), $login = GUICtrlRead($Input5), $laden = GUICtrlRead($Input6)
Dim $emo1 = GUICtrlRead($Input7), $emo2 = GUICtrlRead($Input8), $emo3 = GUICtrlRead($Input8), $exist = ProcessExists("gw.exe")
Dim $email = GUICtrlRead($Input1), $pass = GUICtrlRead($Input2), $exe = GUICtrlRead($Input3) , $runden = GUICtrlRead($Input4)
Dim $PAUSED, $alogin = False, $gold = False, $farm = False, $sellident = False, $pgh = False, $pla = False, $pemo = False, $mode = False

HotKeySet("{F1}", "_start")
HotKeySet("{F2}", "_break")
HotKeySet("{F3}", "_laden")
HotKeySet("{F4}", "_speichern")
HotKeySet("{F5}", "_about")
HotKeySet("{F6}", "_gwtaste")
HotKeySet("{F7}", "_objeckt")
HotKeySet("{F8}", "_exit")

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1;starten
			_start()
		Case $Button2;objecktTool	
			_Objeckt()	
		Case $MenuItem2;Speichern
			_speichern()
		Case $MenuItem3;Laden
			_laden()
		Case $MenuItem4;TraderTool
			_tradeTool()
		Case $MenuItem16;close
			_exit()
		Case $MenuItem11;GWTASTEN
			_gwTaste()
		Case $MenuItem12;GWGrafik
			_gwgraka()
		Case $MenuItem13;Skillcode
			_skillcode()
		Case $MenuItem14;BotHotkeys
			_hotkey()
		Case $MenuItem15;ObjecktMapper
			_objeckt()
		Case $MenuItem9;About
			_about()
		Sleep(13)
	EndSwitch
WEnd

Func _break()
	$PAUSED = Not $PAUSED
	While $PAUSED
		Sleep(100)
		ToolTip('Pause mit F2, beenden sie die Pause"', 0, 0)
	WEnd
	ToolTip("Pause beendet!")
	If Not WinActivate("Guild Wars") Then
		WinActivate("Guild Wars")
	EndIf
	Sleep(2000)
EndFunc   ;==>_break

func _exit()
	DllCall("user32.dll", "int", "AnimateWindow", "hwnd", WinGetHandle("Guild Wars FarmBots - BoneBot v2b"), "int", 3000, "long", 0x00090000)
	Exit
EndFunc;->Beenden

Func _about()
	Run(@ScriptDir & "\data\about.exe")
EndFunc;->about

Func _gwTaste()
	MsgBox("GuildWars Keys", "GuildWars Keys", "Nummernblock 1 -> Nächstbefindlichen Verbündeten anwählen" & @CRLF & "Nummernblock 2 -> Gilde Öffnen" & @CRLF & "Nummernblock 3 -> Sich selbst Anvisieren" & @CRLF & "Nummernblock 4 -> Fertigkeiten und Attribute öffnen" & @CRLF & "Nummernblock 5 -> Weltkarte öffnen" & @CRLF & "Nummernblock 6 -> Alle Taschen öffnen" & @CRLF & "Nummernblock 7 -> Gegenstand fallen lassen" & @CRLF & "Nummernblock 8 -> Nächsten Gegenstand" & @CRLF & "Nummernblock 9 -> Nächsten befindlichen Gegener" & @CRLF & "" & @CRLF & "Bindestrich ( - ) -> Chatbefehl beginnen" & @CRLF & "ENTER -> Chat öffnen" & @CRLF & "Leertaste/Space -> Aktion / Ausführen" & @CRLF & "TAB-> Nächsten Gegener" & @CRLF & "" & @CRLF & "W -> Vorwärts gehen" & @CRLF & "S -> Rückwärts gehen" & @CRLF & "A -> Nach Links drehen" & @CRLF & "D -> Nach Rechts drehen" & @CRLF & "Q -> Seitlich nach Links laufen" & @CRLF & "D -> Seitlich nach Rechts laufen")
EndFunc;->gwkeys

Func _hotkey()
	MsgBox("BoneBot Hotkeys", "BoneBot version 3 - Hotkeys", "F1 zum Starten des Bots" & @CRLF & "F2 zum Pausieren des Bots" & @CRLF & "F3 zum Laden der Einstellungen" & @CRLF & "F4 zum Speichern der Einstellungen" & @CRLF & "F5 Informationen über den BoneBot" & @CRLF & "F6 Informationen zu den Skillcodes" & @CRLF & "F7 zum Starten des Tools ObjecktMapper" & @CRLF & "F8 zum Beenden des Bots")
	TrayTip("BoneBot version 3 - Hotkeys", "F1 zum Starten des Bots" & @CRLF & "F2 zum Pausieren des Bots" & @CRLF & "F3 zum Laden der Einstellungen" & @CRLF & "F4 zum Speichern der Einstellungen" & @CRLF & "F5 Informationen über den BoneBot" & @CRLF & "F6 Informationen zu den Skillcodes" & @CRLF & "F7 zum Starten des Tools ObjecktMapper" & @CRLF & "F8 zum Beenden des Bots", 11, 1)
EndFunc;->hotkey

func _laden()
	GUICtrlSetState($Radio1, IniRead("bot-save.ini", "radio", "1", $GUI_CHECKED))
	GUICtrlSetState($Checkbox1, IniRead("bot-save.ini", "checkbox", "1", $GUI_CHECKED))
	GUICtrlSetState($Checkbox2, IniRead("bot-save.ini", "checkbox", "2", $GUI_CHECKED))
	GUICtrlSetState($Checkbox3, IniRead("bot-save.ini", "checkbox", "3", $GUI_UNCHECKED))
	GUICtrlSetState($Checkbox4, IniRead("bot-save.ini", "checkbox", "4", $GUI_UNCHECKED))
	GUICtrlSetState($Checkbox5, IniRead("bot-save.ini", "checkbox", "5", $GUI_UNCHECKED))
	GUICtrlSetState($Checkbox6, IniRead("bot-save.ini", "checkbox", "6", $GUI_UNCHECKED))
	GUICtrlSetState($Checkbox7, IniRead("bot-save.ini", "checkbox", "7", $GUI_UNCHECKED))
	GUICtrlSetData($Input1, IniRead("bot-save.ini", "input", "1", ""))
	GUICtrlSetData($Input2, IniRead("bot-save.ini", "input", "2", "password"))
	GUICtrlSetData($Input3, IniRead("bot-save.ini", "input", "3", "C:\Programme\GUILD WARS\Gw.exe"))
	GUICtrlSetData($Input4, IniRead("bot-save.ini", "input", "4", "14"))
	GUICtrlSetData($Input5, IniRead("bot-save.ini", "input", "5", "20000"))
	GUICtrlSetData($Input6, IniRead("bot-save.ini", "input", "6", "12000"))
	GUICtrlSetData($Input7, IniRead("bot-save.ini", "input", "7", "/dance"))
	GUICtrlSetData($Input8, IniRead("bot-save.ini", "input", "8", "/laugh"))
	GUICtrlSetData($Input9, IniRead("bot-save.ini", "input", "9", "/sit"))
	GUICtrlSetData($Input10, IniRead("bot-save.ini", "input", "10", "777, 64"))
	GUICtrlSetData($Input11, IniRead("bot-save.ini", "input", "11", "897, 86"))
	GUICtrlSetData($Input12, IniRead("bot-save.ini", "input", "12", "797, 711"))
	GUICtrlSetData($Input13, IniRead("bot-save.ini", "input", "13", "585, 57"))
	GUICtrlSetData($Input14, IniRead("bot-save.ini", "input", "14", "512, 413"))
	GUICtrlSetData($Input15, IniRead("bot-save.ini", "input", "15", "816, 431"))
	GUICtrlSetData($Input16, IniRead("bot-save.ini", "input", "16", "754, 431"))
	GUICtrlSetData($Input17, IniRead("bot-save.ini", "input", "17", "110000"))	
EndFunc;->laden

func _speichern()
	IniWrite("bot-save.ini", "input", "1", GUICtrlRead($Input1))
	IniWrite("bot-save.ini", "input", "2", GUICtrlRead($Input2))
	IniWrite("bot-save.ini", "input", "3", GUICtrlRead($Input3))
	IniWrite("bot-save.ini", "input", "4", GUICtrlRead($Input4))
	IniWrite("bot-save.ini", "input", "5", GUICtrlRead($Input5))
	IniWrite("bot-save.ini", "input", "6", GUICtrlRead($Input6))
	IniWrite("bot-save.ini", "input", "7", GUICtrlRead($Input7))
	IniWrite("bot-save.ini", "input", "8", GUICtrlRead($Input8))
	IniWrite("bot-save.ini", "input", "9", GUICtrlRead($Input9))
	IniWrite("bot-save.ini", "input", "10", GUICtrlRead($Input10))
	IniWrite("bot-save.ini", "input", "11", GUICtrlRead($Input11))
	IniWrite("bot-save.ini", "input", "12", GUICtrlRead($Input12))
	IniWrite("bot-save.ini", "input", "13", GUICtrlRead($Input13))
	IniWrite("bot-save.ini", "input", "14", GUICtrlRead($Input14))
	IniWrite("bot-save.ini", "input", "15", GUICtrlRead($Input15))
	IniWrite("bot-save.ini", "input", "16", GUICtrlRead($Input16))
	IniWrite("bot-save.ini", "input", "17", GUICtrlRead($Input17))
	IniWrite("bot-save.ini", "radio", "1", GUICtrlRead($Radio1))
	IniWrite("bot-save.ini", "checkbox", "1", GUICtrlRead($Checkbox1))
	IniWrite("bot-save.ini", "checkbox", "2", GUICtrlRead($Checkbox2))
	IniWrite("bot-save.ini", "checkbox", "3", GUICtrlRead($Checkbox3))
	IniWrite("bot-save.ini", "checkbox", "4", GUICtrlRead($Checkbox4))
	IniWrite("bot-save.ini", "checkbox", "5", GUICtrlRead($Checkbox5))
	IniWrite("bot-save.ini", "checkbox", "6", GUICtrlRead($Checkbox6))
	IniWrite("bot-save.ini", "checkbox", "7", GUICtrlRead($Checkbox7))
EndFunc;->speichern

func _skillcode()
	InputBox("SkillCode", "Skillcode für Thermalquellen von Bergen im Hardmode"&@CRLF&"55 Lebenspunkte Mönch", "OwAU0K3+S4F1DkGMl/DgiUeA")
EndFunc;->skillcode

func _objeckt()
	Run(@ScriptDir & "\ObjectMapper\ObjectMapper.exe")
EndFunc;->objecktmapper

func _tradeTool()
	Run(@ScriptDir & "\GW-TradeTool.exe")
EndFunc;->tradetool

func _gwgraka()
	MsgBox(0, "GuildWars Interface Grafik", "Auflösung ->  1024x768"&@CRLF&"Interface Größe ->  Größer"&@CRLF&"Interface Einstellung -> Standart")
EndFunc;->grafikInfo

Func _random_verkaufen()
If Random(1, 2, 1) = 1 Then
	_verkaufWeg1()
Else
	_verkaufWeg2()
EndIf
EndFunc   ;==>_sellTQ_rand

Func _random_zumKampf()
If Random(1, 2, 1) = 1 Then
	_wegKampf1()
Else
	_wegKampf2()
EndIf
EndFunc   ;==>_wayRand

Func _random_Distrikt()
If Random(1, 2, 1) = 1 Then
	_Ami()
Else
	_Asia()
EndIf
EndFunc   ;==>_disRand

Func RandomSleep($MIN, $MAX)
	Sleep(Random($MIN, $MAX))
EndFunc   ;==>RandomSleep

Func _Ami()
	MouseClick("left", 310, 24)
	RandomSleep(600, 800)
	MouseClick("left", 137, 100)
	RandomSleep(600, 800)
	MouseClick("left", 355, 358)
	RandomSleep(600, 800)
	MouseClick("left", 357, 384)
	RandomSleep(600, 800)
	MouseClick("left", 466, 402)
	RandomSleep(600, 800)
	Send("j")
EndFunc   ;==>_disAmi

Func _Asia()
	MouseClick("left", 310, 24)
	RandomSleep(600, 800)
	MouseClick("left", 112, 105)
	RandomSleep(600, 800)
	MouseClick("left", 385, 348)
	RandomSleep(600, 800)
	MouseClick("left", 373, 423)
	RandomSleep(600, 800)
	MouseClick("left", 514, 397)
	RandomSleep(600, 800)
	Send("j")
EndFunc   ;==>_disAsia

Func _Inter()
	MouseClick("left", 310, 24)
	RandomSleep(500, 600)
	MouseClick("left", 209, 105)
	RandomSleep(500, 600)
	MouseClick("left", 329, 355)
	RandomSleep(500, 600)
	MouseClick("left", 332, 435)
	RandomSleep(500, 600)
	MouseClick("left", 561, 397)
	Send("j")
EndFunc   ;==>_disInter

Func _verkaufen()
	MouseClick("left", $xyoben[1], $xyoben[2])
	RandomSleep(1000, 1100)
	For $iii = 1 To 20
		MouseClick("left", $xyunten[1], $xyunten[2])
		RandomSleep(800, 1000)
	Next
	RandomSleep(800, 1000)
	Send("{ESC}")
	RandomSleep(800, 1000)
EndFunc   ;==>_sellALG

Func _verkaufWeg1()
	Send("{a down}")
	RandomSleep(1000, 1100)
	Send("{a up}")
	RandomSleep(2000, 2100)
	Send("{w down}")
	RandomSleep(3700, 3950)
	Send("{d down}")
	RandomSleep(1100, 1200)
	Send("{d up}")
	RandomSleep(1300, 1500)
	Send("{w up}")
	RandomSleep(1, 2)
	Send("{NUMPAD1}")
	RandomSleep(1, 2)
	Send("{SPACE}")
	RandomSleep(7000, 8000)
EndFunc   ;==>_sellTQ1

Func _verkaufWeg2()
	Send("{a down}")
	RandomSleep(700, 800)
	Send("{a up}")
	RandomSleep(2000, 2100)
	Send("{w down}")
	RandomSleep(2700, 2900)
	Send("{w up}")
	RandomSleep(1, 2)
	Send("{NUMPAD1}")
	RandomSleep(1, 2)
	Send("{SPACE}")
	RandomSleep(7000, 8000)
EndFunc   ;==>_sellTQ3

Func _goldItems()
	$pixCordgold = PixelSearch(1, 1, 805, 346, 0xffcc55, 1, 2)
	If Not @error Then MouseDown("left")
EndFunc   ;==>_goldItems

Func _giveup()
	Send("{ENTER}")
	RandomSleep(1150, 1200)
	Send("/giveup", 1)
	RandomSleep(1150, 1200)
	Send("{ENTER}")
	RandomSleep(3500, 3700)
	MouseClick("left", $xygiveup[1], $xygiveup[2])
EndFunc   ;==>_giveup

Func _hardmode()
		RandomSleep(750, 1350)
		MouseClick("left", $hardxy[1], $hardxy[2])
		RandomSleep(750, 1350)
EndFunc   ;==>_hardmode

Func _wegKampf1()
	Send("{NUMPAD8}")
	RandomSleep(1000, 1200)
	Send("{SPACE}")
	RandomSleep(9000, 9100)
	Send("{w down}")
	RandomSleep(2300, 2310)
	Send("{d down}")
	RandomSleep(880, 910)
	Send("{d up}")
	RandomSleep(4000, 4030)
	Send("{w up}")
EndFunc   ;==>_tqwayto1

Func _wegKampf2()
	Send("{w down}")
	Sleep(4000)
	Send("{w up}")
	Send("{NUMPAD8}")
	Send("{SPACE}")
	RandomSleep(5000, 5100)
	Send("{w down}")
	RandomSleep(2200, 2410)
	Send("{e down}")
	RandomSleep(300, 500)
	Send("{e up}")
	Send("{d down}")
	RandomSleep(680, 710)
	Send("{d up}")
	RandomSleep(4000, 4030)
	Send("{w up}")
EndFunc   ;==>_tqwayto2

Func _TQfigth()
	Send("8")
	RandomSleep(6500, 7000)
	Send("7")
	RandomSleep(6500, 7000)
	Send("6")
	RandomSleep(6500, 7000)
	Send("5")
	RandomSleep(3000, 3500)
	Send("4")
	RandomSleep(12000, 13000)
	Send("1")
	RandomSleep(700, 800)
	Send("4")
	RandomSleep(2500, 2510)
	Send("{w down}")
	RandomSleep(3000, 3010)
	Send("{w up}")
	RandomSleep(1000, 1010)
	Send("{e down}")
	RandomSleep(2000, 2010)
	Send("{e up}")
	RandomSleep(500, 510)
	Send("1")
	RandomSleep(700, 710)
	Send("2")
	RandomSleep(1200, 1300)
	Send("{w down}")
	RandomSleep(6700, 6750)
	Send("{w up}")
	RandomSleep(90, 100)
	Send("2")
	RandomSleep(1000, 1100)
	Send("{q down}")
	RandomSleep(2600, 2700)
	Send("{q up}")
	RandomSleep(100, 110)
	Send("1")
	RandomSleep(600, 700)
	Send("{q down}")
	RandomSleep(2600, 2700)
	Send("{q up}")
	RandomSleep(200, 400)
	Send("2")
	RandomSleep(1500, 1600)
	Send("4")
	RandomSleep(2000, 2010)
	Send("1")
	RandomSleep(2000, 2010)
	Send("3")
	RandomSleep(3000, 3100)
	Send("2")
	RandomSleep(3000, 3100)
	Send("1")
	RandomSleep(3000, 3100)
	Send("2")
	RandomSleep(3000, 3100)
	Send("1")
	RandomSleep(1500, 1600)
	Send("4")
	RandomSleep(3000, 3100)
	Send("2")
	RandomSleep(3000, 3100)
	Send("1")
	RandomSleep(3000, 3100)
EndFunc   ;==>_TQfigth

Func _lootTQ()
	For $ii = 1 To 5
		RandomSleep(1100, 1200)
		Send("{NUMPAD8}")
		RandomSleep(1100, 1200)
		Send("{SPACE}")
		RandomSleep(3200, 3300)
	Next
	Send("1")
	RandomSleep(2000, 2010)
	Send("2")
	RandomSleep(1400, 1500)
	Send("{NUMPAD8}")
	RandomSleep(1100, 1200)
	Send("{SPACE}")
	RandomSleep(3500, 3800)
EndFunc   ;==>_lootTQ

Func _ident()
	Send("{NUMPAD6}")
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook1, 2)
	RandomSleep(800, 900)	
	MouseClick("left", 50, 109);slot1
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook2, 2)
	RandomSleep(800, 900)
	MouseClick("left", 100, 109);slot2
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook3, 2)
	RandomSleep(800, 900)
	MouseClick("left", 150, 109);slot3
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook3, 2)
	RandomSleep(800, 900)
	MouseClick("left", 200, 109);slot4
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook2, 2)
	RandomSleep(800, 900)
	MouseClick("left", 250, 109);slot5
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook1, 2)
	RandomSleep(800, 900)
	MouseClick("left", 50, 175);slot6
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook1, 2)
	RandomSleep(800, 900)
	MouseClick("left", 100, 175);slot7
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook2, 2)
	RandomSleep(800, 900)
	MouseClick("left", 150, 175);slot8
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook3, 2)
	RandomSleep(800, 900)
	MouseClick("left", 200, 175);slot9
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook3, 2)
	RandomSleep(800, 900)
	MouseClick("left", 250, 175);slot10
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook2, 2)
	RandomSleep(800, 900)
	MouseClick("left", 50, 242);slot11
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook1, 2)
	RandomSleep(800, 900)
	MouseClick("left", 100, 242);slot12
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook1, 2)
	RandomSleep(800, 900)
	MouseClick("left", 150, 242);slot13
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook2, 2)
	RandomSleep(800, 900)
	MouseClick("left", 200, 242);slot14
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook3, 2)
	RandomSleep(800, 900)
	MouseClick("left", 250, 242);slot15
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook3, 2)
	RandomSleep(800, 900)
	MouseClick("left", 50, 306);slot16
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook2, 2)
	RandomSleep(800, 900)
	MouseClick("left", 50, 306);slot17
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook1, 2)
	RandomSleep(800, 900)
	MouseClick("left", 100, 306);slot18
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook1, 2)
	RandomSleep(800, 900)
	MouseClick("left", 150, 306);slot19
	RandomSleep(1000, 1100)
	MouseClick("left", $xybook2, 2)
	RandomSleep(800, 900)
	MouseClick("left", 200, 306);slot20
	RandomSleep(1000, 1100)
	Send("{ESC}")
	RandomSleep(1000, 1100)
EndFunc   ;==>_ident

Func _storage()
	Send("{a down}")
	RandomSleep(1600, 1650)
	Send("{a up}")
	Send("{w down}")
	RandomSleep(3500, 3600)
	Send("{w up}")
	Send("{NUMPAD1}")
	Send("{SPACE}")
	RandomSleep(1800, 1900)
	Send("{NUMPAD6}")
	RandomSleep(500, 575)
	MouseMove(50, 109)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe1[1], $xytruhe1[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(100, 109)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe1[1], $xytruhe1[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(159, 109)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe1[1], $xytruhe1[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(215, 109)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe2[1], $xytruhe2[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(268, 109)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe2[1], $xytruhe2[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(50, 175)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe2[1], $xytruhe2[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(100, 175)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe2[1], $xytruhe2[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(159, 175)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe1[1], $xytruhe1[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(215, 175)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe2[1], $xytruhe2[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(268, 175)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe1[1], $xytruhe1[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(50, 242)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe2[1], $xytruhe2[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(100, 242)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe2[1], $xytruhe2[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(159, 242)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe1[1], $xytruhe1[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(215, 242)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe2[1], $xytruhe2[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(268, 242)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe1[1], $xytruhe1[2])
	MouseUp("left")
	;----Reihe 4------;
	RandomSleep(500, 575)
	MouseMove(50, 306)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe2[1], $xytruhe2[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(100, 306)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe1[1], $xytruhe1[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(159, 306)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe1[1], $xytruhe1[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(215, 306)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe1[1], $xytruhe1[2])
	MouseUp("left")
	RandomSleep(500, 575)
	MouseMove(268, 306)
	RandomSleep(500, 575)
	_goldItems()
	RandomSleep(500, 575)
	MouseMove($xytruhe2[1], $xytruhe2[2])
	MouseUp("left")
	RandomSleep(1800, 1900)
	Send("{ESC}")
	RandomSleep(1800, 1900)
	Send("{ESC}")
EndFunc   ;==>_storage

Func _breakGH()
	Send("{NUMPAD2}")
	RandomSleep(1000, 1400)
	MouseClick("left", $xyghall[1], $xyghall[2])
	Sleep($laden)
	Send("{ESC}")
	RandomSleep(1000, 1400)
	Send("{w down}")
	RandomSleep(2400, 2900)
	Send("{a down}")
	RandomSleep(1200, 1300)
	Send("{a up}")
	RandomSleep(100, 600)
	Send("{w up}")
	Sleep($pause)
	Send("{NUMPAD2}")
	RandomSleep(1000, 1400)
	MouseClick("left", $xyghall[1], $xyghall[2])
	Sleep($laden)
	Send("{ESC}")
EndFunc   ;==>_breakGH

Func _breakGH2()
	Send("{NUMPAD2}")
	RandomSleep(1000, 1400)
	MouseClick("left", $xyghall[1], $xyghall[2])
	Sleep($laden)
	Send("{ESC}")
	RandomSleep(1000, 1400)
	Send("{w down}")
	RandomSleep(2400, 2900)
	Send("{a down}")
	RandomSleep(1200, 1300)
	Send("{a up}")
	RandomSleep(100, 600)
	Send("{w up}")
	RandomSleep(1200, 1300)
	_emotion()
	Sleep($pause)
	Send("{NUMPAD2}")
	RandomSleep(1000, 1400)
	MouseClick("left", $xyghall[1], $xyghall[2])
	Sleep($laden)
	Send("{ESC}")
EndFunc   ;==>_breakGH2

Func _breakLA()
	Send("{NUMPAD5}")
	RandomSleep(1000, 1400)
	MouseClick("left", 0, 767)
	RandomSleep(1000, 1400)
	MouseClick("left", 507, 386)
	RandomSleep(1000, 1400)
	MouseClick("left", 410, 499, 2)
	Sleep($laden)
	Send("{ENTER}")
	RandomSleep(500, 700)
	Send("WTS: Globes of Ektoplasm for 5,3k / each || wisp me ||  na = nt (no answer = no thx ||", 1)
	RandomSleep(1500, 1600)
	Send("{ENTER}")
	Sleep($pause)
EndFunc   ;==>_breakLA

Func _breakLA2()
	Send("{NUMPAD5}")
	RandomSleep(1000, 1400)
	MouseClick("left", 0, 767)
	RandomSleep(1000, 1400)
	MouseClick("left", 507, 386)
	RandomSleep(1000, 1400)
	MouseClick("left", 410, 499, 2)
	Sleep($laden)
	_emotion()
	Sleep($pause)
EndFunc   ;==>_breakLA2

func _sleeptimer()
	Sleep($laden)
EndFunc

Func _emotion()
	Send("{ENTER}")
	RandomSleep(1400, 1500)
	Send($emo1, 1)
	RandomSleep(1400, 1500)
	Send("{ENTER}")
	Sleep($pause)
	Send("{ENTER}")
	RandomSleep(1400, 1500)
	Send($emo2, 1)
	RandomSleep(1400, 1500)
	Send("{ENTER}")
	Sleep($pause)
	Send("{ENTER}")
	RandomSleep(1400, 1500)
	Send($emo3, 1)
	RandomSleep(1400, 1500)
	Send("{ENTER}")
	Sleep($pause)
	Send("{ENTER}")
	RandomSleep(1400, 1500)
	Send($emo1, 1)
	RandomSleep(1400, 1500)
	Send("{ENTER}")
	Sleep($pause)
EndFunc   ;==>_emotion

Func _autologin()
		MouseClick("left",226, 318)
		RandomSleep(2000, 2500)
		Send($email, 1)
		RandomSleep(2000, 2500)
		MouseClick("left", 144, 383)
		RandomSleep(2000, 2500)
		Send($pass, 1)
		RandomSleep(2000, 2500)
		MouseClick("left", 377, 385)
		RandomSleep(3000, 5500)
		MouseClick("left", 609, 740)
EndFunc

func _start()
	If $exist = 0 Then
		Run($exe)
		Sleep($login)
	Else
		WinActivate("Guild Wars")
		Sleep($login)
	EndIf

	$STATE = GUICtrlRead($Radio1)
	If $STATE = 1 Then
		$farm = True
	Else
		$farm = False
	EndIf
	
	$STATE = GUICtrlRead($Checkbox1)
	If $STATE = 1 Then
		$mode = True
	Else
		$mode = False
	EndIf
	
	$STATE = GUICtrlRead($Checkbox2)
	If $STATE = 1 Then
		$sellident = True
	Else
		$sellident = False
	EndIf
	
	$STATE = GUICtrlRead($Checkbox3)
	If $STATE = 1 Then
		$gold = True
	Else
		$gold = False
	EndIf
	
	$STATE = GUICtrlRead($Checkbox4)
	If $STATE = 1 Then
		$pGH = True
	Else
		$pGH = False
	EndIf

	$STATE = GUICtrlRead($Checkbox5)
	If $STATE = 1 Then
		$pLA = True
	Else
		$pLA = False
	EndIf
	
	$STATE = GUICtrlRead($Checkbox6)
	If $STATE = 1 Then
		$pEmo = True
	Else
		$pEmo = False
	EndIf

	$STATE = GUICtrlRead($Checkbox7)
	If $STATE = 1 Then
		$alogin = True
	Else
		$alogin = False
	EndIf
	
	Select		
		case $alogin = true
			_autologin()
			_sleeptimer()
			
		
		case $mode = True
			_hardmode()
			
		While 1
			For $i = 1 to $runden
				_random_zumKampf()
				_sleeptimer()
				_TQfigth()
				_lootTQ()
				_giveup()
				_sleeptimer()
			Next
			
			Select
				Case $gold = True and $sellident = False
					_storage()
					_inter()
					_sleeptimer()
					_random_Distrikt()
					_sleeptimer()
					
				Case $gold and $sellident = True
					_storage()
					_ident()
					_inter()
					_sleeptimer()
					_random_verkaufen()
					_verkaufen()
					randomSleep(1000, 2000)
					_random_Distrikt()
					_sleeptimer()
					
				Case $gold = False and $sellident = True
					_ident()
					_inter()
					_sleeptimer()
					_random_verkaufen()
					_verkaufen()
					randomSleep(1000, 2000)
					_random_Distrikt()
					_sleeptimer()
					
				Case $pGH and $pemo = True
					_breakGH2()
					_sleeptimer()
				
				Case $pGH = True and $pemo = False
					_breakGH()
					_sleeptimer()
					
				Case $pgh = False and $pemo = True
					_emotion()
					_sleeptimer()
				
				Case $pLA and $pemo = True
					_breakLA2()
					_sleeptimer()
				
				Case $pLA = True and $pemo = False
					_breakLA()
					_sleeptimer()
					
				Case $pgh = False and $pemo = True
					_emotion()
					_sleeptimer()
				
				Case $pgh and $pla = False and $pemo = True
					_emotion()
					_sleeptimer()
			EndSelect
		WEnd
EndSelect
EndFunc

Diesen habe ich. Bei mir geht auch alles ohne Probs.

Dark Killerking · 11/15/2008, 22:20

Was kann das sein... bei dem wo du gepostet hast klappt alles außer den weg wieder (rutscht immer noch macht die kurve zum portal raus nicht) und er nimmt immer noch die falsche gruppe -_- mhmmm...

Dark Killerking · 11/15/2008, 22:47

juhuuu! er geht habs hin bekommen war was falsch eingestellt... vielen dank exit_Z für deine hilfe THX : )