AutoIt hört mittendrin auf

Hallo zusammen

ich versuche momentan, mit AutoIt ein Script zu schreiben, das den XC8-Compiler zu MPLAB X hinzufügt (da das unter Windows XP manuell gemacht werden muss). Da ich jedoch noch nicht sonderlich erfahren bin komm ich grad irgendwie nicht weiter.

Da AutoIt Window Info in MPLAB X leider keine Controls erkennen kann, muss ich immer mit Tastaturbefehlen zu den jeweiligen Optionen navigieren. Falls hier jemand eine bessere Idee hat, immer her damit

Mein Code sieht folgendermaßen aus:

Blockinput(0)

$vError=0
$Titel="MPLAB X IDE v1.80"
$Text=""

If ($vError==0) Then
$Titel="MPLAB X IDE v1.80"
WinActivate($Titel)
If Not (WinWaitActive($Titel)) Then
$vError=1
Else
Send("{ALT}{RIGHT}{RIGHT}{RIGHT}{RIGHT}{RIGHT}{RIGHT}{RIGHT}{RIGHT}{RIGHT}{ENTER}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{ENTER}")
; Navigiert in der Menüleiste zu Tools => Optionen
EndIf
EndIf

If ($vError==0) Then
$Titel="Options"
WinActivate($Titel)
If Not (WinWaitActive($Titel)) Then
$vError=1
Else
Send("{RIGHT}{RIGHT}{RIGHT}{RIGHT}{RIGHT}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{ENTER}")
; Navigiert im Opitonen-Fenster zum Reiter "Embedded" und dort zum Button "Add"
EndIf
EndIf

If ($vError==0) Then
$Titel="Add New Toolchain"
$Text="Enter the base"
WinActivate($Titel, $Text)
If Not (WinWaitActive($Titel, $Text)) Then
$vError=1
Else
Send("C:\Programme\Microchip\xc8\v1.20\bin{TAB}{TAB}{TAB}{ENTER}")
; Gibt im Add-Fenster den Pfad zu xc8 an und Navigiert dann zum OK-Button
EndIf
EndIf

If ($vError==0) Then
$Titel="Options"
WinActivate($Titel)
If Not (WinWaitActive($Titel)) Then
$vError=1
Else
Send("{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{ENTER}")
; Navigiert zum OK-Button um Options zu schließen
EndIf
EndIf

$Titel="MPLAB X IDE v1.80"
WinClose ($Titel)
; Schließt MPLAB X
Sleep (10000)
; Falls MPLAB X nicht geschlossen wurde, wird Schließen erzwungen
If WinExists ($Titel) Then
WinKill ($Titel)
EndIf

Blockinput(0)

Exit($vError)

Bis zum Fenster "Options" geht das auch gut, aber dann sollte es eigentlich 5 mal nach rechts navigieren, also hab ich fünf mal {RIGHT} eingefügt. Es geht jedoch nur um einen Punkt nach rechts, dann passiert garnichts mehr. Das Skript wird im Tray noch angezeigt, macht aber nix mehr. Selbst wenn ich per Hand das nächste Fenster öffne, für das es Befehle hat (Add New Toolchain), passiert garnichts.
Warum bricht es mittendrin ab? Was mache ich falsch?

Schonmal vielen Dank für eure Hilfe
LG Bowser

Hallo,

Zitat von AyKay

das mit den "send" Befehlen ist immer so eine Sache. Am besten probierst du alle "Send" Befehle in "ControlSend" umzuwandeln da muss das Fenster dann nicht durchgehend aktiv sein und trotzdem werden die Commands an das richtige Fenster geschickt. Des Weiteren empfehle ich für die Übersichtlichkeit mehrfacheingaben hintereinander zu verhindern. Du kannst als Beispiel auch {RIGHT 5} eingeben.

Ich hätte erstmal ControlSend ausprobiert, aber da hat er jedesmal gemeckert:

Line 13 (File "C:\....\AddXC8.au3"):


ControlSend("{ALT}{RIGHT 9}{ENTER}{DOWN 6}{ENTER}")
^ ERROR


Error: Incorrect number of parameters in function call.

Dass das mit den Mehrfacheingaben auch einfacher funktioniert wusste ich nicht, aber wie du siehst hab ich es auch schon ausgebessert.

Ich hab also erstmal wieder Send verwendet, dann ist er mir bei

Send("{RIGHT 5}{TAB 12}{ENTER}")

erstmal um 3 nach rechts gesprungen anstatt um 5, hat einmal Tab gemacht und MPLABX hat sich geschlossen. Bei einem weiteren Versuch ohne etwas zu ändern ist er wie vorher um eins nach rechts gegangen und hat dann garnix mehr gemacht.

Zitat von Alina

Moin.

Ich hatte auch mal so ein Problem und ich habe dann eine Zeilezuvor "Sleep(250)" gepackt und es lief.

Einfach mal das testen.

Also hab ich vor und nach die Zeile einfach mal Sleeps von jeweils einer Sekunde eingefügt, leider ohne irgendein Ergebnis. Er bleibt immer noch nach einem mal {RIGHT} hängen und macht nix mehr.

LG Bowser

