Register for your free account! | Forgot your password?

You last visited: Today at 04:22

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Elite Assa Foli v1.0

Discussion on Elite Assa Foli v1.0 within the GW Exploits, Hacks, Bots, Tools & Macros forum part of the Guild Wars category.

Reply
 
Old   #1
 
elite*gold: 0
Join Date: Jun 2008
Posts: 20
Received Thanks: 4
Elite Assa Foli v1.0

So hab mich mal ein bisschen dran gesetzt und ein Bot für Elite Assa Foli Farmen geschreiben. Es ist zwar nur ein Projekt von ca. 5 Stunden denke aber Trotzdem mal das er mir recht gut gelungen ist

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
Attached Files
File Type: rar Elite Assa Folis.rar (281.3 KB, 111 views)
Nutella Glas is offline  
Thanks
2 Users
Old 07/12/2009, 12:38   #2
 
Neon™'s Avatar
 
elite*gold: 50
Join Date: Feb 2009
Posts: 2,173
Received Thanks: 1,766
5 Stunden? WTF?? O.o
Neon™ is offline  
Old 07/12/2009, 12:39   #3
 
elite*gold: 0
Join Date: Jun 2008
Posts: 20
Received Thanks: 4
bin halt noch anfänger und musste mich komplett durchschlagen und durch probieren
Nutella Glas is offline  
Old 07/12/2009, 12:47   #4



 
Frutex's Avatar
 
elite*gold: 0
Join Date: Jan 2009
Posts: 18,580
Received Thanks: 3,864
Nette Idee mit dem Randomsleep den Deathcheck zu callen xD
Kann es sein das du auch ein bissl c&p benutzt hast?
Und du brauchst den deathcheck nicht noch extra callen..
Eine Sache zur ident..das geht auch einfacher
Frutex is offline  
Old 07/12/2009, 12:51   #5
 
elite*gold: 20
Join Date: Feb 2007
Posts: 3,080
Received Thanks: 4,294
ist zwar noch ne menge zu überarbeiten, aber fürs erste projekt ganz ok, vor allem gabs den bot hier noch nicht.
kknb is offline  
Old 07/12/2009, 13:03   #6
 
Syc0n's Avatar
 
elite*gold: 20
Join Date: Oct 2008
Posts: 1,835
Received Thanks: 1,638
Für das 1. Projekt sehr gut.

Versteh zwar nich wieso das:
Quote:
WinWait("Guild Wars","")
If Not WinActive("Guild Wars","") Then WinActivate("Guild Wars","")
WinWaitActive("Guild Wars","")
da drin is, weil der Bot ja eh im Hintergrund läuft, aber trotzdem gute Arbeit.
Syc0n is offline  
Old 07/12/2009, 14:25   #7
 
elite*gold: 0
Join Date: Dec 2007
Posts: 301
Received Thanks: 53
Quote:
Originally Posted by kknb View Post
ist zwar noch ne menge zu überarbeiten, aber fürs erste projekt ganz ok, vor allem gabs den bot hier noch nicht.
Doch einen Bot der an der stelle Elite-Tomes farmt gab es schonmal und zwar von mir war mein erster Bot den ich hier public gestellt hab xD. Der bot läuft sogar noch

hier der link


mfg
Hokler
Hokler is offline  
Old 07/12/2009, 14:37   #8
 
elite*gold: 0
Join Date: Jun 2008
Posts: 20
Received Thanks: 4
misst und ich hab gedacht ich hätte mal was neues :'(

achso und was ist c&p ?
Nutella Glas is offline  
Old 07/12/2009, 14:44   #9
 
in MIND's Avatar
 
elite*gold: 0
Join Date: Apr 2009
Posts: 442
Received Thanks: 189
copy & paste, also kopieren und einfügen
in MIND is offline  
Old 07/12/2009, 14:51   #10



 
Frutex's Avatar
 
