|
You last visited: Today at 23:09
Advertisement
Autoit Problem
Discussion on Autoit Problem within the AutoIt forum part of the Coders Den category.
02/25/2014, 19:28
|
#1
|
elite*gold: 0
Join Date: Jan 2014
Posts: 347
Received Thanks: 31
|
Autoit Problem
Hi ich versuche seid heute einen Programm zu scripten womit man wenn man die Taste X drückt alle Coordinaten die aufgeschrieben sind mmkit einen Links Click anklickt. Aber irgendiwe geht das nicht :/ (Ich versuche seid heute wieder mit Autoit zu scripten und habe deswegen Probleme wo die anderen bloß lachen)
Code:
Code:
HotKeySet ("{X}", "Start")
HotKeySet("{Y}","Pause")
HotKeySet ("{Z}", "_Exit")
While 1
Sleep(250)
WEnd
Func Start()
While 1
$pos = PixelSearch(0,0,1920,1080)
If IsArray($pos) Then
MouseMove(683,307,1)
MouseClick("Left")
MouseMove(744,307,1)
MouseClick("Left")
MouseMove(819,307,1)
MouseClick("Left")
MouseMove(891,307,1)
MouseClick("Left")
MouseMove(945,307,1)
MouseClick("Left")
MouseMove(1036,307,1)
MouseClick("Left")
MouseMove(1102,307,1)
MouseClick("Left")
MouseMove(1158,307,1)
MouseClick("Left")
MouseMove(1244,307,1)
MouseClick("Left")
MouseMove(671,372,1)
MouseClick("Left")
MouseMove(739,372,1)
MouseClick("Left")
MouseMove(818,372,1)
MouseClick("Left")
MouseMove(875,372,1)
MouseClick("Left")
MouseMove(960,372,1)
MouseClick("Left")
MouseMove(1021,372,1)
MouseClick("Left")
MouseMove(1116,372,1)
MouseClick("Left")
MouseMove(1185,372,1)
MouseClick("Left")
MouseMove(664,445,1)
MouseClick("Left")
MouseMove(749,445,1)
MouseClick("Left")
MouseMove(828,445,1)
MouseClick("Left")
MouseMove(885,445,1)
MouseClick("Left")
MouseMove(954,445,1)
MouseClick("Left")
MouseMove(1028,445,1)
MouseClick("Left")
MouseMove(1118,445,1)
MouseClick("Left")
MouseMove(1167,445,1)
MouseClick("Left")
MouseMove(1249,445,1)
MouseClick("Left")
EndIf
WEnd
EndFunc
Func Pause()
Sleep(100)
EndFunc
Func _Exit()
Exit
EndFunc
|
|
|
02/25/2014, 19:47
|
#2
|
elite*gold: 95
Join Date: May 2011
Posts: 982
Received Thanks: 189
|
kontrollier mal ob pixelsearch ausgelößt wird. wenns im spiel ist hats vllt nen hackshield
|
|
|
02/25/2014, 19:52
|
#3
|
elite*gold: 0
Join Date: Jan 2014
Posts: 347
Received Thanks: 31
|
//Edit hat sich erledigt hatte statt X immer x gedrückt xD. Noch eine frage wie bekomme ich es hin das sobald der Mauszeiger auf eine Positon zeigt eine Taste+ Linksclick gedrückt wird?
|
|
|
02/25/2014, 20:04
|
#4
|
elite*gold: 60
Join Date: Aug 2009
Posts: 2,256
Received Thanks: 815
|
Send und dann MouseClick?
Außerdem ist der Titel dieses Threads falsch, du solltest ihn beim nächsten mal besser wählen.
|
|
|
02/25/2014, 20:30
|
#5
|
elite*gold: 0
Join Date: Jan 2014
Posts: 347
Received Thanks: 31
|
Mhh irgendwie geht das nicht kannst du mir ein Beispielt machen es soll beides gleichzeitig gedrückt werden und nicht nacheinander. Also die Shift Taste und Mausklick Links und das nach jeden MouseMove ._.
|
|
|
02/25/2014, 20:44
|
#6
|
elite*gold: 60
Join Date: Aug 2009
Posts: 2,256
Received Thanks: 815
|
Steht alles in der Hilfe aber warum reinschauen?
Code:
Send("{LSHIFT DOWN}")
MouseMove()
Send("{LSHIFT UP}")
|
|
|
02/25/2014, 21:09
|
#7
|
elite*gold: 0
Join Date: Jan 2014
Posts: 347
Received Thanks: 31
|
danke danke danke es klappt ^^. Noch eine letze frage... Ich möchte das so machen das man den Bot mit x aktiviert und dann wenn Rechte Maustaste gedrückt wird das die Schleife aktiviert wird. Kann mir da jmd. helfen?
|
|
|
02/25/2014, 21:20
|
#8
|
elite*gold: 60
Join Date: Aug 2009
Posts: 2,256
Received Thanks: 815
|
Ausm Kopf grad geschmissen
Code:
#include <Misc.au3>
HotKeySet("{x}", "_StartBot")
Global $bPause = True
Func _StartBot()
$bPause = Not $bPause
EndFunc
While 1
If Not $bPause and _IsPressed(02) Then
;... Dein Zeugs hier rein
EndIf
WEnd
|
|
|
02/25/2014, 21:50
|
#9
|
elite*gold: 0
Join Date: Jan 2014
Posts: 347
Received Thanks: 31
|
Mhh irgendwie klappt das nicht so habe gerade ein bisschen rum probiert aber bin zu keiner Lösung gekommen hier die Schleife:
Code:
While 1
If Not $bPause and _IsPressed(02) Then
Send("{LSHIFT DOWN}")
MouseMove(683,307,0)
MouseClick("Left")
MouseMove(744,307,0)
MouseClick("Left")
MouseMove(819,307,0)
MouseClick("Left")
MouseMove(891,307,0)
MouseClick("Left")
MouseMove(945,307,0)
MouseClick("Left")
MouseMove(1036,307,0)
MouseClick("Left")
MouseMove(1102,307,0)
MouseClick("Left")
MouseMove(1158,307,0)
MouseClick("Left")
MouseMove(1244,307,0)
MouseClick("Left")
MouseMove(671,372,0)
MouseClick("Left")
MouseMove(739,372,0)
MouseClick("Left")
MouseMove(818,372,0)
MouseClick("Left")
MouseMove(875,372,0)
MouseClick("Left")
MouseMove(960,372,0)
MouseClick("Left")
MouseMove(1021,372,0)
MouseClick("Left")
MouseMove(1116,372,0)
MouseClick("Left")
MouseMove(1185,372,0)
MouseClick("Left")
MouseMove(1254,372,0)
MouseClick("Left")
MouseMove(664,445,0)
MouseClick("Left")
MouseMove(749,445,0)
MouseClick("Left")
MouseMove(828,445,0)
MouseClick("Left")
MouseMove(885,445,0)
MouseClick("Left")
MouseMove(954,445,0)
MouseClick("Left")
MouseMove(1028,445,0)
MouseClick("Left")
MouseMove(1118,445,0)
MouseClick("Left")
MouseMove(1167,445,0)
MouseClick("Left")
MouseMove(1249,445,0)
MouseClick("Left")
Sleep(10)
Send("{Esc}")
Send("{LSHIFT UP}")
Pause()
EndIf
WEnd
Was nicht klappt ist das die Schleife mit einem rechtsklick ausgeführt wird
//Edit
Ich habe es jetzt so gelöst:
Code:
HotKeySet("{x}", "Start")
Code:
Func Start()
While 1
if _IsPressed(02) Then
Sleep(250)
Send("{LSHIFT DOWN}")
MouseMove(683,307,0)
MouseClick("Left")
MouseMove(744,307,0)
MouseClick("Left")
MouseMove(819,307,0)
MouseClick("Left")
MouseMove(891,307,0)
MouseClick("Left")
MouseMove(945,307,0)
MouseClick("Left")
MouseMove(1036,307,0)
MouseClick("Left")
MouseMove(1102,307,0)
MouseClick("Left")
MouseMove(1158,307,0)
MouseClick("Left")
MouseMove(1244,307,0)
MouseClick("Left")
MouseMove(671,372,0)
MouseClick("Left")
MouseMove(739,372,0)
MouseClick("Left")
MouseMove(818,372,0)
MouseClick("Left")
MouseMove(875,372,0)
MouseClick("Left")
MouseMove(960,372,0)
MouseClick("Left")
MouseMove(1021,372,0)
MouseClick("Left")
MouseMove(1116,372,0)
MouseClick("Left")
MouseMove(1185,372,0)
MouseClick("Left")
MouseMove(1254,372,0)
MouseClick("Left")
MouseMove(664,445,0)
MouseClick("Left")
MouseMove(749,445,0)
MouseClick("Left")
MouseMove(828,445,0)
MouseClick("Left")
MouseMove(885,445,0)
MouseClick("Left")
MouseMove(954,445,0)
MouseClick("Left")
MouseMove(1028,445,0)
MouseClick("Left")
MouseMove(1118,445,0)
MouseClick("Left")
MouseMove(1167,445,0)
MouseClick("Left")
MouseMove(1249,445,0)
MouseClick("Left")
Sleep(10)
Send("{Esc}")
Send("{LSHIFT UP}")
Pause()
EndIf
WEnd
EndFunc
Und es geht alles wie ich es mir vorgestellt habe ^^ Trotzdem danke
|
|
|
02/25/2014, 22:07
|
#10
|
elite*gold: 60
Join Date: Aug 2009
Posts: 2,256
Received Thanks: 815
|
Hast du die Funktionen eingefügt?
Code:
#include <Misc.au3>
Global $bPause = True
HotKeySet ("{X}", "Start")
HotKeySet("{Y}","_TogglePause")
HotKeySet ("{Z}", "_Exit")
While 1
Sleep(250)
WEnd
Func Start()
While 1
If Not $bPause and _IsPressed("02") Then
$pos = PixelSearch(0,0,1920,1080)
If IsArray($pos) Then
MouseMove(683,307,1)
MouseClick("Left")
MouseMove(744,307,1)
MouseClick("Left")
MouseMove(819,307,1)
MouseClick("Left")
MouseMove(891,307,1)
MouseClick("Left")
MouseMove(945,307,1)
MouseClick("Left")
MouseMove(1036,307,1)
MouseClick("Left")
MouseMove(1102,307,1)
MouseClick("Left")
MouseMove(1158,307,1)
MouseClick("Left")
MouseMove(1244,307,1)
MouseClick("Left")
MouseMove(671,372,1)
MouseClick("Left")
MouseMove(739,372,1)
MouseClick("Left")
MouseMove(818,372,1)
MouseClick("Left")
MouseMove(875,372,1)
MouseClick("Left")
MouseMove(960,372,1)
MouseClick("Left")
MouseMove(1021,372,1)
MouseClick("Left")
MouseMove(1116,372,1)
MouseClick("Left")
MouseMove(1185,372,1)
MouseClick("Left")
MouseMove(664,445,1)
MouseClick("Left")
MouseMove(749,445,1)
MouseClick("Left")
MouseMove(828,445,1)
MouseClick("Left")
MouseMove(885,445,1)
MouseClick("Left")
MouseMove(954,445,1)
MouseClick("Left")
MouseMove(1028,445,1)
MouseClick("Left")
MouseMove(1118,445,1)
MouseClick("Left")
MouseMove(1167,445,1)
MouseClick("Left")
MouseMove(1249,445,1)
MouseClick("Left")
EndIf
EndIf
WEnd
EndFunc
Func _TogglePause()
$bPause = Not $bPause
EndFunc
Func _Exit()
Exit
EndFunc
Den Rest mit dem Send kannst du ja noch einfügen.
|
|
|
02/25/2014, 22:15
|
#11
|
elite*gold: 0
Join Date: Jan 2014
Posts: 347
Received Thanks: 31
|
ja hatte ich. Aber es geht jett so wie ich es gemacht habe ^^
|
|
|
All times are GMT +1. The time now is 23:09.
|
|