Register for your free account! | Forgot your password?

Go Back   elitepvpers > MMORPGs > Guild Wars > GW Bots
You last visited: Today at 14:04

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

Advertisement



Bot bewegt sich nicht !!

Discussion on Bot bewegt sich nicht !! within the GW Bots forum part of the Guild Wars category.

Reply
 
Old   #1
 
elite*gold: 0
Join Date: Mar 2009
Posts: 48
Received Thanks: 3
Bot bewegt sich nicht !!

ich habe hier ein bott gemacht der elite monk folis für gw farmen soll...aber i-wie bewegt er sich nicht...

Frage2: Muss MoveTo(.....) im Scribt auch farbig sein ?? bei mir sind sie alle normal schwarz

Code:
#cs-----------------------------------------------------------------
Guild Wars Bot

Farmt: Elite Mönch Folianten 
Boss: Byzzr Schwingenflicker
Ort: Melandrus Hoffnung
Ausenposten: Lutgardis-Wintergarten



#ce-----------------------------------------------------------------



#include <tt6.au3> 

; globals
Global $runs = 0


;Activiert Guild Wars
If Not WinActivate("Guild Wars") Then
WinActivate("Guild Wars")
EndIf
Sleep(3500)



;Hotkeys
HotKeySet("{END}", "_end")
HotKeySet("{PAUSE}", "TogglePause")

Func TogglePause()
	$Paused = NOT $Paused
	While $Paused
		sleep(100)
        ToolTip('Script is "Paused"',0,0)
	WEnd
ToolTip("Script is running")
If Not WinActivate("Guild Wars") Then
	WinActivate("Guild Wars")
EndIf
Sleep(2000)
EndFunc

func _end()
Exit
EndFunc





; wayout South
If CheckArea(-10409,-726) Then
	PrepMoveTo()
	moveto(1,-9906,-660)
	moveto(1,-9906,-660)
	moveto(1,-9906,-660)
	moveto(1,-9468,152)
	moveto(1,-9116,354)
	moveto(1,-8670,582)
	moveto(1,-8285,977)
	moveto(1,-7732,1569)
	KeepMoveTo()
	Sleep(5000)
	StopMoveTo()
	
;wayout middle
	ElseIf CheckArea(-10388,1661) Then
		moveto(1,-10257,861)
		moveto(1,-9951,562)
		moveto(1,-9379,350)
		moveto(1,-8935,485)
		moveto(1,-8519,768)
		moveto(1,-7727,1636)
		KeepMoveTo()
		Sleep(5000)
		StopMoveTo()
		
;wayout North
	ElseIf CheckArea(-10423,2653) Then
		moveto(1,-10022,2518)
		moveto(1,-9679,2376)
		moveto(1,-9631,2284)
		moveto(1,-9583,1291)
		moveto(1,-9557,535)
		moveto(1,-9169,348)
		moveto(1,-8821,502)
		moveto(1,-8386,891)
		moveto(1,-7698,1577)
		KeepMoveTo()
		Sleep(5000)
		StopMoveTo()
	
;waytoboss
	ElseIf CheckArea(-7374,2002) Then
		Sleep(2000)
		moveto(1,-7727,2764)
		moveto(1,-7781,4430)
		moveto(1,-7911,4673)
		moveto(1,-8918,5656)
		moveto(1,-10234,7241)
		moveto(1,-10775,8016)
		moveto(1,-11238,8832)
		StopMoveTo()
EndIf
	
	
;killByzzr
Sleep(1000)
Send("c")
Sleep(200)
$sel = _memoryread($memnpcidselect,$hprocess)
Sleep (500)
Send("1")
Sleep (100)
Send("2")
Sleep (1200)
Send("3")
Sleep(16500)
Send("2")
Sleep(15000)
Send("6")

;wait until Byzzr is dead
	$oldsel = $sel 
		While $sel = $oldsel
		KeySend("5")
		RndSleep(2200)
		$sel = _memoryread($memnpcidselect,$hprocess)
		Wend