elite*gold: 0
Join Date: Jan 2009
Posts: 18,580
Received Thanks: 3,864
Es soll keine direkte Anschuldigung sein..
mir kommen ein paar funcs bekannt vor
Frutex is offline  
Old 07/12/2009, 14:56   #11
 
elite*gold: 0
Join Date: Jun 2008
Posts: 20
Received Thanks: 4
ja nen paar sachen habe ich kopiert waren so die sachen wo ich nicht weiter wusste.

@indisturbalcha wie mienst du das das das identen einfacher geht?
Nutella Glas is offline  
Old 07/12/2009, 17:10   #12
 
in MIND's Avatar
 
elite*gold: 0
Join Date: Apr 2009
Posts: 442
Received Thanks: 189
er meint mit arrays

ist gut erklärt, was ein array is (link ursprünglich von Moep)

schau dir doch auch inner tt6 an wies dort gelöst is
in MIND is offline  
Old 07/12/2009, 19:20   #13
 
elite*gold: 0
Join Date: Jun 2008
Posts: 20
Received Thanks: 4
alles klar ok also bei array verstehe ich nur bahnhof wenn sich mein hirn beruhigt hat gucke ich mal in der tt6. danke aber für die schnelle antwort
Nutella Glas is offline  
Old 01/19/2010, 13:59   #14
 
elite*gold: 0
Join Date: Mar 2009
Posts: 3
Received Thanks: 0
öhhm vielleicht ne doofe frage aber wie starte ich den ? hab noch überhaupt keine ahnung davon und finde da keine exe oder so
agali09 is offline  
Old 01/19/2010, 15:14   #15
 
elite*gold: 0
Join Date: Nov 2009
Posts: 153
Received Thanks: 99
it is outdated i think... to try it first download autoitv3, create a new autoitv3 script, copy and paste the code and run it.
Mavygr is offline  
Thanks
1 User
Reply


Similar Threads Similar Threads
Sell 140 Assa, and 95 Assa in 5th Reborn (Eternia)
04/23/2011 - Last Chaos Trading - 22 Replies
Hey alle ich verkaufe : 140 assa 2x g5- 3x b5 eva teile die besten daggs die man haben kann 3x 2x93 95 5 reborn assa: 165-10 10% cast 10% stun
Monk Elite Foli Bot
11/05/2010 - GW Exploits, Hacks, Bots, Tools & Macros - 216 Replies
Here is my new Monk Elite Foli Bot Viel Spass, Updates folgen! 19.02.2010 Update to 1.1 Bug Fixed
Problem mit Elite Monk Foli Bot^^
03/24/2010 - GW Bots - 1 Replies
Huhu! Ich suche mal hilfe... bin völlig frustriert xD Hab mein komplettes Geld ausgegeben für nen char mit dem ich dann Elite Monk Folis farmen wollte..^^ xD Nunja, der char ist jetzt komplett fertig, aber der bot funktioniert bei mir nicht. Ich habe mich eingeloggt, die graphic reininjectet und halt den Fensternamen eingegeben^^
Monk Foli Bot Problem
07/11/2008 - Guild Wars - 10 Replies
Moin, nachdem ich mir den HFFF-Bot von MasteR GunneR angesehen und ihn ein wenig angepasst hab, sodass er bei mir lief und ich den T1 Bot für meine Bedürfnisse umgeschrieben habe, dachte ich mir, es könnte nicht schaden, mal an dem Monk-Foli Bot den Solos gepostet hat rumzuschrauben. (Zum Verständnis für den Satz, ich lerne grade mit AutoIt umzugehen :D) Gescheitert bin ich an dem Runout ausm Wintergarten. Es kann natürlich sein, dass ich zu ungeduldig bin, aber ist es normal, dass der...
assa
03/17/2008 - Kal Online - 11 Replies
is it posseble to change assa mode with the ce? and if it posseble can someone help me in good direction:D thnks



All times are GMT +1. The time now is 04:22.


Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2025 elitepvpers All Rights Reserved.