|
You last visited: Today at 06:02
Advertisement
Ungewöhnliche Frage! Wichtig!
Discussion on Ungewöhnliche Frage! Wichtig! within the AutoIt forum part of the Coders Den category.
06/10/2009, 18:22
|
#1
|
elite*gold: 0
Join Date: Jun 2009
Posts: 3
Received Thanks: 0
|
Ungewöhnliche Frage! Wichtig!
Hy an alle,
bin neu hier und habe Folgendes Problem bei einem bot:
Ich möchte 2 pixelsearch funktionen machen in diesem code so das er nach 2 farben sucht aber den 1 selben mousemove verwendet!
Code:
HotKeySet("x", "MeinExit")
HotKeySet("y", "StartStop")
HotKeySet("a", "Schuss")
MsgBox( 1, "Auanoid Bot - by Flochek", "Start and Stop the Bot with Y shoot the b")
Global $On
$On = False
while 1
while $On = True
$Ballposition = PixelSearch( 40, 436, 622, 557, 0x070C20, 1)
;HIER MEIN DENKFEHLER ODER
;HIER MEIN DENKFEHLER $Ballposition = PixelSearch( 40, 436, 622, 557, 0xCECF42, 1)
if IsArray($Ballposition) = True Then
MouseMove( $Ballposition[0], $Ballposition[1], 0)
Endif
wend
wend
Func StartStop()
If $On = False Then
$On = True
Else
$On = False
EndIf
EndFunc
Func Schuss()
MouseClick("left", 324, 398)
EndFunc
Func MeinExit()
Exit
EndFunc
also er sucht nach der farbe 0x070C20 und der farbe 0xCECF42 und wenn er eine der beiden findet soll er den mousemove machen!
danke für eure hilfe im vorraus
greetz flo
|
|
|
06/13/2009, 20:22
|
#2
|
elite*gold: 77
Join Date: May 2008
Posts: 5,430
Received Thanks: 5,876
|
Quote:
Originally Posted by flochek
Hy an alle,
bin neu hier und habe Folgendes Problem bei einem bot:
Ich möchte 2 pixelsearch funktionen machen in diesem code so das er nach 2 farben sucht aber den 1 selben mousemove verwendet!
Code:
HotKeySet("x", "MeinExit")
HotKeySet("y", "StartStop")
HotKeySet("a", "Schuss")
MsgBox( 1, "Auanoid Bot - by Flochek", "Start and Stop the Bot with Y shoot the b")
Global $On
$On = False
while 1
while $On = True
$Ballposition = PixelSearch( 40, 436, 622, 557, 0x070C20, 1)
;HIER MEIN DENKFEHLER ODER
;HIER MEIN DENKFEHLER $Ballposition = PixelSearch( 40, 436, 622, 557, 0xCECF42, 1)
if IsArray($Ballposition) = True Then
MouseMove( $Ballposition[0], $Ballposition[1], 0)
Endif
wend
wend
Func StartStop()
If $On = False Then
$On = True
Else
$On = False
EndIf
EndFunc
Func Schuss()
MouseClick("left", 324, 398)
EndFunc
Func MeinExit()
Exit
EndFunc
also er sucht nach der farbe 0x070C20 und der farbe 0xCECF42 und wenn er eine der beiden findet soll er den mousemove machen!
danke für eure hilfe im vorraus
greetz flo
|
naja dann machste das halt so
Code:
HotKeySet("x", "MeinExit")
HotKeySet("y", "StartStop")
HotKeySet("a", "Schuss")
MsgBox( 1, "Auanoid Bot - by Flochek", "Start and Stop the Bot with Y shoot the b")
Global $On
$On = False
while 1
while $On = True
$Ballposition = PixelSearch( 40, 436, 622, 557, 0x070C20, 1)
if not @error Then
MouseMove( $Ballposition[0], $Ballposition[1], 0)
Endif
$Ballposition = PixelSearch( 40, 436, 622, 557, 0xCECF42, 1)
if not @error Then
MouseMove( $Ballposition[0], $Ballposition[1], 0)
Endif
wend
wend
Func StartStop()
If $On = False Then
$On = True
Else
$On = False
EndIf
EndFunc
Func Schuss()
MouseClick("left", 324, 398)
EndFunc
Func MeinExit()
Exit
EndFunc
so müsste es gehen , wie du es meinst
Edit
Am besten wäre , wennste das Mausklick , pixelsearch gezeugse in eine funktion reinschreibst ......
dann brauchste das ganze auch net sooft tippen und es wird dann viel übersichtlicher ;-)
Aber ich schätze das muss nicht sein , bist ja noch ziehmlich neu .....
|
|
|
06/14/2009, 18:44
|
#3
|
elite*gold: 0
Join Date: Jun 2009
Posts: 3
Received Thanks: 0
|
sehr gut haut hin auf die art und weise
danke
greetz flo
|
|
|
|
Similar Threads
|
Ungewöhnliche Frage
07/22/2010 - Metin2 Private Server - 5 Replies
OBWOHL ich weis dass diese FRAGE NIEMAND beantworten wird, stell ich sie einfach mal :D :
Wie modde ich Fertigkeiten auf einem Macintosh, sprich einem Apple Computer? Spielen kann ich ja metin2 aber modden ... wie geht das?
gibt es hier vll einen macuser??? xDD:p:p:p:p
|
Ungewöhnliche Spielhandlung?!?
06/16/2010 - WarRock - 5 Replies
lol ich hab gerade ne runde marien gezockt, als plötzlich das Spiel mit der Nachricht "Verbindung aufgrund ungewöhnlicher Spielhandlung abgebrochen" zusammenbrach. Weiß jemand wie das passieren konnte ?
PS: Ich hab ohne Hacks gespielt.
|
Root Server frage WICHTIG WICHTIG!
03/28/2010 - Metin2 Private Server - 12 Replies
Hallo,
ich habe eine frage, (der jenige wo sie mir beantwortet, bekommt 2 elite*gold + 1 thanks ;)
und zwar: was muss ich in vpc eingeben, bei Networking für ip's? (es ist ein root)
und bei portmap z.b. .218 oder .100?
und im mc.txt .218 oder .100?
ich danke euch.
|
[List]Ungewöhnliche Questbelohnungen(Longju3)
03/25/2009 - Metin2 Private Server - 53 Replies
Also Leute ich habe beschlossen eine Liste zu machen von allen Quests die nützlich sind auf longju3 und das lvl dazu wenn ihr ergänzungen habt schreibt sie hier rein oder schreibt sie mir ig unter BelieveMe.
Level 35 - --- Die Goldaxt von Deokbae----suche die Goldene Axt (töte Wilder General) und brings sie dem Holzfäller Map2 Belohnung 400.000 Exp und 30.000 Yang und ein Steinsplitterbuch
Level 37 - Yu-Rang----töte Babyspinnen und suche das Glöckchen geh zu Taurean dann wieder...
|
Ungewöhnliche Questbelohnung [2] ^^
02/01/2009 - Metin2 Private Server - 6 Replies
Also mir ist aufgefallen ; das es bei der 21er Quuest gar keinen Silberarmband gibt , sondern Rotes Haarband oder wie das heißt -.-
Euch auch ?
|
All times are GMT +2. The time now is 06:02.
|
|