;check for teleport and collect all loot
KeySend("ö")
Sleep(200)
$sel = _memoryread($memnpcidselect,$hprocess)
	If $sel > 0 Then
		KeySend("8")
		RndSleep(800)
		CollectLoot(5)
	EndIf

;resign
RndSleep(500)
Resign()


; start again
	$runs +=1
	RndSleep(4000)
Zabrus is offline  
Old 04/06/2009, 21:53   #2
 
blauwiggle's Avatar
 
elite*gold: 0
The Black Market: 123/0/1
Join Date: Apr 2006
Posts: 1,722
Received Thanks: 476
PrepMoveTo() fehlt beim Rest. Das mit den Farben nennt sich Syntax Highlighting.
blauwiggle is offline  
Old 04/06/2009, 22:29   #3
 
elite*gold: 20
Join Date: Feb 2007
Posts: 3,080
Received Thanks: 4,294
die beiden zeilen einfach tauschen, dann sollte das soweit passen.

If CheckArea(-10409,-726) Then
PrepMoveTo()

also das prepmoveto zuerst.
kknb is offline  
Old 04/07/2009, 07:47   #4
 
elite*gold: 0
Join Date: Mar 2009
Posts: 48
Received Thanks: 3
Ich habs jetz so:

PrepMoveTo()
If CheckArea(-10409,-726) Then
.......

Aber leider bewegt er sich immer noch ned :-/

Nochmal zu Frage2: Ist dieses moveto und alle anderen von der tt6 include jetz farbig?
Ich hab im Include ordner die TT6 datei. Was soll ich mit
den andere beiden .INI dateien machen ?
Zabrus is offline  
Old 04/07/2009, 09:08   #5
 
elite*gold: 0
Join Date: Dec 2007
Posts: 137
Received Thanks: 30
Quote:
Originally Posted by Zabrus View Post
Nochmal zu Frage2: Ist dieses moveto und alle anderen von der tt6 include jetz farbig?
Ich hab im Include ordner die TT6 datei. Was soll ich mit
den andere beiden .INI dateien machen ?
Nein.
In den selben Ordner sonst kann das Ding gar nicht laufen.


Außerdem würde ich dir empfehlen Random() in deine MoveTo-Wege einzubauen.
bingbongman is offline  
Old 04/07/2009, 09:24   #6
 
elite*gold: 0
Join Date: Mar 2009
Posts: 48
Received Thanks: 3
wie meinste das mit Random() ?? zwischen jedem move to ?? dann bleibt er doch nach jedem wegpunkt stehen...ich gebiet ja...aber im ausenposten wäre das ein wenig ausfällig ?

/edit: hab alle 3 dateien im selben ordner
Zabrus is offline  
Old 04/07/2009, 10:06   #7
 
N.E.O.'s Avatar
 
elite*gold: 45
Join Date: Nov 2008
Posts: 4,308
Received Thanks: 991
Richtige Memorys?

Code:
; update.ini [Gw.exe] - __wadim 
; 31.3.2009 - 7:9

[SECTION 9-A]
AX					= 0xa05750
AY					= 0xa05754
AREA_ID					= 0xa06598
NO_NPC					= 0xa07334
DEATH					= 0xa057d4
MOUSE_COORDX				= 0xa05de0
MOUSE_COORDY				= 0xa05de4
CAMCOURSEA				= 0xa056c2
CAMCOURSEB				= 0xa05678
EX_AREA_ID				= 0xa03078
EXPANDERA				= 0xa05683
EXPANDERB				= 0xa05682
LVL					= 0xa030b8
PVP_PVE					= 0xa030c4
PING					= 0xa004dc
INTERFACE				= 0xa01b30
LOGIN					= 0xa057f0
EMAIL					= 0xa01b34
MOVETO_TARGET				= 0xa05dc4
MAPPLAYER				= 0xa05dcc
MAPTIME					= 0xa056b8
PNAME					= 0xa00528
STORAGE					= 0xa020a4
SELLBAGX				= 0xa02028
MOUSEACTION				= 0x9f99f0
MESSAGE					= 0xa05e27
INVENTAR				= 0xa02594
HERO					= 0xa02508
MMAP					= 0xa025e4
PARTY					= 0xa0265c
CHEST					= 0xa025a8
ALLBAG					= 0xa025bc
GUILD					= 0xa02574
SKILL					= 0xa02530
TRADE					= 0xa027b0
PARTYSEARCH				= 0xa02678
MERCHANT				= 0xa027d8
;x					= 0x0
;y					= 0x4
;width					= 0x8
;height					= 0x12

