World Of Warcraft & Startup Items

Was just searching the forums for such a beast. I combined all (5) cd's (newer versions have 5 cds cause the patches are included) to one folder as outlined. No prompts for CD's. I've made a preliminary auto it script for it that I am still working on. Testing it now but I'll post it so that maybe someone can make some suggestions on it.

Opt("TrayIconDebug", 1)
Run("Installer.exe")
WinWait("World of Warcraft Installer", "")
WinActivate("World of Warcraft Installer", "")
Send("W")
WinWait("End User License Agreement", "")
ControlFocus("End User License Agreement", "", 1006)
Do
	Send("{PGDN}")
Until ControlCommand("End User License Agreement", "", 1004, "IsEnabled", "")

ControlClick("End User License Agreement", "", 1004)
WinWait("Installation Destination Directory", "")
ControlSetText("Installation Destination Directory", "", 1028, @ProgramFilesDir & "\World of Warcraft")
ControlClick("Installation Destination Directory", "", "Button1")
Opt("WinTitleMatchMode",4)

WinWait("classname=#32770", "&Cancel")

While WinExists("classname=#32770", "&Cancel")
	sleep(100)
WEnd

WinWait("classname=(Blizzard Entertainment) World of Warcraft Installer", "")
WinClose("classname=(Blizzard Entertainment) World of Warcraft Installer", "")

Edited September 20, 200520 yr by redfive19