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 ?
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.
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 ?
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)
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.
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
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