MOVECHAR				= 0xa05dac
;back					= 0x4
;left					= 0x8
;right					= 0xc
;tleft					= 0x10
;tright					= 0x14

[SECTION D]
POSX					= 0xd28d64
POSY					= 0xd28d68
CHECK_MAP				= 0xd28a00
NPC_ID_NEAR				= 0xd28610
NPC_ID_SELECT				= 0xd285f0
NPC_ID_MOUSE_SELECT			= 0xd285fc
CLIENTPATH				= 0xd295d8
KNOCKDOWN				= 0xd2a7b8

P_HEALTH				= 0xd28ab8
;_M_HP					= 0x130
;_M_E					= 0x11c
;_M_MAX_HP				= 0x134
;_M_MAX_E				= 0x120
N.E.O. is offline  
Thanks
1 User
Old 04/07/2009, 10:18   #8
 
elite*gold: 0
Join Date: Mar 2009
Posts: 48
Received Thanks: 3
jaaa ^^ mein erster bot kann laufen xD

vielen dank...anscheinen war meine update.ini veraltet oO
Zabrus is offline  
Old 04/07/2009, 11:27   #9
 
elite*gold: 0
Join Date: Mar 2009
Posts: 48
Received Thanks: 3
Nr.1 : hmm das mit dem aufheben funct i-wie nicht.
wie kann ich das machen das er wenn er "ö" drückt nur teleportier und aufhebt, wenn da auch was ist

Hab ein wenig an pixel farben gedacht kenn aber die richtigen befehle nicht... hat vlt einer ne Vorlage?
(Bitte nicht das PixelTUT...hab ich selber gelesen und hat mir ned viel gebracht)

Nr.2: Wenn er eine runde beendet hat hört er auf :-/ wie mach ich das er immer weiter machen ? vlt while ganz oben hin ?

Hier mein aktueller StanD:


Code:
#include <tt6.au3> 

; globals
Global $runs = 0


Controlmove("Guild Wars", "", 0, 0, 0, 1024, 768)	
	Opt("MouseCoordMode",0)


;Activiert Guild Wars
WinWait("Guild Wars","")
If Not WinActive("Guild Wars","") Then WinActivate("Guild Wars","")
WinWaitActive("Guild Wars","")
Sleep(Random(2000, 3000))



;Hotkeys
HotKeySet("{END}", "_end")
HotKeySet("{PAUSE}", "TogglePause")

Func TogglePause()
	$Paused = NOT $Paused
	While $Paused
		sleep(100)
        ToolTip('Script is "Paused"',0,0)
	WEnd
ToolTip("Script is running")
If Not WinActivate("Guild Wars") Then
	WinActivate("Guild Wars")
EndIf
Sleep(2000)
EndFunc

func _end()
Exit
EndFunc





; wayout South
	PrepMoveTo()
If CheckArea(-10409,-726) Then
		moveto(1,-10154,-629)
		moveto(1,-9912,-563)
		moveto(1,-9644,-391)
		moveto(1,-9558,-144)
		moveto(1,-9486,130)
		moveto(1,-9271,329)
		moveto(1,-9029,474)
		moveto(1,-8767,598)
		moveto(1,-8517,775)
		moveto(1,-8232,1027)
		moveto(1,-7777,1503)
	StopMoveTo()
	
;wayout middle
	PrepMoveTo()
	ElseIf CheckArea(-10388,1661) Then
		moveto(1,-10325,950)
		moveto(1,-10252,693)
		moveto(1,-10099,537)
		moveto(1,-9897,453)
		moveto(1,-9751,452)
		moveto(1,-9360,406)
		moveto(1,-8925,426)
		moveto(1,-8678,511)
		moveto(1,-8471,721)
		moveto(1,-7777,1503)
		StopMoveTo()
		
		
