Play in QuickTime at 1.5x.applescript

--Pauses iTunes, resuming playback at same point in QuickTime at 1.5x playback rate
--Keep in ~/Library/Scripts/Applications/iTunes/
--Adapted from http://hints.macworld.com/article.php?story=20060103000452805

tell application "iTunes"
	pause
	set my_track to location of current track
	set my_seconds to player position
end tell

tell application "QuickTime Player"
	activate
	open my_track
	set my_movie to first document
	set current time of my_movie to my_seconds
	set rate of my_movie to 1.5 -- starts playing
end tell