#include #include #include #NoTrayIcon #RequireAdmin Local $sPath = FileSelectFolder('Select folder', @ProgramFilesDir ) & '\Robbo' Local $razmer =3259; Local $free = Round(DriveSpaceFree("c:\")) Local $arch = @CPUArch Local $OS = @OSVersion GUICreate("Robbo Installer") Local $progressbar1 = GUICtrlCreateProgress(10, 150, 380, 20) Local $lbl7 = GUICtrlCreateLabel('This installer will install Robbo Scratch 3 and FTDI drivers', 10, 10) Local $lbl7 = GUICtrlCreateLabel('by automatically clicking on all "Ok" buttons', 10, 30) Local $lbl4 = GUICtrlCreateLabel('Please wait until installer finished', 10, 50) Local $lbl5 = GUICtrlCreateLabel('If installation was not finished ', 10, 70) Local $lbl6 = GUICtrlCreateLabel('and nothing happens more then 10 seconds', 10, 90) Local $lbl8 = GUICtrlCreateLabel('please click "Ok" button by yourself ', 10, 120) GUISetState() ;MsgBox(0, "", "Free Space: " & $free & " MB") ;MsgBox(0, "", "path: " & $sPath & " MB") GUICtrlSetData($progressbar1, 0) ShellExecuteWait (@ScriptDir & '\robboscratch-3.50.0-without-drivers-x64.exe',"/S /D=" & $sPath & "\RobboScratch3") GUICtrlSetData($progressbar1, 20) ShellExecute(@ScriptDir & '\CDM212364_Setup.exe') $hWnd = WinWait("FTDI", Null, 10) WinActivate($hWnd) Send("{ENTER}") $hWnd = WinWait("デバイス ドライバのインストール ウィザード", Null, 10) WinActivate($hWnd) Send("{ENTER}") $hWnd = WinWait("デバイス ドライバのインストール ウィザード", Null, 10) WinActivate($hWnd) sleep(100) ControlClick($hWnd, '', '[CLASS:Button; INSTANCE:1]', "main") Send("{ENTER}") $hWnd = WinWait("デバイス ドライバのインストール ウィザード", "ドライバは、正しくこのコンピュータにインストールされました。", 0) WinActivate($hWnd) sleep(100) ControlClick($hWnd, '', '[CLASS:Button; INSTANCE:7]', "main") GUICtrlSetData($progressbar1, 30) GUICtrlSetData($progressbar1, 100) MsgBox(0,"Congratulations!"," Installation successfully finished! ")