;wayout North
PrepMoveTo()
	ElseIf CheckArea(-10381,2586) Then
		moveto(1,-9996,2519)
		moveto(1,-9719,2412)
		moveto(1,-9552,2167)
		moveto(1,-9536,1823)
		moveto(1,-9564,802)
		moveto(1,-9530,509)
		moveto(1,-9384,332)
		moveto(1,-9161,264)
		moveto(1,-8887,295)
		moveto(1,-8670,515)
		moveto(1,-8187,1103)
		moveto(1,-7777,1503)
		StopMoveTo()
EndIf
	
;wayout
If CheckArea(-7777,1503) Then
	Send("r")
	Sleep(Random (5000, 7000))
EndIf



	

;waytoboss
PrepMoveTo()
If CheckArea(-7366,2017) Then
moveto(1,-7727,2764)
moveto(1,-7781,4430)
moveto(1,-7911,4673)
moveto(1,-8918,5656)
moveto(1,-10234,7241)
moveto(1,-10775,8016)
moveto(1,-11238,8832)
StopMoveTo()
		
;killByzzr
Sleep(1000)
Send("c")
Sleep(200)
Sleep (500)
Send("1")
Sleep (1100)
Send("2")
Sleep (1200)
Send("3")
Sleep(16500)
Send("2")
Sleep(15000)
Send("6")

;Gegenstände aufheben
Sleep(4000)
Send("ö")
Sleep(200)
Send("8")
Sleep(200)
Send("{SPACE}")
Sleep(1000)
Send("ö")
sleep(200)
Send("{SPACE}")
Sleep(1000)
Send("ö")
sleep(200)
Send("{SPACE}")
Sleep(1000)
Send("ö")
sleep(200)
Send("{SPACE}")
Sleep(1000)


;resign
send("-")
Sleep(200)
send("r")
Sleep(200)
send("e")
Sleep(200)
send("s")
Sleep(200)
send("i")
Sleep(200)
send("g")
Sleep(200)
send("n")
Sleep(200)
send("{ENTER}")
Sleep(Random(4000, 5000))
MouseClick ("Left", 507, 402, 1, 5)
Sleep(Random(4000, 5000))
EndIf

; start again
	$runs +=1
	RndSleep(4000)
Zabrus is offline  
Old 04/07/2009, 12:21   #10


 
buFFy!'s Avatar
 
elite*gold: 1826
Join Date: Mar 2009
Posts: 4,310
Received Thanks: 6,284
Quote:
Originally Posted by Zabrus View Post
Nr.1 : hmm das mit dem aufheben funct i-wie nicht.
wie kann ich das machen das er wenn er "ö" drückt nur teleportier und aufhebt, wenn da auch was ist

Hab ein wenig an pixel farben gedacht kenn aber die richtigen befehle nicht... hat vlt einer ne Vorlage?
(Bitte nicht das PixelTUT...hab ich selber gelesen und hat mir ned viel gebracht)

Nr.2: Wenn er eine runde beendet hat hört er auf :-/ wie mach ich das er immer weiter machen ? vlt while ganz oben hin ?

Hier mein aktueller StanD:


Code:
#include <tt6.au3> 

; globals
Global $runs = 0


Controlmove("Guild Wars", "", 0, 0, 0, 1024, 768)	
	Opt("MouseCoordMode",0)


;Activiert Guild Wars
WinWait("Guild Wars","")
If Not WinActive("Guild Wars","") Then WinActivate("Guild Wars","")
WinWaitActive("Guild Wars","")
Sleep(Random(2000, 3000))



;Hotkeys
HotKeySet("{END}", "_end")
HotKeySet("{PAUSE}", "TogglePause")

Func TogglePause()
	$Paused = NOT $Paused
	While $Paused
		sleep(100)
        ToolTip('Script is "Paused"',0,0)
	WEnd
ToolTip("Script is running")
If Not WinActivate("Guild Wars") Then
	WinActivate("Guild Wars")
EndIf
Sleep(2000)
EndFunc

