今日のhack::foobar2000とAMIPでアルバムアートをMSN Messengerのアイコンに

WSH(VBScript)を使用する。

Dim	objMessenger
Dim	artist,album,filename
Dim	FSO
Dim	default, nofile

default = "(いつも設定しているMSNのアイコンの画像ファイル)"	'デフォルトのアイコン
nofile = "(アルバムアートが存在しない場合の画像ファイル)"	'無い場合

Set objMessenger = WScript.CreateObject("Messenger.UIAutomation.1")

if WScript.Arguments(0) = "play" then
	artist = WScript.Arguments(1)
	album = WScript.Arguments(2)
	Set FSO = CreateObject("Scripting.FileSystemObject")
	filename = "(アルバムアートを置いている場所)" & album & ".jpg"
	if not FSO.FileExists(filename) then
		filename = "(アルバムアートを置いている場所)" & artist & "-" & album & ".jpg"
		if not FSO.FileExists(filename) then
			filename = nofile
		End If
	End If
	objMessenger.MyProperty(2) = filename
Else
	objMessenger.MyProperty(2) = default
End If

これはvbsファイルとして保存。

で、AMIPのCallback/Webで、Playに

/exec:(wscript) (スクリプトへのパス) play %s

PauseやStopに

/exec:(wscript) (スクリプトへのパス) stop

foo_amipwrapperの"%s"の設定に

"%artist%" "%album%"

と記載する必要あり（何故か%1などを認識してくれない……）。

まあ、これはそもそもうちのアルバムアートの設置の原則に沿っている部分があるから、それに合わせて適宜書き換える必要がある。（AMIPの設定も）