;--------------------------------------------------------------------------------------------
; _ _ _ _
; | (_) | | |
; ___| |_| |_ ___ _ ____ ___ __ ___ _ __ ___ __| | ___
; / _ \ | | __/ _ \ '_ \ \ / / '_ \ / _ \ '__/ __| / _` |/ _ \
;| __/ | | || __/ |_) \ V /| |_) | __/ | \__ \| (_| | __/
; \___|_|_|\__\___| .__/ \_/ | .__/ \___|_| |___(_)__,_|\___|
; | | | |
; |_| |_|
;
; © exclusively released on epvpers.de ;
;-------------------------------------------------------------------------------------------;
;AutoIt Version: 3.1.1.0 ;
;Wajjun-Basar-Bot für Hard Mode (Mo/Me) ;
; ;
; GERMAN: ;
; ;
;Skillung: 1-3: Balthasars Geist, Essenzbindung, Genesung (Anordnung beliebig) ;
; 4: Schutzgeist ;
; 5: Heilender Hauch ;
; 6: Mantra des Abschlusses ;
; 7: Arkanes Echo ;
; 8: Schild des Urteils ;
; ;
; 5 Inspirationsmagie ;
; 11 Heilgebete ;
; 12 Schutzgebete ;
; 16 Peinigungsgebete ;
; 5 Gunst der Götter ;
; ;
;Howto: ;
;Reist nach 'Marktplatz' in Factions, wählt den Hardmode und Betretet des Gebiet ;
;'Wajjun-Basar' ;
;Nun den Bot Starten, beenden jederzeit mit F8 möglich ;
; ;
; ENGLISCH: ;
; ;
;Skills: 1-3: Balthazars Spirit, Essence Bond, Mending (Place them Randomly) ;
; 4: Protective Spirit ;
; 5: Healing Breaze ;
; 6: Mantra of Resolve ;
; 7: Arcane Echo ;
; 8: Shield of Judgment ; ;
; ;
; 5 Inspiration Magic ;
; 11 Healing Prayers ;
; 12 Protection Prayers ;
; 16 Smiting Prayers ;
; 5 Devine Favor ;
; ;
;Howto: ;
;Travel to 'Marketpalace' in Factions, choose Hardmode and enter the Area 'Wajjun-Basar' ;
;Now start the Bot, you can stop the Bot everytime by pressing F8 ;
; ;
;-------------------------------------------------------------------------------------------;
HotKeySet("{F8}" , "exitit")
WinActivate("Guild Wars")
sleep(3000)
$z= Random(500, 1800)
$z1=random(3000,4000)
$ii=Random(14000,16000)
sleep($z)
$keypress= Random(506, 1023)
call("prot")
sleep($z)
call("gofighting")
sleep($z1)
call("loot3er")
Sleep($ii)
call("gofighting")
sleep($z1)
call("loot3er")
sleep($z)
call ("wayto3rdgrp")
exit
func exitit()
exit
EndFunc
func prot()
$keypress1= Random(506, 1023)
$time= Random(5710, 6940)
Send("{1 down}")
Sleep($keypress1)
Send("{1 up}")
Sleep($time)
Send("{2 down}")
Sleep($keypress1)
Send("{2 up}")
Sleep($time)
Send("{3 down}")
Sleep($keypress1)
Send("{3 up}")
Sleep($time)
EndFunc
func gofighting()
$a=random(3250,3500)
$b=random(3000,3500)
$c=random(2100,2850)
$d=random(2100,2350)
$d1=random(2000,2250)
$e=random(4000,4250)
$f=random(4100,4500)
$g=random(6800,7000)
$z=random(500,1800)
$z1=Random(800,1200)
send("{TAB}")
sleep ($z)
send("{SPACE}")
sleep($a)
Send("4") ;Schutzgeist 19sek
sleep($b) ;3s
Send("5") ;Heilender Hauch 10sek
Sleep($b) ;3s
If pixelgetcolor (649,666) <> 4159144 then ;energieabfrage
Sleep($d1)
Sleep($d1)
Send("4") ;Schutzgeist 19sek
Sleep($b) ;3s
Send("5") ;Heilender Hauch 10sek
sleep($b) ;3s
EndIf
Send("7") ;Arkanes Echo 20sek
sleep($c) ;3s
Send("8") ;Schild des Urteils 21sek
Sleep($d) ;2,5
Send("5")
Sleep($e) ;4,25s
Send("5")
sleep($z1) ;1,2s
Send("4")
sleep($b) ;3s
sleep($b) ;3s
send("7")
sleep($f) ;4,5s
Send("5")
Sleep($d) ;2,5s
Send("4")
sleep($f) ;4,5s
Send("5")
sleep($g) ;5s
EndFunc
func loot3er()
$h=random(250,500)
$i=random(750,850)
Send("o") ;nicht null ;nächstbefindlicher gegenstand
sleep($h)
Send("{SPACE}")
sleep($i)
Send("{w down}")
sleep($h)
Send("{w up}")
Send("o")
sleep($h)
Send("{SPACE}")
sleep($i)
Send("{w down}")
sleep($h)
Send("{w up}")
EndFunc
func wayto3rdgrp()
;help pls ^^
EndFunc
-------------------------------------
bei func wayto3rdgrp() müsste was mit texmod gebastelt werden damit er weiss in welche richtung er laufen muss...
//Edit2: grade gesehn das hierbei die betreten func fehlt:
func hm()
$xa=random(858,875) ; falls Bot nicht in HM wechselt hier die Koordinaten des HM-Buttons abändern
$ya=random(64,82)
$colorhm= PixelSearch(850, 55, 885, 85, 7791247 )
if not @error Then
$cx=random(750,1350)
Sleep($cx)
Else
MouseClick("left",$xa,$ya) ; HM wird angeklickt
$cx=random(750,1350)
Sleep($cx)
EndIf
EndFunc
func goout()
$cb=random(350,500)
$cc=random(250,300)
$cd=random(1000,1250)
$ca=random(9000,9500)
$cx=random(750,1350)
send("0") ;Null
sleep($cx)
pixelsearch(498,54, 500, 56, 13421772)
if not @error then
send ("{SPACE}")
sleep($ca)
send("{a down}")
sleep($cc)
send("{a up}")
sleep($cx)
send("{w down}")
sleep($cd)
send("{w up}")
sleep($ca)
Else
send("{W Down}")
sleep($cb)
send("{W UP}")
call("goout")
EndIf
EndFunc
funktioniert jedoch nicht zu 100%, texmod wäre hierbei auch hilfreich ^^
