2009-02-16
iTunesで聞いてる曲をTwitterにPostするAppleScript
9/5追記
Twitterの認証方式の変更のため、スクリプトは動作しなくなりました。
代わりにこちらをどうぞ
iTunesで聞いてる曲をbrightkiteにPostするAppleScript - Macと愛猫
追記ここまで
tint.de ¬ TwiTunes Applescriptからもらってきてちょっといじってみた。
変更点は、
- アルバム名とジャンルと評価をPostできるようにした。
- keychainを使うほど大げさなものではないので使わないようにした。
ダウンロードはこちら
http://files.lingurin.com/TwiTunes.scpt.zip
インストール方法は、
/Users/ユーザ名/ライブラリ/iTunes/scripts/
に放り込む。scriptsディレクトリが無かったら作って放り込む。
して保存しておく。
使い方は、
iTunesで再生中に、メニューバーのスクリプトのマークからTwiTunesを選ぶとダイアログが出てくるのでOKを押すだけ。
以下スクリプトソース。
--TwiTunes
-- get properties of the playing track
--string replace sub function
on replace(src, tg, rp)
set oldDel to AppleScript's text item delimiters
set AppleScript's text item delimiters to tg
set myList to text items of src
set AppleScript's text item delimiters to rp
set myText to myList as string
set AppleScript's text item delimiters to oldDel
return myText
end replace
tell application "iTunes"
set thisTrack to current track
set trackName to the name of thisTrack
set trackArtist to thisTrack's artist
set trackAlbum to thisTrack's album
set janru to thisTrack's genre
set hoge to rating of current track
end tell
if hoge = 0 then
set hoshi to "は未評価"
end if
if hoge = 20 then
set hoshi to "★・・・・"
end if
if hoge = 40 then
set hoshi to "★★・・・"
end if
if hoge = 60 then
set hoshi to "★★★・・"
end if
if hoge = 80 then
set hoshi to "★★★★・"
end if
if hoge = 100 then
set hoshi to "★★★★★"
end if
-- change the status message to your liking here:
set tweet to trackArtist & "の" & trackAlbum & "の" & trackName & "を聴いてる。ジャンルは" & janru & "。俺の評価" & hoshi & "。"
set tweet to replace(tweet, "&", "＆")
-- let the user edit
display dialog "Edit your Twitter status" with title "TwiTunes" default answer tweet cancel button 1 default button 2 buttons {"Cancel", "Send"}
set tweet to (text returned of result)
-- get login
set twitter_login to "ユーザ名:パスワード"
-- post to twitter
set twitter_status to quoted form of ("status=" & tweet)
set results to do shell script "curl --user " & twitter_login & " --data-binary " & twitter_status & " http://twitter.com/statuses/update.json"
display dialog "Twitter Status was updated.
" & tweet with title "TwiTunes" default button 1 buttons "OK"
トラックバック - http://d.hatena.ne.jp/Lingurin/20090216/1234750803
