DivX 6
Spoiler anzeigen
;|¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
;| Installation von: DivX 6
;|
;| Autor: Jens Ottersberg
;|
;| Getestet mit: DivXInstaller.exe
;|___________________________________________________________________________________________________________________________________
#RequireAdmin
#NoTrayIcon
#include "..\..\funktionen.au3"
[/autoit] [autoit][/autoit] [autoit];Hauptprogramm
$parameter = ''
$search = FileFindFirstFile(@ScriptDir & "\*.exe")
$datei = FileFindNextFile($search)
FileClose($search)
;Setup starten
ShellExecute(@ScriptDir & "\" & $datei, $parameter)
;Sprachenauswahl
WinWait("Sprachenauswahl")
WinActivate("Sprachenauswahl")
WinWaitActive("Sprachenauswahl")
ControlClick("Sprachenauswahl","","Button1")
;Willkommensbildschirm
WinWait("DivX","Willkommen")
WinActivate("DivX","Willkommen")
WinWaitActive("DivX","Willkommen")
ControlClick("DivX","Willkommen","Button2")
;Lizenz zustimmen
WinWait("DivX","Lizenzabkommen")
WinActivate("DivX","Lizenzabkommen")
WinWaitActive("DivX","Lizenzabkommen")
ControlClick("DivX","Lizenzabkommen","Button4")
ControlClick("DivX","Lizenzabkommen","Button2")
;Lizenznachtrag zustimmen
WinWait("DivX","Nachtrag")
WinActivate("DivX","Nachtrag")
WinWaitActive("DivX","Nachtrag")
ControlClick("DivX","Nachtrag","Button4")
ControlClick("DivX","Nachtrag","Button2")
Sleep(2000)
;keine neue Version herunterladen
If WinExists("DivX","Update") Then
WinActivate("DivX","Update")
WinWaitActive("DivX","Update")
ControlClick("DivX","Update","Button5")
ControlClick("DivX","Update","Button2")
EndIf
;alles installieren
WinWait("DivX","Komponenten")
WinActivate("DivX","Komponenten")
WinWaitActive("DivX","Komponenten")
ControlClick("DivX","Komponenten","Button2")
;Zielverzeichnis
WinWait("DivX","Zielverzeichnis")
WinActivate("DivX","Zielverzeichnis")
WinWaitActive("DivX","Zielverzeichnis")
ControlClick("DivX","Zielverzeichnis","Button2")
Sleep(2000)
;Firefox mit Google Toolbar nicht installieren
If WinExists("DivX","DirectX") Then
WinActivate("DivX","Google Toolbar")
WinWaitActive("DivX","Google Toolbar")
;Folgende Zeile auskommentieren um Toolbar zu installieren
ControlClick("DivX","Google Toolbar","Button5")
ControlClick("DivX","Google Toolbar","Button2")
EndIf
;keinen Newsletter bestellen
WinWait("DivX","Newsletter")
WinActivate("DivX","Newsletter")
WinWaitActive("DivX","Newsletter")
ControlClick("DivX","Newsletter","Button2")
Sleep(2000)
;nicht zur DirectX-Webseite
If WinExists("DivX","DirectX") Then
WinActivate("DivX","DirectX")
WinWaitActive("DivX","DirectX")
ControlClick("DivX","DirectX","Button5")
ControlClick("DivX","DirectX","Button2")
EndIf
WinWait("DivX","Einrichtung abgeschlossen")
WinActivate("DivX","Einrichtung abgeschlossen")
WinWaitActive("DivX","Einrichtung abgeschlossen")
ControlClick("DivX","Einrichtung abgeschlossen","Button2")