[Überarbeitet] Farben Farm Bot _ Fort Ranik

[S T A Y L A]

Ich habe mal den Farben Farm Bot von Hokler überarbeitet.
Er farmt die Skale bei Fort Ranik im Prophecies Tut.

V3 mit GUI ist da!

xXx Neue Funktionen xXx

- Bot verkauft Items
- Chanze auf dem Weg zu sterben wurde minimiert



xXx Benötigte Klasse xXx

- Ele/Waldi Level 9 mit Feuersturm und Trollsalbe (Mit nem Level 8 sollte es auch gehen, habe es jedoch nicht probiert)



xXx Tastenbelegung xXx

- alles Standart
- Nächster verbündeter: V
- Nächstbefindlicher Gegenstand: Ohh (nicht null)



xXx Hotkeys xXx

- Bot beenden: F8



xXx Benötigte Grafikeinstellung xXx

- Fenster Modus (bei V1 1024 x 768)
- Interface Göße: Groß/Large
- Für die Positionierung des Verkaufsfensters pls auf den Screene gucken



xXx Vorgehensweise xXx

Der Bot zieht vor Fort Ranik die meisten Skale zusammen und stellt sich hinter eine Ecke. Dann tötet er alle Skale mit Feuersturm und sammelt den Loot auf. Nach 2 Runden geht er zum Kaufmann und verkauft alle Items die nicht durch einen Blocker gesichert sind.



xXx Wichtige Infos xXx

- Es wird an der gleichen Stelle wie auf dem Screen im Inventar ein Block benötigt (dazu eignen sich gut die Herbeirufsteine, sowie Anfangs Rüssi und Waffen)
- Der Bot ist Background (ab Version 2)
- Damit die Farben nicht verkauft werden, sollte vorm Beginn von jeder Farbe ein Exemplar hinterm Block liegen


Neue Funktionen in V3:

- Es wurde eine GUI erstellt
- Es ist nun möglich die Mems zu Updaten

Source:

##include "GUIConstantsEx.au3"
#include "tt6.au3"

Opt("WinWaitDelay",100)
Opt("WinTitleMatchMode",4)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
WinWait("Guild Wars","")
If Not WinActive("Guild Wars","") Then WinActivate("Guild Wars","")
WinWaitActive("Guild Wars","")

hotkeyset("{F8}", "end")

func end()
Exit
EndFunc

func RandomSleep($min, $max)
    $time = Random($min, $max)
    Sleep($time)
endfunc

Controlmove("Guild Wars", "", 0, 0, 0, 800, 600)

sleep(10000)

 While 1

RandomSleep(3000, 4000)

;Weg zum Kaufmann
If CheckArea(22138, 11484) Then 
	PrepMoveTo()
		MoveTo(1,23057,11349)
		MoveTo(1,24509,10389)
		MoveTo(1,24527,10379)
	StopMoveTo()

ElseIf CheckArea(23027, 14034) Then 
	PrepMoveTo()
		MoveTo(1,22997,12124) 
		MoveTo(1,23367,11208)
		MoveTo(1,24513,10367)
		MoveTo(1,24527,10379)
	StopMoveTo()

ElseIf CheckArea(25388, 14338) Then 
	PrepMoveTo()
		MoveTo(1,23452,14229)
		MoveTo(1,22952,11710)
		MoveTo(1,23706,10782)
		MoveTo(1,24527,10379)
	StopMoveTo()


ElseIf CheckArea(25485, 14247) Then 
	PrepMoveTo()
		MoveTo(1,23452,14229)
		MoveTo(1,22952,11710)
		MoveTo(1,23706,10782)
		MoveTo(1,24527,10379)
	StopMoveTo()
EndIf

