iTunesで再生している曲をTwitterに投稿するAppleScript

Macで、iTunesで再生している曲をTwitterに投稿できるアプリとかないか調べてみたが、なかなか良いものがなかった。AppleScriptを使えばiTunesで再生中の曲名が取れる事が分かったので、自分でスクリプトを書いてみた。

tell application "iTunes"
	set thisTrack to current track
	set trackName to name of thisTrack
	set trackArtist to thisTrack's artist
	set trackAlbum to thisTrack's album
end tell

-- 投稿メッセージのテンプレート
set message to "今聴いている曲: " & trackName & " (" & trackArtist & "のアルバム「" & trackAlbum & "」より)"

-- Twitterを投稿するURL
set tweetUrl to "http://twitter.com/home?status=" & message

do shell script "open \"" & tweetUrl & "\""

このスクリプトを実行すると、ブラウザでTwitterサイトのホームページを開いて、iTunesで再生中の曲をメッセージ欄に入力してくれる。あとは適当にメッセージを編集するなどして、「投稿する」ボタンを押せば良い。

投稿メッセージのテンプレートを変えるには、「set message to ...」の所を変えれば良い。

またTwitterクライアントにTweetie(iPhone用じゃなくてMac用の方)を使っている場合、「set tweetUrl to ...」の所を下記のように変えると、ブラウザを開く替わりにTweetieの投稿用ダイアログを開くことができる。

set tweetUrl to "tweetie:" & message