func _end()
Exit
EndFunc





; wayout South
	PrepMoveTo()
If CheckArea(-10409,-726) Then
		moveto(1,-10154,-629)
		moveto(1,-9912,-563)
		moveto(1,-9644,-391)
		moveto(1,-9558,-144)
		moveto(1,-9486,130)
		moveto(1,-9271,329)
		moveto(1,-9029,474)
		moveto(1,-8767,598)
		moveto(1,-8517,775)
		moveto(1,-8232,1027)
		moveto(1,-7777,1503)
	StopMoveTo()
	
;wayout middle
	PrepMoveTo()
	ElseIf CheckArea(-10388,1661) Then
		moveto(1,-10325,950)
		moveto(1,-10252,693)
		moveto(1,-10099,537)
		moveto(1,-9897,453)
		moveto(1,-9751,452)
		moveto(1,-9360,406)
		moveto(1,-8925,426)
		moveto(1,-8678,511)
		moveto(1,-8471,721)
		moveto(1,-7777,1503)
		StopMoveTo()
		
		
;wayout North
PrepMoveTo()
	ElseIf CheckArea(-10381,2586) Then
		moveto(1,-9996,2519)
		moveto(1,-9719,2412)
		moveto(1,-9552,2167)
		moveto(1,-9536,1823)
		moveto(1,-9564,802)
		moveto(1,-9530,509)
		moveto(1,-9384,332)
		moveto(1,-9161,264)
		moveto(1,-8887,295)
		moveto(1,-8670,515)
		moveto(1,-8187,1103)
		moveto(1,-7777,1503)
		StopMoveTo()
EndIf
	
;wayout
If CheckArea(-7777,1503) Then
	Send("r")
	Sleep(Random (5000, 7000))
EndIf



	

;waytoboss
PrepMoveTo()
If CheckArea(-7366,2017) Then
moveto(1,-7727,2764)
moveto(1,-7781,4430)
moveto(1,-7911,4673)
moveto(1,-8918,5656)
moveto(1,-10234,7241)
moveto(1,-10775,8016)
moveto(1,-11238,8832)
StopMoveTo()
		
;killByzzr
Sleep(1000)
Send("c")
Sleep(200)
Sleep (500)
Send("1")
Sleep (1100)
Send("2")
Sleep (1200)
Send("3")
Sleep(16500)
Send("2")
Sleep(15000)
Send("6")

;Gegenstände aufheben
Sleep(4000)
Send("ö")
Sleep(200)
Send("8")
Sleep(200)
Send("{SPACE}")
Sleep(1000)
Send("ö")
sleep(200)
Send("{SPACE}")
Sleep(1000)
Send("ö")
sleep(200)
Send("{SPACE}")
Sleep(1000)
Send("ö")
sleep(200)
Send("{SPACE}")
Sleep(1000)


;resign
send("-")
Sleep(200)
send("r")
Sleep(200)
send("e")
Sleep(200)
send("s")
Sleep(200)
send("i")
Sleep(200)
send("g")
Sleep(200)
send("n")
Sleep(200)
send("{ENTER}")
Sleep(Random(4000, 5000))
MouseClick ("Left", 507, 402, 1, 5)
Sleep(Random(4000, 5000))
EndIf

; start again
	$runs +=1
	RndSleep(4000)
Code:
Func _LootAllItems($max = 10)
	$Aktion = "Items aufheben..."
	$time2 = TimerInit()
	While _memoryread($memnpcidselect, $hprocess) > 0 Or $nr <> $max
		$max = $max + 1
		ControlSend($hwnd, "", "", "{o}")
		Sleep(Random(350, 400))
		ControlSend($hwnd, "", "", "{space}")
		If TimerDiff($time2) > 7000 Then
			ExitLoop
		EndIf
	WEnd
	Sleep(1000)
EndFunc   ;==>_LootAllItems

Hier hört er auf wenn die anzahl der aufgehobenen items = $max ist oder er o drückt und nix mehr anvisiert hat und 7 Sekunden um sind. Durch die $max_$min Funktion gibts dann auch keine Probleme mehr mit Truhen oder so.
buFFy! is offline  
Old 04/07/2009, 13:37   #11
 