;Verkauf Script
RandomSleep(500, 750)
KeySend("v")
sleep(750)
KeySend("space")
RandomSleep(2000, 3000)
ControlClick("Guild Wars","","","left",1,127,34) 
RandomSleep(2000, 3000)
MouseSend("left", "click", 247,530)
RandomSleep(500, 1000)
MouseSend("left", "click", 247,530)
RandomSleep(500, 1000)
MouseSend("left", "click", 247,530)
RandomSleep(500, 1000)
MouseSend("left", "click", 247, 530)
RandomSleep(500, 1000)
MouseSend("left", "click", 247, 530)
RandomSleep(500, 1000)
MouseSend("left", "click", 247, 530)
RandomSleep(500, 1000)
MouseSend("left", "click", 247, 530)
RandomSleep(500, 1000)
MouseSend("left", "click", 247, 530)
RandomSleep(500, 1000)
MouseSend("left", "click", 247, 530)
RandomSleep(500, 1000)
MouseSend("left", "click", 247, 530)
RandomSleep(1000, 1500)
MouseSend("left", "click", 368, 5)
RandomSleep (3000, 3500)

;Weg nach Drausen
	PrepMoveTo()
		MoveTo(1,23437,10712)
		MoveTo(1,22522,9423)
		MoveTo(1,22531,7887)
	KeepMoveTo()
	
RandomSleep(7000, 7500)

;Pull Script
	PrepMoveTo()
		MoveTo(1,22632,6032)
		MoveTo(1,22562,4930)
		MoveTo(1,22401,4284)
		MoveTo(1,21149,2962)
		MoveTo(1,19907,2459)
		MoveTo(1,19091,2362)
		MoveTo(1,18333,2458)
	StopMoveTo()
	
RandomSleep(500, 750)
MouseSend("left", "click", 285, 542)
RandomSleep(3200, 3500)

	PrepMoveTo()
		MoveTo(1,17068,2600)
		MoveTo(1,15995,2693)
		MoveTo(1,16086,1782)
		MoveTo(1,15758,1532)
	StopMoveTo()
	
RandomSleep(500, 750)
MouseSend("left", "click", 285, 542)
RandomSleep(3200, 3500)

	PrepMoveTo()
		MoveTo(1,15034,1411)
		MoveTo(1,13789,1846)
		MoveTo(1,12446,2390)
		MoveTo(1,12270,2110)
		MoveTo(1,12384,1864)
	StopMoveTo()
	
; Fight & Loot Script
RandomSleep(2250, 3000)	
KeySend("c")
RandomSleep(500, 750)
MouseSend("left", "click", 236, 542)
Sleep(4000)
MouseSend("left", "click", 285, 542)
RandomSleep(4250, 4550)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(2500, 2600)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
RandomSleep(2000, 2500)
KeySend("-")
Sleep(100)
keysend("r")
Sleep(100)
keysend("e")
Sleep(100)
keysend("s")
Sleep(100)
keysend("i")
Sleep(100)
keysend("g")
Sleep(100)
keysend("n")
Sleep(100)
keysend("RETURN")
RandomSleep(4500, 5000)
MouseSend("left", "click", 392, 300)

RandomSleep(8000, 8500)

;Weg nach Drausen
If CheckArea(22138, 11484) Then 
	PrepMoveTo()
		MoveTo(1,22665,11565)
		MoveTo(1,23239,11171)
		MoveTo(1,22906,10279)
		MoveTo(1,22597,9081)
		MoveTo(1,22565,7838)
	KeepMoveTo()

ElseIf CheckArea(23027, 14034) Then 
	PrepMoveTo()
		MoveTo(1,22899,13501)
		MoveTo(1,22803,12283)
		MoveTo(1,23158,11274)
		MoveTo(1,22785,10197)
		MoveTo(1,22684,9373)
		MoveTo(1,22539,7738)
	KeepMoveTo()

ElseIf CheckArea(25388, 14338) Then 
	PrepMoveTo()
		MoveTo(1,22949,14058)
		MoveTo(1,22319,12807)
		MoveTo(1,22777,11665)
		MoveTo(1,23004,10706)
		MoveTo(1,22472,9179)
		MoveTo(1,22448,8035)
		MoveTo(1,22462,7663)
	KeepMoveTo()


