Empezar con Autoit
Este es un post sobre Autoit a la manera del primero que escribí sobre Tcl, sin saber casi nada empiezo a hacer ejemplos.
Para empezar con Autoit… Seguimos las instrucciones de la Ayuda de Autoit descargada en el enlace anterior, en Ayuda> Usando Autoit.
Ejercicio #1 – ej1.au3
; Mi primer script
MsgBox(0, «Mi primer script!», «Hola Mundo!»)
Los comentarios se hacen con punto y coma al comienzo de la línea.
Lo de arriba parece un objeto»mensaje box» con 3 «parámetros». Lo escribo y lo guardo en ej1.au3 (.au3 es la extensión para archivos de Autoit).
Ejercicio #2 – ej2.au3
; Este es mi segundo script (con funciones)
MsgBox(0, «Mi segundo script!», «Hola este es el script principal!»)
TestFunc()
Func TestFunc()
MsgBox(0, «Mi Segundo Script!», «Hola desde las funciones!»)
EndFunc
Donde se ejecuta primero un script como el ejemplo anterior y otro desde una función.
Vemos que para ejecutar una fiunción se escriben als órdenes entre la línea Func NombreFuncion() y la línea EndFunc.
Ejercicio #3 – ej3.au3
; La variable $answer almacena un MsgBox del tipo 4 (pregunta sí o no)
$answer = MsgBox(4, «Ejercicio #3», «Una pregunta de sí o no»)
; Leer la ayuda para los valores de retorno de MsgBox
; Si se responde no (7), mostramos un MsgBox del tipo 0 (como las del ejemplo 1 y 2)
; si se responde si, salimos
If $answer = 7 Then
MsgBox(0, «AutoIt», «OK. Bye!»)
Exit
EndIf
Ejercicio #4 – ej4.au3
; Abrir el notepad
Run(«notepad.exe»)
; No entiendo la siguiente línea
; Wait for the Notepad become active – it is titled «Untitled – Notepad» on English systems WinWaitActive(«[CLASS:Notepad]»)
; Now that the Notepad window is active type some text
; escribir cosas, supongo que sleep es esperar en milisegundos
Send(«Hello from Notepad.{ENTER}1 2 3 4 5 6 7 8 9 10{ENTER}»)
Sleep(500) Send(«+{UP 2}») Sleep(500)
; Salir (File menu -> Exit)
; Now quit by pressing Alt-f and then x (File menu -> Exit)
Send(«!f»)
Send(«x»)
; Aparecerá una ventana y preguntará para salva los cambios, y enviamos respuesta «no»
; Now a screen will pop up and ask to save the changes, the window is called ; «Notepad» and has some text «Yes» and «No»
WinWaitActive(«Notepad») Send(«n»)
; Cerrando…
; Now wait for Notepad to close before continuing
WinWaitClose(«[CLASS:Notepad]»)