get current album art from playing track from Rdio app.

rdio_artwork.applescript

set RdioArtworkFolder to ((path to home folder) as text) & "Pictures:Rdio:" as alias
set ArtworkFromRdio to ((path to home folder) as text) & "Pictures:Rdio:FromRdio:albumArt.tiff" as alias
set RdioArtwork to ((path to home folder) as text) & "Pictures:Rdio Artwork:FromRdio:albumArt.tiff"
set RdioBackground to ((path to home folder) as text) & "Pictures:Rdio Artwork:FromRdio:black_background.png"
set DefaultArtwork to ((path to home folder) as text) & "Pictures:RdioArtwork:Default:albumArt.tiff"
set DefaultBackground to ((path to home folder) as text) & "Pictures:Rdio:Default:transparent_background.png"
set displayArtwork to ((path to home folder) as text) & "Pictures:Rdio:albumArt.tiff"
set displayBackground to ((path to home folder) as text) & "Pictures:Rdio:background.png"
set FromRdioFolder to ((path to home folder) as text) & "Pictures:Rdio:FromRdio:"
set ArtworkFromRdio to FromRdioFolder & "albumArt.tiff" as alias
set RdioPlaying to "false" as text
set whichArt to "blank"
tell application "System Events"
	if exists process "Rdio" then -- Rdio is running
		tell application "Rdio"
			set aTrackArtwork to artwork of current track
			set RdioPlaying to "true" as text
		end tell
		if RdioPlaying is "true" then
			tell current application
				set fileRef to ¬
					(open for access ArtworkFromRdio with write permission)
				write aTrackArtwork to fileRef
				close access fileRef
				
				(* Convert to Tiff *)
				tell application "Finder" to set creator type of ArtworkFromRdio to "????"
				
				tell application "Image Events"
					set theImage to open ArtworkFromRdio
					save theImage as TIFF in RdioArtworkFolder with replacing
				end tell
			end tell
			set whichArt to "Rdio"
		end if
	end if
end tell