ElseIf CheckArea(25485, 14247) Then 
	PrepMoveTo()
		MoveTo(1,22949,14058)
		MoveTo(1,22319,12807)
		MoveTo(1,22777,11665)
		MoveTo(1,23004,10706)
		MoveTo(1,22472,9179)
		MoveTo(1,22448,8035)
		MoveTo(1,22462,7663)
	KeepMoveTo()
EndIf

RandomSleep(7000, 7500)
;Pull Script
	PrepMoveTo()
		MoveTo(1,22632,6032)
		MoveTo(1,22562,4930)
		MoveTo(1,22401,4284)
		MoveTo(1,21149,2962)
		MoveTo(1,19907,2459)
		MoveTo(1,19091,2362)
		MoveTo(1,18333,2458)
	StopMoveTo()
	
RandomSleep(500, 750)
MouseSend("left", "click", 285, 542)
RandomSleep(3200, 3500)

	PrepMoveTo()
		MoveTo(1,17068,2600)
		MoveTo(1,15995,2693)
		MoveTo(1,16086,1782)
		MoveTo(1,15758,1532)
	StopMoveTo()
	
RandomSleep(500, 750)
MouseSend("left", "click", 285, 542)
RandomSleep(3200, 3500)

	PrepMoveTo()
		MoveTo(1,15034,1411)
		MoveTo(1,13789,1846)
		MoveTo(1,12446,2390)
		MoveTo(1,12270,2110)
		MoveTo(1,12384,1864)
	StopMoveTo()
	
; Fight & Loot Script
RandomSleep(2250, 3000)	
KeySend("c")
RandomSleep(500, 750)
MouseSend("left", "click", 236, 542)
Sleep(4000)
MouseSend("left", "click", 285, 542)
RandomSleep(4250, 4550)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(2500, 2600)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
KeySend("o")
RandomSleep(500, 510)
KeySend("space")
RandomSleep(1000, 1100)
RandomSleep(2000, 2500)
KeySend("-")
Sleep(100)
keysend("g")
Sleep(100)
keysend("i")
Sleep(100)
keysend("v")
Sleep(100)
keysend("e")
Sleep(100)
keysend("u")
Sleep(100)
keysend("p")
Sleep(100)
keysend("RETURN")
RandomSleep(4500, 5000)
MouseSend("left", "click", 392, 300)

RandomSleep(8000, 8500)
 
WEnd

Version 1:
Antivir: Nichts gefunden
ArcaVir: Nichts gefunden
Avast: Nichts gefunden
AVG: Nichts gefunden
BitDefender: Nichts gefunden
F-Prot: Nichts gefunden
Norman: Nichts gefunden
Rising: Nichts gefunden
VirusBlokAda32: Nichts gefunden
VirusBuster: Nichts gefunden


Überprüft von



Version 2:
Antivir: Nichts gefunden
ArcaVir: Nichts gefunden
Avast: Nichts gefunden
AVG: Nichts gefunden
BitDefender: Nichts gefunden
F-Prot: Nichts gefunden
Norman: Nichts gefunden
Rising: Nichts gefunden
VirusBlokAda32: Nichts gefunden
VirusBuster: Nichts gefunden


Überprüft von



Version 3:
Antivir: Nichts gefunden
ArcaVir: Nichts gefunden
Avast: Nichts gefunden
AVG: Nichts gefunden
BitDefender: Nichts gefunden
F-Prot: Nichts gefunden
Norman: Nichts gefunden
Rising: Nichts gefunden
VirusBlokAda32: Nichts gefunden
VirusBuster: Nichts gefunden


Überprüft von





Bitte ein nicht vergessen

[Neon™]

das hätteste doch auch im hintergrund machen können xD

habs eben mal gestet und es läuft ganz gut.