Zitat von Schnitzel

Hilfe zu Conrolsend lesen!!!
Und am besten die allgemeine zu Controls: Controls

Verbindlichsten Dank. Da hätt ich auch selber draufkommen können, aber hab halt mal wieder nicht mitgedacht :wacko:

Zitat von Andy

du hast offensichtlich überhaupt nicht verstanden, wo das Problem ist...

Da hast du offensichtlich recht, aber jetzt weis ich was du meinst

Zitat von Andy

Um herauszufinden wo es hängt, werden die Befehle EINZELN verwendet!

[autoit]

;5x right
for $i = 1 to 5
Sleep(200)
Send("{RIGHT}")
ConsoleWrite("Send " & $i & @crlf)
next

[/autoit]

Dann kann man auch debuggen....bspw. den Sleep je nach Bedarf ändern

So klappts auf jeden Fall. Nur hab ich das jetzt bei den Tabs genauso gemacht:

;12 mal Tab, navigiert zum Button "Add"
for $i = 1 to 12
Sleep(200)
Send("{TAB}")
ConsoleWrite("Send " & $i & @crlf)
next
Send("{ENTER}")

aber er landet irgendwie bei jedem Durchlauf an einer anderen Stelle, an der er dann Enter drückt. Ich habs aber durchprobiert, wenn ich mit der Tastatur in das Optionen-Menü gehe, dann 5 mal rechts drücke um unter "Embedded" zu landen, dann bin ich genau in der Position um mit 12 mal Tab den "Add"-Button zu erreichen. Kann es sein dass das Script eine andere Default-Location hat für den Tastaturfokus

LG Bowser

Hallo Andy,

for $i = 1 to 12

sollte doch meiner Meinung nach ganz einfach bedeuten, dass er den Zähler $i nach jedem Schleifendurchlauf um 1 erhöht, ergo, die Schleife immer 12 mal durchläuft, oder hab ich da was falsch verstanden?

Mit den 12 einzelnen Tabs klappts (natürlich ohne exit), aber das macht den Code halt recht unübersichtlich
Und wenn 12 mal

Send("{TAB}")

zur richtigen Stelle navigiert, warum tut

Send("{TAB 12}")

das dann nicht? Laut Hilfe ist die Syntax richtig.
Wenn das klappen würde wärs wesentlich übersichtlicher

Edit: Mir ist auch noch aufgefallen, dass es häufig, aber nicht immer, ein einzelnes {RIGHT} oder {TAB} auslässt, wodurch ich häufig auf dem Cancel-Button lande, und wenn das Fenster erstmal zu ist macht auch AutoIt nichts mehr. Wenn ich jetzt aber, wie du vorgeschlagen hast, mithilfe von exit die schritte Schritt für Schritt abarbeite, passiert das nie

LG Bowser

Hallo,

Zitat von Andy

Wenn du begriffen hast, WIE Windows überhaupt funktioniert (klick mich ich bin ein Link), dann wird das Send()-Gedöns wesentlich einfacher.

Wenn du nach einigen Wochen der Lektüre des o.g. Links durchblickst, dann beantwortet sich deine Frage

Ich werds mir mal durchlesen, aber das mit "einigen Wochen" schreckt mich schon ein bisschen ab. Ist ewas langfristig für mein Projekt.

Zitat

Ein:

[autoit]

For $i = 1 To 12
Send("{TAB}")
sleep(200)
Next

[/autoit]

Ist nicht das gleiche wie

[autoit]

Send("{TAB 12}")

[/autoit]

Aber beide machen bei mir irgendwie nie genau 12 Tabs

Zitat von AyKay

PS: Und wieso nochmal verwendest du nicht ControlSend?

Weil ControlSend u.a. einen Text-Parameter erwartet, und ich nicht an jeder Stelle, an der ich Send verwende, ein Fenster mit reinem Text habe

LG Bowser

Hallo Andy

die direkten Sprünge zu den einzelnen Optionen sind eine sehr gute Idee. Wenn ich jedoch dein Skript ausführe, komm ich in den Optionen manchmal nur bis zum Reiter 4, C/C++, während Embedded der 5te Reiter ist. Die Schleife läuft also wieder zu selten durch.
Bei einem anderen Versuch ist er bis ins "Add" fenster ohne Probleme gesprungen, doch dort musste ich in die Textzeile klicken, damit er den Text einfügt.
Beide Fehler sind mir aus dem Code nicht ersichtlich und treten nur sporadisch auf, manchmal klappt auch alles

Ich hoff jetzt einfach auf das Beste, hab nämlich auch nicht mehr viel Lust, da noch lang rumzubasteln. Vielen Dank an dich und alle anderen, die mir geholfen haben

Was du mit dem Kommentar

;java running, please upgrade hardware!

meinst ist mir jedoch nicht ganz klar

LG Bowser

Mir scheint, sobald ich das ganze in eine .exe kompiliere, funktioniert es problemlos. Habs jetzt schon 5 mal getestet und es macht immer was es soll.
Seltsam dass es als au3 noch nciht so flüssig lief

Ich danke dir vielmals für deine Hilfe und kann die Sache endlich abhaken

LG Bowser