Der Bot Farmt den Assa Boss bei Ran Musu-Gärten mit Ele/Monk
Ich werde ihn jetz einfach mal hochladen Interface und tasten belegung ist in dem Ordner Anleitung beschrieben. Ich würde mich über Kritik und Verbesserungsvorschläge sehr freuen.
Viel spaß mit dem Bot und einen schönen Tag noch
hier dann noch der source
Code:
#include "tt6.au3"
#include <NomadMemory.au3>
$Form1 = GUICreate("Elite Assa Folis Farmen", 292, 95, 193, 125)
$Button1 = GUICtrlCreateButton("1) GW Fenster Anpassen", 8, 8, 129, 49, 0)
$Button2 = GUICtrlCreateButton("2) Bot Starten", 152, 8, 129, 49, 0)
$Label1 = GUICtrlCreateLabel("Nutella Glas", 115, 70, 108, 17)
GUISetState()
While 1
$msg=GuiGetMsg()
If $msg=$Button1 Then button1()
If $msg=$Button2 Then button2()
Wend
Func button1()
Call("gw_anpassen")
EndFunc
Func button2()
Call("_start1")
endFunc
WinWait("Guild Wars","")
If Not WinActive("Guild Wars","") Then WinActivate("Guild Wars","")
WinWaitActive("Guild Wars","")
Func deathcheack()
If _memoryread($memdeath, $hprocess) = 1 Then
aufgeben() ; irgendwas machen
_start1()
EndIf
EndFunc
Func sell123()
RndSleep(1500)
MouseSend("left", "click", 126, 34)
RndSleep(200)
For $clicks = 1 To 25
MouseSend("left", "click", 243, 530)
RndSleep(200)
Next
EndFunc
Func RndSlpe($1,$2)
$sleep = Random($1,$2)
Sleep($sleep)
deathcheack()
EndFunc
Func gw_anpassen()
Controlmove("Guild Wars", "", 0, 0, 0, 800, 600)
Opt("MouseCoordMode",0)
EndFunc
Func RS($1,$2)
$sleep = Random($1,$2)
Sleep($sleep)
EndFunc
Func Hardmode()
MouseSend("left", "click",670,40)
Sleep(100)
EndFunc
Func aufgeben()
Keysend("-")
RS(70,80)
Keysend("r")
RS(70,80)
Keysend("e")
RS(70,80)
Keysend("s")
RS(70,80)
Keysend("i")
RS(70,80)
Keysend("g")
RS(70,80)
Keysend("n")
RS(70,80)
Keysend("RETURN")
RS(5000,8000)
MouseSend("left", "click",391,298)
RS(100,300)
EndFunc
Func GildenHalle()
Keysend("g")
RS(50,100)
MouseSend("left", "click",248,48)
RS(6500,7000)
MouseSend("left", "click",248,48)
RS(6500,7000)
call("_start1")
Endfunc
Func _start1()
Global $count = 0
while $count <= 20
$count = $count + 1
;Guild Wars Fenster öffnen
WinActivate("Guild Wars")
WinWaitActive("Guild Wars")
Sleep(1000)
;Hardmode
Hardmode()
;wayout
RndSlpe(500,1000)
PrepMoveTo()
MoveTo(2, 15707, 18731)
MoveTo(2, 14623, 17840)
MoveTo(2, 14908, 16984)
MoveTo(2, 14899, 15621)
KeepMoveTo()
;Warten...
RS(9000, 9200)
;zu den Gegnern laufen
keysend("8")
RndSlpe(2500,3000)
PrepMoveTo()
MoveTo(2, 14075, 15091)
deathcheack()
MoveTo(2, 12885, 15560)
deathcheack()
StopMoveTo()
;farm anfang
keysend("1")
RndSlpe(1234,1244)
keysend("2")
RndSlpe(2055,2065)
keysend("5")
RndSlpe(1234,1244)
deathcheack()
PrepMoveTo()
MoveTo(2, 11568, 15261)
deathcheack()
MoveTo(2, 10131, 15933)
StopMoveTo()
;Gegner killen
keysend("1")
RndSlpe(1234,1244)
keysend("2")
RndSlpe(2055,2065)
keysend("7")
RndSlpe(1822,1832)
keysend("3")
RndSlpe(1830,1840)
keysend("4")
RndSlpe(10086,10096)
keysend("1")
RndSlpe(1629,1639)
keysend("2")
RndSlpe(2899,2909)
keysend("7")
RndSlpe(2642,2652)
keysend("4")
RndSlpe(2642,2652)
keysend("ö")
RndSlpe(200, 210)
Keysend("space")
RndSlpe(500, 510)
keysend("ö")
RndSlpe(200, 210)
Keysend("space")
RndSlpe(500, 510)
keysend("ö")
RndSlpe(200, 210)
Keysend("space")
RndSlpe(500, 510)
;Aufgeben
aufgeben()
RS(7000,7510)
WEnd
call("_ident")
Endfunc
Func _ident()
keysend(".")
RS(500,600)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",32,60); Slot 1
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",65,60); Slot 2
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",97,60); Slot 3
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",127,60); Slot 4
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",159,60); Slot 5
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",32,105); Slot 6
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",65,105); Slot 7
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",97,105); Slot 8
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",127,105); Slot 9
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",159,105); Slot 10
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",32,145); Slot 11
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",65,145); Slot 12
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",97,145); Slot 13
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",127,145); Slot 14
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",159,145); Slot 15
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",32,182); Slot 16
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",65,182); Slot 17
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",97,182); Slot 18
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",127,182); Slot 19
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",159,182); Slot 20
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",32,251); Slot 21
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",65,251); Slot 22
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",97,251); Slot 23
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",127,251); Slot 24
RS(250,260)
MouseSend("left", "dclick",32,459);ident packet 1
RS(250,260)
MouseSend("left", "click",159,251); Slot 25
keysend(".")
RS(240,260)
call("_sell")
EndFunc
Func _sell()
PrepMoveTo()
MoveTo(2, 15707, 18731)
MoveTo(2, 14623, 17840)
MoveTo(2, 14265, 17635)
StopMoveto()
RS(200,210)
keysend("v")
RS(200,210)
Keysend("space")
RS(1500,1550)
sell123()
GildenHalle()
EndFunc