elite*gold: 0
Join Date: Mar 2009
Posts: 48
Received Thanks: 3
das mit dem aufheben geht nicht

Er teleportiert sich zu leiche und gibt gleich /resign ein...er lässt dann alles liegen
Zabrus is offline  
Old 04/07/2009, 18:37   #12
 
cab_killer's Avatar
 
elite*gold: 9
Join Date: Jan 2009
Posts: 206
Received Thanks: 24
Da gibt es eine Funktion in der tt6
CollectLoot(20)
Die 20 kannst du belibig ändern, die sagt nur aus wieviel gegenstände er aufheben soll.

Für die Runden angabe kannst du entweder am Anfang While und am ende deines bottes Wend eingeben
damit wiederholt er es andauernd.
Oder du baust dir eine Schleife rein
For $i = 1 To 20
deine funktionen
Next

Somit wiederholt er deine Funktionen 20 mal


MFG
cab_killer is offline  
Thanks
1 User
Old 04/08/2009, 11:21   #13
 
elite*gold: 0
Join Date: Mar 2009
Posts: 48
Received Thanks: 3
vielen dank , jetz geht es
Zabrus is offline  
Reply


Similar Threads Similar Threads
Spwan punkt bewegt sich nicht
07/20/2010 - Metin2 Private Server - 1 Replies
Hi , habe nen Prob , wenn ich bei Meiner neuen map die Serverside , sowie clientside schon geht , jedoch will der Spwan punkt einfach NICHT übernommen werden .... Wisst ihr vlt was ich machen muss? füge spwanpunkt in die Town.txt ein , lad es in den Map ordner reboote , und er hat sich kein Millimeter verändert
KuK BOT PALA bewegt Sich Nicht? Hä
10/11/2009 - Diablo 2 - 1 Replies
Hallo an alle druchgeknallten^^ Ich hab mir Gerade Den KUK Bot gedownloaded(Komisches Wort wa)^^ und nun STartet auch alles Feini aber der Pala macht nix, er bleibt Steh und freut sich das er Stehen darf :-) Was hab ich falsch gemacht? :mofo:Kati
Maus bewegt sich ständig von alleine
09/30/2008 - Technical Support - 20 Replies
Hallo Leute :mad: Habe ein ziemlich nerviges Problem, mein Mauszeiger bewegt sich oft einfach zwischendurch nach oben rechts, oben links etc. Wenn ich zb Counter Strike spiele dann verzieht der mir immer und ich treff die Decke. Echt nervig. Das ganze ist nur kein Virus, sondern es liegt an derMaus selber. Ich habe eine MX™300 Optical Mouse. Habe auch schon mit Google diesen Thread heir gefunden Logitech MX 1000 Problem, Mauszeiger springt dauernd - Forum - CHIP Online In dem Thread...
Bot Problem, bewegt sich nicht/don't move
10/25/2007 - Silkroad Online - 0 Replies
Hallo! Also, ich habe folgendes Problem: Egal ob ich TBot oder ISroBot benutze, der Bot greift schön brav an, rührt sich aber nicht vom Fleck. Bis vor einer Woche funzte alles wunderbar. Habe auch nix in den Settings verändert..... Weiß vll. jemand woran das liegt ? BiOsPhErE
2.11.05 || Bot bewegt sich nicht mehr?!
11/15/2005 - Ragnarok Online - 1 Replies
Habe den Bot OpenKore (version 1.6.4) schon ca 2 Monate bis gestern immer alles super und ohne Probleme gelaufen ;) ( auf euro server ) Nur jetzt start ich den und der gewegt sich nicht mehr wenn der ein monster sieht killt es und setzt sich wieder hin (HP immer voll) also mein Problem der will nicht mehr auf der map rum laufen und monster suchen ?! was kann ich machen ? Danke im vorraus



All times are GMT +2. The time now is 14:04.


Powered by vBulletin®
Copyright ©2000 - 2024, 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 ©2024 elitepvpers All Rights Reserved.