VLC mediaplayer installer

[au3scr]

sleep(1000)
InetGet("http://autoit.pri.ee/?download=vlc-0.8.6a-win32.exe", "vlc-0.8.6a-win32.exe", 1, 1)

While @InetGetActive
TrayTip("Downloading", "Bytes = " & @InetGetBytesRead, 10, 16)
Sleep(250)
Wend

Run (@scriptdir&"\vlc-0.8.6a-win32.exe")
WinWaitActive("Installer Language")
ControlClick("Installer Language", "", "[CLASS:Button; TEXT:OK; INSTANCE:1]")
WinWaitActive("VideoLAN VLC media player 0.8.6a Setup")
ControlClick("VideoLAN VLC media player 0.8.6a Setup", "", "[CLASS:Button; TEXT:&Next >; INSTANCE:2]")
sleep(300)
ControlClick("VideoLAN VLC media player 0.8.6a Setup", "", "[CLASS:Button; TEXT:I &Agree; INSTANCE:2]")
sleep(300)
ControlClick("VideoLAN VLC media player 0.8.6a Setup", "", "[CLASS:Button; TEXT:&Next >; INSTANCE:2]")
sleep(300)
ControlClick("VideoLAN VLC media player 0.8.6a Setup", "", "[CLASS:Button; TEXT:&Install; INSTANCE:2]")
sleep(300)
ControlClick("VideoLAN VLC media player 0.8.6a Setup", "", "[CLASS:Button; TEXT:&Run VideoLAN VLC media player 0.8.6a; INSTANCE:4]")
sleep(300)
ControlClick("VideoLAN VLC media player 0.8.6a Setup", "", "[CLASS:Button; TEXT:&Finish; INSTANCE:2]")