Ich hoffe ihr arbeitet alle kräftig mit an den Bot weiter. Vielleicht setzt sich jemand hin und schreibt mehr Wayouts.
Die Helden Builds sind optional, aber für diejenigen die keine Ahnung von Skills haben poste ich hier mein Build.
2 Ele-Helden : OgBCoMzDuAZMWnF0NcWTzIC
und ein
Mesmer : OQZCAsyDwwXgzKiEDyKyAXA
für den Flächen Dmg.
Dein Build : OwIT0Uoi356EX/IAAAAAAAAAAA
Gruppe heilen ist optional
Gruppenfenster und Minimap komplett über das Fenster gezogen
/resign einmal vorher in den Chat schreiben bevor ihr startet.
Tastenbelegung:
U - Minimap öffnen
Numpad[+] - Gruppe befehligen
R - Automatisch laufen
Code:
#include <GUIConstants.au3> #include "tt6.au3" #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Run_Obfuscator=y #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** Global $Hwnd = WinGetHandle($Client) Global $CurrentPosX, $CurrentPosY, $PID, $hprocess, $Map, $Paused HotKeySet("{Pause}", "TogglePause") Global $memoryx = IniRead("update.ini", "SECTION D", "POSX", "0") Global $memoryy = IniRead("update.ini", "SECTION D", "POSY", "0") Global $CheckMap = IniRead("update.ini", "SECTION D", "CHECK_MAP", "0") #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("The NEW Generation: Brauer Academy", 421, 212, 207, 181, -1, $WS_EX_ACCEPTFILES) GUISetBkColor(0xFFFFFF) $Button1 = GUICtrlCreateButton("Start", 208, 144, 83, 25, 0) $Button2 = GUICtrlCreateButton("Cancel", 304, 176, 83, 25, 0) $Button3 = GUICtrlCreateButton("Customize", 208, 176, 83, 25, 0) $Edit1 = GUICtrlCreateEdit("", 8, 32, 177, 137, BitOR($ES_AUTOVSCROLL, $ES_AUTOHSCROLL, $ES_WANTRETURN, $ES_NUMBER, $WS_VSCROLL)) GUICtrlSetData(-1, "Edit1") GUICtrlSetBkColor(-1, 0xFFFBF0) GUICtrlSetState(-1, $GUI_DISABLE) $Label1 = GUICtrlCreateLabel("What makes the bot in the moment?", 8, 8, 175, 17) $Input1 = GUICtrlCreateInput("www.elitepvpers.com/forum/guild-wars", 8, 176, 177, 21) $Button4 = GUICtrlCreateButton("Save", 304, 144, 83, 25, 0) GUICtrlSetState(-1, $GUI_DISABLE) $Input2 = GUICtrlCreateInput("If you want to raise the alliance, put your name in and save", 208, 120, 177, 21) GUICtrlSetState(-1, $GUI_DISABLE) $Group1 = GUICtrlCreateGroup("Faction", 208, 48, 177, 65) $Radio1 = GUICtrlCreateRadio("Passage Scrolls", 216, 64, 113, 17) GUICtrlSetState(-1, $GUI_CHECKED) $Radio2 = GUICtrlCreateRadio("Raise Alliance", 216, 88, 113, 17) GUICtrlSetState(-1, $GUI_DISABLE) GUICtrlCreateGroup("", -99, -99, 1, 1) $Radio3 = GUICtrlCreateRadio("1280*1024 Screen", 216, 8, 113, 17) GUICtrlSetState(-1, $GUI_CHECKED) $Radio4 = GUICtrlCreateRadio("1024*768 Screen", 216, 32, 113, 17) GUICtrlSetState(-1, $GUI_DISABLE) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 start() Case $Button2 exitbot() Case $Button3 anpassen() Case $Button4 save() EndSwitch WEnd Func travelhzh() ControlSend($Hwnd, "", "", "m") Sleep(2000) ControlClick($Hwnd, "", "", "LEFT", 1, 614, 404) Sleep(2000) ControlClick($Hwnd, "", "", "LEFT", 1, 589, 430) Sleep(2000) ControlClick($Hwnd, "", "", "LEFT", 1, 452, 378) Sleep(1000) ControlSend($Hwnd, "", "", "{space}") EndFunc ;==>travelhzh Func travelback() ControlSend($Hwnd, "", "", "m") Sleep(2000) ControlClick($Hwnd, "", "", "LEFT", 1, 614, 404) Sleep(1000) ControlClick($Hwnd, "", "", "LEFT", 1, 624, 512) Sleep(1000) ControlClick($Hwnd, "", "", "LEFT", 1, 586, 425) Sleep(1000) ControlSend($Hwnd, "", "", "{space}") EndFunc ;==>travelback Func anpassen() If GUICtrlRead($Radio3) = $GUI_CHECKED Then ControlMove("Guild Wars", "", "", 0, 0, 1024, 768) ElseIf GUICtrlRead($Radio4) = $GUI_CHECKED Then ControlMove("Guild Wars", "", "", 0, 0, 800, 600) Else MsgBox(0, "Screen", "Please select your screen") EndIf EndFunc ;==>anpassen Func TogglePause() $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 ;==>TogglePause Func exitbot() Exit EndFunc ;==>exitbot Func LogWrite($Message) $TimeStamp = "[ " & @MON & "." & @MDAY & "." & @YEAR & " " & @HOUR & ":" & @MIN & ":" & @SEC & " ] " GUICtrlSetData($Logfile, $TimeStamp & $Message & @CRLF, True) EndFunc ;==>LogWrite Func getnpc() ControlSend($Hwnd, "", "", "{p}") Sleep(1000) ControlClick($Hwnd, "", "", "LEFT", 2, 272, 132) Sleep(800) ControlClick($Hwnd, "", "", "LEFT", 2, 185, 170) Sleep(800) ControlClick($Hwnd, "", "", "LEFT", 2, 163, 275) Sleep(800) ControlClick($Hwnd, "", "", "LEFT", 2, 152, 375) Sleep(800) ControlClick($Hwnd, "", "", "LEFT", 2, 204, 425) Sleep(1000) ControlSend($Hwnd, "", "", "{esc}") EndFunc ;==>getnpc Func questen() PrepMoveTo() MoveTo(1, 15347.638671875 + (Random(-5, 5)), 7027.5458984375 + (Random(-5, 5))) MoveTo(1, 15234.2880859375 + (Random(-5, 5)), 7841.53955078125 + (Random(-5, 5))) MoveTo(1, 15173.173828125 + (Random(-5, 5)), 8624.72265625 + (Random(-5, 5))) MoveTo(1, 15135.8583984375 + (Random(-5, 5)), 9182.767578125 + (Random(-5, 5))) MoveTo(1, 15106.974609375 + (Random(-5, 5)), 9633.2275390625 + (Random(-5, 5))) MoveTo(1, 15093.123046875 + (Random(-5, 5)), 9658.3662109375 + (Random(-5, 5))) StopMoveTo() ControlClick($Hwnd, "", "", "Right", 1, 490, 460) Sleep(500) ControlSend($Hwnd, "", "", "{space}") Sleep(1000) ControlClick($Hwnd, "", "", "LEFT", 1, 490, 495) Sleep(2000) ControlClick($Hwnd, "", "", "Right", 1, 490, 460) Sleep(400) PrepMoveTo() MoveTo(1, 14899.0400390625 + (Random(-5, 5)), 9796.6513671875 + (Random(-5, 5))) MoveTo(1, 14465.7900390625 + (Random(-5, 5)), 10145.810546875 + (Random(-5, 5))) MoveTo(1, 13990.623046875 + (Random(-5, 5)), 10528.7548828125 + (Random(-5, 5))) MoveTo(1, 13582.0888671875 + (Random(-5, 5)), 10844.0458984375 + (Random(-5, 5))) MoveTo(1, 13247.701171875 + (Random(-5, 5)), 11066.990234375 + (Random(-5, 5))) MoveTo(1, 13024.189453125 + (Random(-5, 5)), 11215.0107421875 + (Random(-5, 5))) MoveTo(1, 12805.587890625 + (Random(-5, 5)), 11313.5087890625 + (Random(-5, 5))) MoveTo(1, 12472.0546875 + (Random(-5, 5)), 11349.5673828125 + (Random(-5, 5))) MoveTo(1, 11964.5439453125 + (Random(-5, 5)), 11341.18359375 + (Random(-5, 5))) MoveTo(1, 11607.642578125 + (Random(-5, 5)), 11354.482421875 + (Random(-5, 5))) MoveTo(1, 11170.4404296875 + (Random(-5, 5)), 11403.873046875 + (Random(-5, 5))) MoveTo(1, 10846.0625 + (Random(-5, 5)), 11481.5029296875 + (Random(-5, 5))) MoveTo(1, 10586.01953125 + (Random(-5, 5)), 11667.42578125 + (Random(-5, 5))) MoveTo(1, 10355.306640625 + (Random(-5, 5)), 11974.978515625 + (Random(-5, 5))) MoveTo(1, 10192.9169921875 + (Random(-5, 5)), 12263.1591796875 + (Random(-5, 5))) MoveTo(1, 9983.16015625 + (Random(-5, 5)), 12684.6943359375 + (Random(-5, 5))) MoveTo(1, 9799.5810546875 + (Random(-5, 5)), 13079.400390625 + (Random(-5, 5))) MoveTo(1, 9644.0654296875 + (Random(-5, 5)), 13395.0517578125 + (Random(-5, 5))) MoveTo(1, 9489.853515625 + (Random(-5, 5)), 13654.9921875 + (Random(-5, 5))) MoveTo(1, 9293.1650390625 + (Random(-5, 5)), 13865.3046875 + (Random(-5, 5))) MoveTo(1, 9067.4775390625 + (Random(-5, 5)), 14100.5244140625 + (Random(-5, 5))) MoveTo(1, 8877.8740234375 + (Random(-5, 5)), 14305.2265625 + (Random(-5, 5))) MoveTo(1, 8679.3369140625 + (Random(-5, 5)), 14527.3251953125 + (Random(-5, 5))) MoveTo(1, 8565.0712890625 + (Random(-5, 5)), 14685.8173828125 + (Random(-5, 5))) MoveTo(1, 8457.7509765625 + (Random(-5, 5)), 14897.45703125 + (Random(-5, 5))) MoveTo(1, 8366.01171875 + (Random(-5, 5)), 15161.2626953125 + (Random(-5, 5))) MoveTo(1, 8315.4638671875 + (Random(-5, 5)), 15385.2119140625 + (Random(-5, 5))) MoveTo(1, 8278.5703125 + (Random(-5, 5)), 15627.1787109375 + (Random(-5, 5))) MoveTo(1, 8336.255859375 + (Random(-5, 5)), 15874.7431640625 + (Random(-5, 5))) MoveTo(1, 8443.6474609375 + (Random(-5, 5)), 16101.69140625 + (Random(-5, 5))) MoveTo(1, 9117.2939453125 + (Random(-5, 5)), 16687.482421875 + (Random(-5, 5))) StopMoveTo() ControlSend($Hwnd, "", "", "1") Sleep(3000) ControlSend($Hwnd, "", "", "u") Sleep(1000) ControlSend($Hwnd, "", "", "{Numpadadd}") Sleep(1000) ControlClick($Hwnd, "", "", "left", 1, 498, 368) Sleep(1000) ControlSend($Hwnd, "", "", "u") Sleep(1000) ControlClick($Hwnd, "", "", "Right", 1, 490, 460) Sleep(4000) ControlSend($Hwnd, "", "", "{2}") Sleep(1000) ControlSend($Hwnd, "", "", "{3}") Sleep(5000) ControlSend($Hwnd, "", "", "{3}") Sleep(5000) ControlSend($Hwnd, "", "", "{3}") Sleep(45000) ControlClick($Hwnd, "", "", "right", 1, 618, 612) Sleep(1000) PrepMoveTo() MoveTo(1, 9003.3076171875 + (Random(-5, 5)), 16591.640625 + (Random(-5, 5))) MoveTo(1, 8508.3720703125 + (Random(-5, 5)), 16102.4091796875 + (Random(-5, 5))) MoveTo(1, 7944.197265625 + (Random(-5, 5)), 15897.43359375 + (Random(-5, 5))) MoveTo(1, 7487.6533203125 + (Random(-5, 5)), 15942.7099609375 + (Random(-5, 5))) MoveTo(1, 7096.326171875 + (Random(-5, 5)), 16118.0185546875 + (Random(-5, 5))) MoveTo(1, 6858.06494140625 + (Random(-5, 5)), 16233.4501953125 + (Random(-5, 5))) StopMoveTo() ControlSend($Hwnd, "", "", "{space}") Sleep(2000) ControlClick($Hwnd, "", "", "left", 1, 483, 483) Sleep(400) ControlSend($Hwnd, "", "", "r") Sleep(200) ControlSend($Hwnd, "", "", "r") EndFunc ;==>questen Func _Check() $PID = ProcessExists(WinGetProcess("Guild Wars")) $hprocess = _MemoryOpen($PID) $CurrentPosX = _MemoryRead($memoryx, $hprocess) $CurrentPosY = _MemoryRead($memoryy, $hprocess) $Map = _MemoryRead($CheckMap, $hprocess) EndFunc ;==>_Check Func _changedis() ControlSend($Hwnd, "", "", "{g}") Sleep(1000) ControlClick($Hwnd, "", "", "LEFT", 1, 351, 61) Sleep(15000) Sleep(1000) ControlClick($Hwnd, "", "", "LEFT", 1, 351, 61) Sleep(15000) ControlSend($Hwnd, "", "", "{g}") EndFunc ;==>_changedis Func wayout() _Check() Select Case ($CurrentPosX <= 1182596319) And ($CurrentPosX >= 1182354478) And ($CurrentPosY <= 1162110744) And ($CurrentPosY >= 1160679162) kaufmann(); Centre Case ($CurrentPosX <= 1182927034) And ($CurrentPosX >= 1181057459) And ($CurrentPosY <= 1159248980) And ($CurrentPosY >= 1156208989) sammler(); Spawn South Case ($CurrentPosX <= 1181185199) And ($CurrentPosX >= 1180806142) And ($CurrentPosY <= 1163657663) And ($CurrentPosY >= 1161642322) npc(); Spawn North Case Else _changedis() getnpc() wayout() EndSelect EndFunc ;==>wayout Func sammler() PrepMoveTo() MoveTo(1, 15433.4375 + (Random(-5, 5)), 2347.06616210938 + (Random(-5, 5))) MoveTo(1, 15600.3359375 + (Random(-5, 5)), 2724.662109375 + (Random(-5, 5))) MoveTo(1, 15697.7451171875 + (Random(-5, 5)), 2996.7509765625 + (Random(-5, 5))) MoveTo(1, 15710.8505859375 + (Random(-5, 5)), 3235.24096679688 + (Random(-5, 5))) MoveTo(1, 15648.0791015625 + (Random(-5, 5)), 3394.89477539063 + (Random(-5, 5))) MoveTo(1, 15492.2412109375 + (Random(-5, 5)), 3591.37133789063 + (Random(-5, 5))) MoveTo(1, 15388.17578125 + (Random(-5, 5)), 3718.8017578125 + (Random(-5, 5))) MoveTo(1, 15290.66796875 + (Random(-5, 5)), 3923.05737304688 + (Random(-5, 5))) MoveTo(1, 15259.376953125 + (Random(-5, 5)), 4151.49560546875 + (Random(-5, 5))) MoveTo(1, 15272.287109375 + (Random(-5, 5)), 4538.724609375 + (Random(-5, 5))) MoveTo(1, 15292.0849609375 + (Random(-5, 5)), 4937.9345703125 + (Random(-5, 5))) MoveTo(1, 15304.5556640625 + (Random(-5, 5)), 5305.697265625 + (Random(-5, 5))) MoveTo(1, 15306.3046875 + (Random(-5, 5)), 5619.49462890625 + (Random(-5, 5))) StopMoveTo() ControlSend($Hwnd, "", "", "r") EndFunc ;==>sammler Func kaufmann() PrepMoveTo() MoveTo(1, 16032.07421875 + (Random(-5, 5)), 3060.05444335938 + (Random(-5, 5))) MoveTo(1, 15739.9541015625 + (Random(-5, 5)), 3374.33374023438 + (Random(-5, 5))) MoveTo(1, 15515.8349609375 + (Random(-5, 5)), 3617.58618164063 + (Random(-5, 5))) MoveTo(1, 15400.2109375 + (Random(-5, 5)), 3753.12573242188 + (Random(-5, 5))) MoveTo(1, 15331.337890625 + (Random(-5, 5)), 3887.86889648438 + (Random(-5, 5))) MoveTo(1, 15303.2001953125 + (Random(-5, 5)), 4092.23779296875 + (Random(-5, 5))) MoveTo(1, 15332.8330078125 + (Random(-5, 5)), 4432.26611328125 + (Random(-5, 5))) MoveTo(1, 15350.1513671875 + (Random(-5, 5)), 4761.53076171875 + (Random(-5, 5))) MoveTo(1, 15355.119140625 + (Random(-5, 5)), 5151.2490234375 + (Random(-5, 5))) MoveTo(1, 15360.5859375 + (Random(-5, 5)), 5581.447265625 + (Random(-5, 5))) StopMoveTo() ControlSend($Hwnd, "", "", "r") EndFunc ;==>kaufmann Func npc() PrepMoveTo() MoveTo(1, 14745.1787109375 + (Random(-5, 5)), 3379.98999023438 + (Random(-5, 5))) MoveTo(1, 14969.39453125 + (Random(-5, 5)), 3597.11987304688 + (Random(-5, 5))) MoveTo(1, 15204.3935546875 + (Random(-5, 5)), 3950.55322265625 + (Random(-5, 5))) MoveTo(1, 15312.1533203125 + (Random(-5, 5)), 4232.49951171875 + (Random(-5, 5))) MoveTo(1, 15360.8603515625 + (Random(-5, 5)), 4651.05810546875 + (Random(-5, 5))) MoveTo(1, 15372.0126953125 + (Random(-5, 5)), 5064.68505859375 + (Random(-5, 5))) MoveTo(1, 15361.7607421875 + (Random(-5, 5)), 5400.0537109375 + (Random(-5, 5))) MoveTo(1, 15354.712890625 + (Random(-5, 5)), 5629.9765625 + (Random(-5, 5))) StopMoveTo() ControlSend($Hwnd, "", "", "r") EndFunc ;==>npc Func start() While 1 getnpc() For $i = 1 To 27 wayout() loading2() questen() giveup() loading1() Next travelhzh() Sleep(20000) reward() scrolls() travelback() Sleep(20000) WEnd EndFunc ;==>start Func giveup() ControlSend($Hwnd, "", "", "{enter}") Sleep(1000) ControlSend($Hwnd, "", "", "{up}") Sleep(1000) ControlSend($Hwnd, "", "", "{enter}") Sleep(4000) ControlClick($Hwnd, "", "", "LEFT", 1, 500, 400) EndFunc ;==>giveup Func loading1() $T_INIT = TimerInit() Do Sleep(2000) $T_DIFF = TimerDiff($T_INIT) $PID = ProcessExists(WinGetProcess($Hwnd)) $hp1 = _MemoryOpen($PID) $Map = _MemoryRead($memmap, $hp1) Until ($Map = 0) Or ($T_DIFF > 30000) If $T_DIFF > 30000 Then _changedis() getnpc() wayout() questen() ElseIf $Map = 0 Then Sleep(4000) EndIf EndFunc ;==>loading1 Func loading2() $T_INIT = TimerInit() Do $T_DIFF = TimerDiff($T_INIT) Sleep(2000) $PID = ProcessExists(WinGetProcess($Hwnd)) $hp1 = _MemoryOpen($PID) $Map = _MemoryRead($memmap, $hp1) Until ($Map = 1) Or ($T_DIFF > 30000) If $Map = 1 Then Sleep(4000) ElseIf $T_DIFF > 30000 Then _changedis() EndIf EndFunc ;==>loading2 Func reward() _Check() Select Case ($CurrentPosX <= 1171025358) And ($CurrentPosX >= 1170225358) And ($CurrentPosY <= 1161110744) And ($CurrentPosY >= 1159120802) ferti(); Centre Case ($CurrentPosX <= 1170108701) And ($CurrentPosX >= 1169397817) And ($CurrentPosY <= 1162475652) And ($CurrentPosY >= 1161209737) zytka(); Spawn South Case ($CurrentPosX <= 1169197817) And ($CurrentPosX >= 1168320285) And ($CurrentPosY <= 1164887663) And ($CurrentPosY >= 1161642322) sammler1(); Spawn North Case Else reward() EndSelect EndFunc ;==>reward Func ferti() MoveTo(1, 5382, 1520) Sleep(2000) ControlSend($Hwnd, "", "", "{v}") Sleep(400) ControlSend($Hwnd, "", "", "{space}") Sleep(2000) EndFunc ;==>ferti Func zytka(); MoveTo(1, 5369, 1541) Sleep(2000) ControlSend($Hwnd, "", "", "{v}") Sleep(400) ControlSend($Hwnd, "", "", "{space}") Sleep(2000) EndFunc ;==>zytka Func sammler1() MoveTo(1, 5365, 1525) Sleep(2000) ControlSend($Hwnd, "", "", "{v}") Sleep(400) ControlSend($Hwnd, "", "", "{space}") Sleep(2000) EndFunc ;==>sammler1 Func scrolls() ControlClick($Hwnd, "", "", "LEFT", 1, 484, 397) Sleep(1000) ControlClick($Hwnd, "", "", "LEFT", 1, 467, 442) Sleep(2000) EndFunc ;==>scrolls