ITunes Script Bundle as Triggered Script?

[reddyfit]

Hi guys,
I'm a new QS user but loving it.

I just discovered a new script called "Lyrics via LyricWiki" for
ITunes, and I want to make it a triggerable hot key in QS. But there's
a problem: The actual script is a "script bundle" with the file
extension ".scptd." I seem to be unable to get QS to "run" this script
bundle, as QS only opens it with Script Editor or just...does
nothing!:)

I'm pasting the script below. Any one with ideas on how to make this a
trigger-able hot key?

Thanks in advance for your time and help!

(*
"Lyrics via LyricWiki" for iTunes
written by Doug Adams
doug...@mac.com
Thanks to the many Correspondents who emailed me info on the SOAP
command.
<http://lyricwiki.org/LyricWiki_talk:SOAP>

v1.0 February 28 2009
-- initial release

Get more free AppleScripts and info on writing your own
at Doug's AppleScripts for iTunes
http://dougscripts.com/itunes/

This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or (at
your option) any later version.

This program is distributed in the hope that it will be useful, but
WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
General Public License for more details.

Get a copy of the GNU General Public License by writing to the Free
Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
MA 02110-1301, USA.

or visit http://www.gnu.org/copyleft/gpl.html

*)

property my_title : "Lyrics via LyricWiki"
property nom : ""
property art : ""
global sel
tell application "iTunes"
if player state is playing then
set sel to current track
tell sel to set {nom, art} to {get name, get artist}
else if selection is not {} and (count items of selection) is 1 then
set sel to item 1 of selection
tell sel to set {nom, art} to {get name, get artist}
else
return
end if
end tell
log {nom, art}
if nom is "" or art is "" then
display dialog "The track does not have enough information to search
LyricWiki." buttons {"OK"} with icon stop with title my_title
return
end if
try
tell application "http://lyricwiki.org/server.php" to set rez to
(call soap {method name:"getSong", method namespace
uri:"urn:LyricWiki", SOAPAction:"urn:LyricWiki#getSong", parameters:
{artist:art as text, song:nom as text}})
on error m
tell application "iTunes"
display dialog "Error from LyricWiki:" & return & return & tab & m
with title my_title
end tell
end try
-- log rez
set theLyrics to (lyrics of rez) as text
set lyricWikiPageURL to |url| of rez

log theLyrics

-- copy to lyrics or display LyricsWiki page?
if theLyrics does not contain "Not found" then
set displayLyrics to my text_to_list(theLyrics, (ASCII character 10))

set opt to (choose from list displayLyrics with prompt (art & return
& "\"" & nom & "\"") as text OK button name "Use Lyrics for Track"
with empty selection allowed)
if opt is false then return
(*
tell application "Finder"
open location lyricWikiPageURL
end tell
*)
tell application "iTunes"
try
set sel's lyrics to theLyrics
end try
end tell
else
display dialog "Lyrics for \"" & art & "\" - \"" & nom & "\" not
found at LyricWiki." buttons "OK" with icon stop with title my_title
end if


on text_to_list(txt, delim)
set saveD to AppleScript's text item delimiters
try
set AppleScript's text item delimiters to {delim}
set theList to every text item of txt
on error errStr number errNum
set AppleScript's text item delimiters to saveD
error errStr number errNum
end try
set AppleScript's text item delimiters to saveD
return (theList)
end text_to_list

[Chris Cairns]

Open up the triggers pane. Create a new trigger. Bring the "Lyrics via
LyricWiki" in first pane. Now, while it is open, open quicksilver
window and bring up any script in first pane then tab, press Cmd-C, to
copy the "Run" action in the second tab. Come back to the trigger
creation window and paste the "Run" action in the second pane.

On Mar 18, 2009, at 10:06 AM, reddyfit wrote:

[reddyfit]

That did it! Thanks a ton, Chris!