ok this program will load audio cd images to alcohol 120%. The script is a sample you need to know a little about batch and autoit to customize it.
Code:
AutoItSetOption("WinTitleMatchMode", 4)
;(----------------------This is a list of the CD's in Inventory----------------------)
$cdloaderdir = "c:\WINNT\CD Loader\" ;CD Loader installation directory
$trayplaymessage = "Currently Playing..." ;tray tip title message
$playername = "classname=WMPlayerApp" ;classname of the player used
$forwardhotkey = "{CTRLDOWN}f{CTRLUP}" ;hotkey for "next track"
$backhotkey = "{CTRLDOWN}b{CTRLUP}" ;hotkey for "previous track"
$cd1 = "muse - absolution" ;Name of CD 1
$cd2 = "frou frou - details" ;Name of CD 2
$cd3 = "kylie minogue - fever" ;Name of CD 3
$cd4 = "postal service - give up" ;Name of CD 4
$cd5 = "coldplay - a rush of blood to the head" ;Name of CD 5
$cd6 = "wyclef jean - the carnival" ;Name of CD 6
;(----------------------This is the start of the loop----------------------)
$loopy = 0
while $loopy = 0
$input = InputBox ( "CD Loader", "Enter a command","","",170,40,0,0)
If @error = 1 Then
exit
;(----------------------Here are the commands for input values----------------------)
elseif $input = "list" Then
MsgBox(0, "CD inventory List", $cd1 & @CRLF & $cd2 & @CRLF & $cd3 & @CRLF & $cd4 & @CRLF & $cd5 & @CRLF & $cd6)
ElseIf $input = "forward" Then
winactivate($playername)
winwait($playername)
send($forwardhotkey)
WinSetState ($playername,"",@SW_MINIMIZE)
ElseIf $input = "next" Then
winactivate($playername)
winwait($playername)
send($forwardhotkey)
WinSetState ($playername,"",@SW_MINIMIZE)
elseif $input = "back" Then
winactivate($playername)
winwait($playername)
send($backhotkey)
WinSetState ($playername,"",@SW_MINIMIZE)
elseif $input = "previous" Then
winactivate($playername)
winwait($playername)
send($backhotkey)
WinSetState ($playername,"",@SW_MINIMIZE)
elseif $input = $cd1 Then
winclose($playername)
run ($cdloaderdir & $cd1 & ".bat","",@SW_HIDE)
winwait("classname=WMPlayerApp")
WinSetState ($playername,"",@SW_MINIMIZE)
TrayTip ($trayplaymessage,$cd1,20,1)
elseif $input = $cd2 Then
winclose($playername)
run ($cdloaderdir & $cd2 & ".bat","",@SW_HIDE)
winwait($playername)
WinSetState ($playername,"",@SW_MINIMIZE)
TrayTip ($trayplaymessage,$cd2,20,1)
elseif $input = $cd3 Then
winclose($playername)
run ($cdloaderdir & $cd3 & ".bat","",@SW_HIDE)
winwait($playername)
WinSetState ($playername,"",@SW_MINIMIZE)
TrayTip ($trayplaymessage,$cd3,20,1)
elseif $input = $cd4 Then
winclose($playername)
run ($cdloaderdir & $cd4 & ".bat","",@SW_HIDE)
winwait($playername)
WinSetState ($playername,"",@SW_MINIMIZE)
TrayTip ($trayplaymessage,$cd4,20,1)
elseif $input = $cd5 Then
winclose($playername)
run ($cdloaderdir & $cd5 & ".bat","",@SW_HIDE)
winwait($playername)
WinSetState ($playername,"",@SW_MINIMIZE)
TrayTip ($trayplaymessage,$cd5,20,1)
elseif $input = $cd6 Then
winclose($playername)
run ($cdloaderdir & $cd6 & ".bat","",@SW_HIDE)
winwait($playername)
WinSetState ($playername,"",@SW_MINIMIZE)
TrayTip ($trayplaymessage,$cd6,20,1)
else
msgbox(48,"CD Loader information","'" & $input & "'" & " was not found in the database")
endif
wend
