Local $width = @DesktopWidth / 2 Local $height = @DesktopHeight / 2 Run("D:\Setup.exe", "D:\") WinWait("Bienvenido") ControlClick("[LAST]", "", "Button1") WinWait("Selección de la carpeta de destino") ControlClick("[LAST]", "", "Button1") WinWait("Selección del grupo de programas") ControlClick("[LAST]", "", "Button2") WinWait("Fin de la instalación") ControlClick("[LAST]", "", "Button4") Sleep(2000) Run("C:\Program Files\LITI\CSIC-LITI Buscalibros\buscador.exe", "C:\Program Files\LITI\CSIC-LITI Buscalibros\") WinWait("BuscaLibros") MouseClick("left", $width, $height) WinWait("Unidad de CD ROM - Liti") ControlClick("[LAST]", "", "ThunderRT6DriveListBox1") Send("d") Sleep(300) Send("{ENTER}") ControlClick("[LAST]", "", "ThunderRT6CommandButton1")