自动安装3DMARK 脚本命令(au3)

【核心代码】

#include <GuiListView.au3>
Run("3DMark06.exe")
WinWaitActive("3DMark06 - InstallShield Wizard","The InstallShield Wizard will install the following software on your computer")
Send("!N")
WinWaitActive("3DMark06 - InstallShield Wizard","License Agreement")
Send("!a")
Send("!N")
WinWaitActive("3DMark06 - InstallShield Wizard","Setup will install 3DMark06 in the following folder")
Send("!r")
WinWait("Choose Folder","Please select the installation folder.",5)
WinWaitActive("Choose Folder","Please select the installation folder.")
Send("c:\windows\temp")
Send("{TAB}")
Send("{TAB}")
Send("{ENTER}")
WinWait("3DMark06 - InstallShield Wizard","Setup will install 3DMark06 in the following folder",5)
WinWaitActive("3DMark06 - InstallShield Wizard","Setup will install 3DMark06 in the following folder")
Send("!N")

WinWaitActive("3DMark06 - InstallShield Wizard","The wizard is ready to begin installation")
Send("!I")
Sleep(50000)
If WinWait("Question","",20) then
	WinWaitActive("Question","In order to run properly.")
	$nhandle = WinGetHandle("Question")
	WinActivate($nhandle)
	Send("!Y")
	WinWait("正在安装 Microsoft(R) DirectX(R)","",5) 
	WinWaitActive("正在安装 Microsoft(R) DirectX(R)","欢迎使用 DirectX 安装程序")
	Send("{TAB}")
	Send("{TAB}")
	Send("!N")
	Send("!N")
	WinWait("正在安装 Microsoft(R) DirectX(R)","",10)
	WinWaitActive("正在安装 Microsoft(R) DirectX(R)","安装完成")
	Send("{TAB}")
	Send("{TAB}")
	Send("{ENTER}")
endif

WinWait("OpenAL Installer","",10)
WinWaitActive("OpenAL Installer","Cancel")
Opt("MouseCoordmode",2)
Local $pos=ControlGetPos("OpenAL Installer","","Button2")  
MouseClick("left",$pos[0],$pos[1],1)
WinWaitActive("OpenAL Installer Message","Installation complete")
Local $nPos=ControlGetPos("OpenAL Installer Message","","Button1") 
MouseClick("left",$npos[0],$npos[1],1)
;form handle
If WinWait("3DMark06 - InstallShield Wizard","InstallShield Wizard Complete",10) then
	WinWaitActive("3DMark06 - InstallShield Wizard","InstallShield Wizard Complete",5)
	$nhandle = WinGetHandle("3DMark06 - InstallShield Wizard")
	WinActivate($nhandle)
	WinWaitActive("3DMark06 - InstallShield Wizard","InstallShield Wizard Complete")
	Send("{SPACE}")
	Send("{TAB}")
	Send("{TAB}")
	Send("{SPACE}")
	Send("{ENTER}")
else
	$handle = WinGetHandle("3DMark06 - InstallShield Wizard")
	WinActivate($handle)
	;Local $fPos=ControlGetPos("3DMark06 - InstallShield Wizard","","Button4") 
	;MouseClick("left",$fpos[0],$fpos[1],1)
	WinWait("3DMark06 - InstallShield Wizard","",5)
	WinWaitActive("3DMark06 - InstallShield Wizard","Futuremark Registration")
		;Send("{TAB}")
	Send("{TAB}")
	Send("3DM06-KXYE8-WMJYP-RNX5V-23MZD-8SL8M")
	Send("!N")
	WinWaitActive("Congratulation","You have just registered a Futuremark product!")
	Send("{ENTER}")
	$nhandle = WinGetHandle("3DMark06 - InstallShield Wizard")
	WinActivate($nhandle)
	WinWait("3DMark06 - InstallShield Wizard","",5)
	WinWaitActive("3DMark06 - InstallShield Wizard","InstallShield Wizard Complete")
	Send("{SPACE}")
	Send("{TAB}")
	Send("{TAB}")
	Send("{SPACE}")
	Send("{ENTER}")
endif