[S T A Y L A]

Originally Posted by Neon™

das hätteste doch auch im hintergrund machen können xD

habs eben mal gestet und es läuft ganz gut.

Ja werde die Tage mich mal an nen Background und GUI setzen.
Aber wie gesagt das ist mein erster Bot.
Freut mich das der anscheinend net schlecht ist =)

[FreaKzzz]

danke dir, hoffe auf eine background methode

[kknb]

du benutzt doch schon das moveto aus der tt6, warum nicht auch mousesend, keysend,rndsleep und die ganzen anderen sachen? wenn du die benutzt dann läuft der easy im hintergrund. wenn du nicht weißt wie man die befehle anwendet dann guck in die beigelegte readme.

aus
MouseMove(508,414)
MouseDown("left")
MouseUp("left")

wird dann
MouseSend("left", "click", 508,414)

usw

[S T A Y L A]

Originally Posted by kknb

du benutzt doch schon das moveto aus der tt6, warum nicht auch mousesend, keysend,rndsleep und die ganzen anderen sachen? wenn du die benutzt dann läuft der easy im hintergrund. wenn du nicht weißt wie man die befehle anwendet dann guck in die beigelegte readme.

aus
MouseMove(508,414)
MouseDown("left")
MouseUp("left")

wird dann
MouseSend("left", "click", 508,414)

usw

k werde ich heute machen.

Kann mir jemand vllt noch den Befehl für DeathCheck geben und wo ich den Einbauen muss?

[S T A Y L A]

Das mit dem Klicken klappt net -.-'

RandomSleep(500, 750)
KeySend("v")
sleep(750)
KeySend("space")
RandomSleep(2000, 3000)
MouseSend("left", "click", 127, 64)
RandomSleep(2000, 3000)
MouseSend("left", "click", 247, 560)
RandomSleep(500, 1000)
MouseSend("left", "click", 247, 560)

[Hokler]

dann nimm doch einfach

PHP Code:

ControlClick("Client Name","","","Maustaste",anzahl der Klicks,x,y) 


[S T A Y L A]

Klappt immer noch net -.-

RandomSleep(500, 750)
KeySend("v")
sleep(750)
KeySend("space")
RandomSleep(2000, 3000)
ControlClick("Guild Wars","","","left",1,127,64) 
RandomSleep(2000, 3000)

[Adroxxx]

Musst du nicht direkt den Handle übergeben?

[Specter cason]

heyhey
im hintergrund is mit den klicks ein problem und zwar den die windwosfensterleiste über gw (glaub ich ) und zwar must du einfach von der y-koordinate 30 abziehen dann sollte es gehen

lg

[S T A Y L A]

Originally Posted by Adroxxx

Musst du nicht direkt den Handle übergeben?

Sorry aber das verstehe ich noch nicht ^^
beschäftige mich erst seit 1 Woche mit AutoIt...

Könnteste das vllt mal für Anfänger verständlich ausdrücken?

ty

[S T A Y L A]

Originally Posted by Specter cason

heyhey
im hintergrund is mit den klicks ein problem und zwar den die windwosfensterleiste über gw (glaub ich ) und zwar must du einfach von der y-koordinate 30 abziehen dann sollte es gehen

lg

*** hast Recht....

Klappt jetzt. Werde aber auf Grund der Verzögerung den Bot im Background erst morgen updaten.

(Ach ja ich würde mich über ein freuen )

[S T A Y L A]

So Version 2 mit Background Modus ist da, allerdings ohne GUI, die wird noch folgen

[FreaKzzz]

Hi
Also der Bot funktioniert bei mir ohne Probleme, doch wenn mal was schief geht und mein Char stirbt liegt der Bot auf Eis. Soll heißen er macht nichts mehr, würde mich freuen wenn du sowas noch einbauen könntest.
Solltest du dies bereits gemacht haben, funktioniert es bei mir nicht. :]