Hi der P/E Stygier Bot ist soweit gesehen zu 99.8% fertig!
Zeit zum Betatesten :)
WICHTIG: Jeder muss den Bot für sich selbst anpassen.
Ich danke vorallem tt6 für seine - überragende (vote4sticky :D ) - moveto, den damit haben wir ziemlich viel vorangetrieben.
Dies ist der für mich angepasste bot. Ich habe r3 bei Norn und r6 bei Lichtbringer:
WICHTIG:
Die 5 Radio-Buttons sowie der Anpassen Button sind (noch) Dummy controls.
-------------------------------------------------------------------------------------
Hi,
This is the Beta Test for my Stygier Bot.
ATTENTION: You must put the clicks right for your acc.
I have r3 by Norn and r6 by Lightbringer.
ATTENTION:
The 5 Radio Buttons and the Resize GW button are (still) Dummy Controls.
Code is above.
Credits
Have Fun !!
~NBA
Zeit zum Betatesten :)
WICHTIG: Jeder muss den Bot für sich selbst anpassen.
Ich danke vorallem tt6 für seine - überragende (vote4sticky :D ) - moveto, den damit haben wir ziemlich viel vorangetrieben.
Dies ist der für mich angepasste bot. Ich habe r3 bei Norn und r6 bei Lichtbringer:
Code:
#include "tt6.au3"
Func Deathcheck()
$PID = WinGetProcess("Guild Wars")
$hprocess = _MemoryOpen($PID)
$ReadMemDeath = _MemoryRead(0xa056d4, $hprocess)
If $ReadMemDeath = 1 Then
ControlClick("Guild Wars", "", "", "left", 1, 511, 376)
Sleep(6000)
AdlibDisable()
WayOut()
EndIf
EndFunc ;==>Deathcheck
Func wayout()
If CheckArea(4746, -13929) Then ;Spawenpoint bei Truhe
PrepMoveTo()
MoveTo(1, 4833 + (Random(-2, 1)), -13863 + (Random(-2, 1)))
MoveTo(1, 5189 + (Random(-2, 1)), -13873 + (Random(-2, 1)))
MoveTo(1, 5659 + (Random(-2, 1)), -13946 + (Random(-2, 1)))
MoveTo(1, 6059 + (Random(-2, 1)), -14217 + (Random(-2, 1)))
MoveTo(1, 6576 + (Random(-2, 1)), -14710 + (Random(-2, 1)))
MoveTo(1, 6779 + (Random(-2, 1)), -14972 + (Random(-2, 1)))
MoveTo(1, 6881 + (Random(-2, 1)), -15207 + (Random(-2, 1)))
MoveTo(1, 6914 + (Random(-2, 1)), -15556 + (Random(-2, 1)))
MoveTo(1, 6801 + (Random(-2, 1)), -15903 + (Random(-2, 1)))
MoveTo(1, 6603 + (Random(-2, 1)), -16149 + (Random(-2, 1)))
MoveTo(1, 6356 + (Random(-2, 1)), -16302 + (Random(-2, 1)))
MoveTo(1, 6042 + (Random(-2, 1)), -16363 + (Random(-2, 1)))
MoveTo(1, 5694 + (Random(-2, 1)), -16296 + (Random(-2, 1)))
MoveTo(1, 5250 + (Random(-2, 1)), -16137 + (Random(-2, 1)))
MoveTo(1, 4904 + (Random(-2, 1)), -15980 + (Random(-2, 1)))
MoveTo(1, 4132 + (Random(-2, 1)), -15573 + (Random(-2, 1)))
MoveTo(1, 3686 + (Random(-2, 1)), -15338 + (Random(-2, 1)))
MoveTo(1, 3315 + (Random(-2, 1)), -15160 + (Random(-2, 1)))
MoveTo(1, 3034 + (Random(-2, 1)), -15091 + (Random(-2, 1)))
MoveTo(1, 2723 + (Random(-2, 1)), -15075 + (Random(-2, 1)))
MoveTo(1, 2388 + (Random(-2, 1)), -15103 + (Random(-2, 1)))
MoveTo(1, 2044 + (Random(-2, 1)), -15187 + (Random(-2, 1)))
MoveTo(1, 1561 + (Random(-2, 1)), -15404 + (Random(-2, 1)))
MoveTo(1, 1257 + (Random(-2, 1)), -15636 + (Random(-2, 1)))
MoveTo(1, 1047 + (Random(-2, 1)), -15879 + (Random(-2, 1)))
MoveTo(1, 861 + (Random(-2, 1)), -16204 + (Random(-2, 1)))
MoveTo(1, 762 + (Random(-2, 1)), -16482 + (Random(-2, 1)))
MoveTo(1, 703 + (Random(-2, 1)), -16747 + (Random(-2, 1)))
MoveTo(1, 667 + (Random(-2, 1)), -17203 + (Random(-2, 1)))
MoveTo(1, 550 + (Random(-2, 1)), -17508 + (Random(-2, 1)))
MoveTo(1, 267 + (Random(-2, 1)), -17850 + (Random(-2, 1)))
MoveTo(1, -113 + (Random(-2, 1)), -18181 + (Random(-2, 1)))
MoveTo(1, -379 + (Random(-2, 1)), -18315 + (Random(-2, 1)))
MoveTo(1, -555 + (Random(-2, 1)), -18417 + (Random(-2, 1)))
MoveTo(1, -691 + (Random(-2, 1)), -18564 + (Random(-2, 1)))
MoveTo(1, -783 + (Random(-2, 1)), -18741 + (Random(-2, 1)))
MoveTo(1, -846 + (Random(-2, 1)), -18992 + (Random(-2, 1)))
MoveTo(1, -926 + (Random(-2, 1)), -19300 + (Random(-2, 1)))
MoveTo(1, -1017 + (Random(-2, 1)), -19559 + (Random(-2, 1)))
MoveTo(1, -1103 + (Random(-2, 1)), -19825 + (Random(-2, 1)))
MoveTo(1, -1177, -20051)
StopMoveTo()
Sleep(200)
ControlSend($client, "", "", "{r down}")
Sleep(200)
ControlSend($client, "", "", "{r up}")
Sleep(200)
ElseIf CheckArea(5810, -16857) Then ;Spawnpoint bei Kaplan Phyratyss
ControlSend($client, "", "", "{x}")
Sleep(500)
PrepMoveTo()
MoveTo(1, 5537 + (Random(-2, 1)), -17199 + (Random(-2, 1)))
MoveTo(1, 5438 + (Random(-2, 1)), -17342 + (Random(-2, 1)))
MoveTo(1, 5231 + (Random(-2, 1)), -17506 + (Random(-2, 1)))
MoveTo(1, 4939 + (Random(-2, 1)), -17668 + (Random(-2, 1)))
MoveTo(1, 4504 + (Random(-2, 1)), -17856 + (Random(-2, 1)))
MoveTo(1, 4246 + (Random(-2, 1)), -17934 + (Random(-2, 1)))
MoveTo(1, 3694 + (Random(-2, 1)), -18054 + (Random(-2, 1)))
MoveTo(1, 3284 + (Random(-2, 1)), -18078 + (Random(-2, 1)))
MoveTo(1, 2806 + (Random(-2, 1)), -18072 + (Random(-2, 1)))
MoveTo(1, 2576 + (Random(-2, 1)), -18067 + (Random(-2, 1)))
MoveTo(1, 2293 + (Random(-2, 1)), -18033 + (Random(-2, 1)))
MoveTo(1, 1957 + (Random(-2, 1)), -17959 + (Random(-2, 1)))
MoveTo(1, 1481 + (Random(-2, 1)), -17852 + (Random(-2, 1)))
MoveTo(1, 1297 + (Random(-2, 1)), -17819 + (Random(-2, 1)))
MoveTo(1, 1020 + (Random(-2, 1)), -17814 + (Random(-2, 1)))
MoveTo(1, 762 + (Random(-2, 1)), -17834 + (Random(-2, 1)))
MoveTo(1, 522 + (Random(-2, 1)), -17882 + (Random(-2, 1)))
MoveTo(1, 296 + (Random(-2, 1)), -17959 + (Random(-2, 1)))
MoveTo(1, 49 + (Random(-2, 1)), -18091 + (Random(-2, 1)))
MoveTo(1, -294 + (Random(-2, 1)), -18310 + (Random(-2, 1)))
MoveTo(1, -538 + (Random(-2, 1)), -18497 + (Random(-2, 1)))
MoveTo(1, -669 + (Random(-2, 1)), -18685 + (Random(-2, 1)))
MoveTo(1, -802 + (Random(-2, 1)), -19061 + (Random(-2, 1)))
MoveTo(1, -964, -19503)
stopMoveTo()
Sleep(200)
ControlSend($client, "", "", "{r down}")
Sleep(200)
ControlSend($client, "", "", "{r up}")
Sleep(200)
ElseIf CheckArea(7425, -11855) Then ;Spawnpoint irgendwo bei der truhe (weiter weg)
PrepMoveTo()
MoveTo(1, 7443 + (Random(-2, 1)), -11949 + (Random(-2, 1)))
MoveTo(1, 7465 + (Random(-2, 1)), -12203 + (Random(-2, 1)))
MoveTo(1, 7399 + (Random(-2, 1)), -12587 + (Random(-2, 1)))
MoveTo(1, 7251 + (Random(-2, 1)), -12952 + (Random(-2, 1)))
MoveTo(1, 7068 + (Random(-2, 1)), -13271 + (Random(-2, 1)))
MoveTo(1, 6688 + (Random(-2, 1)), -13821 + (Random(-2, 1)))
MoveTo(1, 6573 + (Random(-2, 1)), -14025 + (Random(-2, 1)))
MoveTo(1, 6497 + (Random(-2, 1)), -14317 + (Random(-2, 1)))
MoveTo(1, 6536 + (Random(-2, 1)), -14537 + (Random(-2, 1)))
MoveTo(1, 6691 + (Random(-2, 1)), -14794 + (Random(-2, 1)))
MoveTo(1, 6853 + (Random(-2, 1)), -15032 + (Random(-2, 1)))
MoveTo(1, 6935 + (Random(-2, 1)), -15223 + (Random(-2, 1)))
MoveTo(1, 6954 + (Random(-2, 1)), -15440 + (Random(-2, 1)))
MoveTo(1, 6884 + (Random(-2, 1)), -15670 + (Random(-2, 1)))
MoveTo(1, 6764 + (Random(-2, 1)), -15855 + (Random(-2, 1)))
MoveTo(1, 6592 + (Random(-2, 1)), -16061 + (Random(-2, 1)))
MoveTo(1, 6423 + (Random(-2, 1)), -16185 + (Random(-2, 1)))
MoveTo(1, 6213 + (Random(-2, 1)), -16278 + (Random(-2, 1)))
MoveTo(1, 5915 + (Random(-2, 1)), -16353 + (Random(-2, 1)))
MoveTo(1, 5610 + (Random(-2, 1)), -16375 + (Random(-2, 1)))
MoveTo(1, 5366 + (Random(-2, 1)), -16318 + (Random(-2, 1)))
MoveTo(1, 5079 + (Random(-2, 1)), -16179 + (Random(-2, 1)))
MoveTo(1, 4606 + (Random(-2, 1)), -15910 + (Random(-2, 1)))
MoveTo(1, 4096 + (Random(-2, 1)), -15574 + (Random(-2, 1)))
MoveTo(1, 3771 + (Random(-2, 1)), -15374 + (Random(-2, 1)))
MoveTo(1, 3458 + (Random(-2, 1)), -15233 + (Random(-2, 1)))
MoveTo(1, 3098 + (Random(-2, 1)), -15129 + (Random(-2, 1)))
MoveTo(1, 2612 + (Random(-2, 1)), -15120 + (Random(-2, 1)))
MoveTo(1, 2290 + (Random(-2, 1)), -15187 + (Random(-2, 1)))
MoveTo(1, 1861 + (Random(-2, 1)), -15324 + (Random(-2, 1)))
MoveTo(1, 1634 + (Random(-2, 1)), -15429 + (Random(-2, 1)))
MoveTo(1, 1361 + (Random(-2, 1)), -15674 + (Random(-2, 1)))
MoveTo(1, 1102 + (Random(-2, 1)), -16000 + (Random(-2, 1)))
MoveTo(1, 942 + (Random(-2, 1)), -16347 + (Random(-2, 1)))
MoveTo(1, 782 + (Random(-2, 1)), -16883 + (Random(-2, 1)))
MoveTo(1, 594 + (Random(-2, 1)), -17349 + (Random(-2, 1)))
MoveTo(1, 437 + (Random(-2, 1)), -17617 + (Random(-2, 1)))
MoveTo(1, 176 + (Random(-2, 1)), -17914 + (Random(-2, 1)))
MoveTo(1, -219 + (Random(-2, 1)), -18310 + (Random(-2, 1)))
MoveTo(1, -571 + (Random(-2, 1)), -18662 + (Random(-2, 1)))
MoveTo(1, -693 + (Random(-2, 1)), -18807 + (Random(-2, 1)))
MoveTo(1, -811 + (Random(-2, 1)), -19045 + (Random(-2, 1)))
MoveTo(1, -915 + (Random(-2, 1)), -19331 + (Random(-2, 1)))
MoveTo(1, -1046 + (Random(-2, 1)), -19739 + (Random(-2, 1)))
MoveTo(1, -1093, -19888)
stopMoveTo()
Sleep(200)
ControlSend($client, "", "", "{r down}")
Sleep(200)
ControlSend($client, "", "", "{r up}")
Sleep(200)
EndIf
Sleep(1200 + Random(100, 200))
EndFunc ;==>wayout
Func MoveToAdept()
PrepMoveTo()
MoveTo(1, 651, -10244)
MoveTo(1, 1243, -10066)
MoveTo(1, 1856, -9921)
MoveTo(1, 2562, -9863)
MoveTo(1, 2938, -9852)
StopMoveTo()
Sleep(20000)
PrepMoveTo()
MoveTo(1, 3487, -9838)
MoveTo(1, 3935, -9796)
MoveTo(1, 4402, -9725)
MoveTo(1, 4800, -9664)
MoveTo(1, 5178, -9606)
MoveTo(1, 5566, -9546)
MoveTo(1, 5926, -9477)
MoveTo(1, 6347, -9370)
MoveTo(1, 6675, -9265)
MoveTo(1, 6972, -9157)
MoveTo(1, 7076, -9124)
StopMoveTo()
ControlSend("Guild Wars", "", "", "{v}")
ControlSend("Guild Wars", "", "", "{space}")
Sleep(1000)
ControlClick("Guild Wars", "", "", "left", 1, 473, 445)
EndFunc ;==>MoveToAdept
Func GetFactions()
ControlSend("Guild Wars", "", "", "{w down}")
Sleep(2000)
ControlSend("Guild Wars", "", "", "{w up}")
ControlSend("Guild Wars", "", "", "{v}")
ControlSend("Guild Wars", "", "", "{space}")
Sleep(3000)
ControlClick("Guild Wars", "", "", "left", 1, 436, 355)
PrepMoveTo()
MoveTo(1, 8921, -7614)
StopMoveTo()
Sleep(30000)
EndFunc ;==>GetFactions
;wegstellen
Func MoveHinterAdept()
PrepMoveTo()
MoveTo(1, 8644, -7853)
MoveTo(1, 8486, -7996)
MoveTo(1, 8431, -8045)
ControlSend("Guild Wars", "", "", "{1}")
Sleep(50)
ControlSend("Guild Wars", "", "", "{2}")
MoveTo(1, 7940, -8551)
MoveTo(1, 7617, -8796)
MoveTo(1, 7336, -8963)
MoveTo(1, 7156, -9048)
MoveTo(1, 7113, -9079)
MoveTo(3, 7122, -9081)
; MoveTo(3, 7117, -9081)
StopMoveTo()
Sleep(350)
ControlSend("Guild Wars", "", "", "{w down}")
Sleep(67)
ControlSend("Guild Wars", "", "", "{w up}")
;EndIf
Sleep(200)
EndFunc ;==>MoveHinterAdept
$currentpos = _MemoryRead(0xd28c54, $hprocess)
Func __WadimEnemyCheck()
$currentpos = _MemoryRead(0xd28c54, $hprocess)
ControlSend("Guild Wars", "", "", "c")
ControlSend("Guild Wars", "", "", "{space}")
Sleep(100)
If _MemoryRead(0xd28c54, $hprocess) <> $currentpos Then
;keine gegner mehr in der nähe
Send("w") ; sich kurz bewegen, bricht C, SPACE ab.
EndIf
EndFunc ;==>__WadimEnemyCheck
Func Kampfscript()
ControlSend("Guild Wars", "", "", "{a down}")
Sleep(1000)
ControlSend("Guild Wars", "", "", "{a up}")
Sleep(500)
ControlSend("Guild Wars", "", "", "{3}")
Sleep(2500)
ControlSend("Guild Wars", "", "", "{4}")
Sleep(2500)
ControlSend("Guild Wars", "", "", "{5}")
Sleep(750)
;AdlibEnable("__WadimEnemyCheck", 500)
$i = -1
Do
ControlSend("Guild Wars", "", "", "{2}")
Sleep(1000)
$i = $i + 1
Until $i = 60
;_MemoryRead(0xd28c54, $hprocess) <> $currentpos
EndFunc ;==>Kampfscript
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\NBArena\Desktop\tt6_V1.3\Form1.kxf
$Form1 = GUICreate("Stygier BT - The first P/E Stygian Vail Bot", 595, 387, 193, 125)
$Edit1 = GUICtrlCreateEdit("", 0, 0, 433, 137)
GUICtrlSetData(-1, StringFormat("This Bot was made for the Elitepvpers community.\r\n\r\nRules:\r\n§1 Do not try to sell this bot in a other community.\r\n§2 If you make this bot public in another community, say that is was made by\r\nhttp://www.elitepvpers.com/forum/guild-wars\r\n§3 Please do not Bot 24/7 ."))
$Radio1 = GUICtrlCreateRadio("German (Deutsch)", 440, 0, 113, 17)
$Radio2 = GUICtrlCreateRadio("English (Englisch)", 440, 24, 113, 17)
$Label1 = GUICtrlCreateLabel("How much rounds do you want to farm? :", 8, 152, 300, 17)
$Input1 = GUICtrlCreateInput("", 8, 168, 185, 21)
$Button1 = GUICtrlCreateButton("Start Farming", 8, 200, 99, 25, 0)
$Button2 = GUICtrlCreateButton("Resize Guild Wars", 8, 232, 99, 25, 0)
$Label2 = GUICtrlCreateLabel("Which Guild Wars Client do you want to use for botting?:", 208, 152, 278, 17)
$Radio3 = GUICtrlCreateRadio("Guild Wars 1", 208, 176, 113, 17)
$Radio4 = GUICtrlCreateRadio("Guild Wars 2", 208, 200, 113, 17)
$Radio5 = GUICtrlCreateRadio("Guild Wars 3", 208, 224, 113, 17)
$Radio6 = GUICtrlCreateRadio("Guild Wars 4", 208, 248, 113, 17)
$Radio7 = GUICtrlCreateRadio("Guild Wars 5", 208, 272, 113, 17)
$Button3 = GUICtrlCreateButton("Übersetzen", 440, 48, 91, 25, 0)
$MenuItem1 = GUICtrlCreateMenu("Menu")
$MenuItem2 = GUICtrlCreateMenuItem("Update", $MenuItem1)
$MenuItem3 = GUICtrlCreateMenuItem("Exit", $MenuItem1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$readinput = GUICtrlRead($Input1)
$rounds = 0
Do
$rounds = $rounds + 1
GUICtrlSetData($Button1, "Rounds: " & $rounds & " of " & $readinput)
Sleep(7000 + Random(100, 200))
wayout()
Sleep(10000)
MoveToAdept()
GetFactions()
MoveHinterAdept()
;AdlibEnable("Deathcheck")
Kampfscript()
;AdlibDisable()
CollectLoot(25)
Resign()
sleep(500)
Resign()
Until $rounds = $readinput Or $nMsg = $MenuItem3 Or $nMsg = $GUI_EVENT_CLOSE
GuiCtrlSetData($Button1, "Finished")
Case $MenuItem3
Exit
Case $Button3
$de = GUICtrlRead($Radio1)
$eng = GUICtrlRead($Radio2)
GUICtrlSetData($Button3, $de & " " & $eng)
If $de = 1 Then
GUICtrlSetData($Button3, "Translate")
GUICtrlSetData($Edit1, StringFormat("Dieser Bot wurde für die Elitepvpers Community erstellt.\r\n\r\nRegeln:\r\n§1 Versuch nicht, diesen Bot in einer anderen Community zu verkaufen.\r\n§2 Falls du diesen Bot Public machst, sag er wurde von\r\nhttp://www.elitepvpers.com/forum/guild-wars erstellt\r\n§3 Bitte botte nicht 24/7 ."))
GUICtrlSetData($Label1, "Wieviele Runden willst du farmen? :")
GUICtrlSetData($Label2, "Welchen Guild Wars Client willst du farmen lassen? :")
GUICtrlSetData($Button1, "Farmen Starten")
GUICtrlSetData($Button2, "Anpassen")
ElseIf $eng = 1 Then
GUICtrlSetData($Button3, "Übersetzen")
GUICtrlSetData($Edit1, StringFormat("This Bot was made for the Elitepvpers community.\r\n\r\nRules:\r\n§1 Do not try to sell this bot in a other community.\r\n§2 If you make this bot public in another community, say that is was made by\r\nhttp://www.elitepvpers.com/forum/guild-wars\r\n§3 Please do not Bot 24/7 ."))
GUICtrlSetData($Label1, "How much rounds do you want to farm? :")
GUICtrlSetData($Label2, "Which Guild Wars Client do you want to use for botting? :")
GUICtrlSetData($Button1, "Start Farming")
GUICtrlSetData($Button2, "Resize Guild Wars")
EndIf
EndSwitch
WEnd
Die 5 Radio-Buttons sowie der Anpassen Button sind (noch) Dummy controls.
-------------------------------------------------------------------------------------
Hi,
This is the Beta Test for my Stygier Bot.
ATTENTION: You must put the clicks right for your acc.
I have r3 by Norn and r6 by Lightbringer.
ATTENTION:
The 5 Radio Buttons and the Resize GW button are (still) Dummy Controls.
Code is above.
Credits
PHP Code:
-__wadim
-Enders (thx man for the wayout)
-Hokler
-tt6
and more, i dont remember
~NBA