/* Save this file, rename extension from .txt to .js Execute by double clicking file in Windows Explorer http://liquidparallax.com */ var iTunesApp = WScript.CreateObject("iTunes.Application"); var tracks = iTunesApp.LibraryPlaylist.Tracks; var numTracks = tracks.Count; var i; Lyricslist = iTunesApp.CreatePlaylist("Has Lyrics"); for (i = 1; i <= numTracks; i++) { try { var currTrack = tracks.Item(i); if ( currTrack.Lyrics != "" ) Lyricslist.AddTrack(currTrack); } } WScript.Echo("All tracks with lyrics found have been put in playlist.");