I have overdone the ability of FastScripts to assign keyboard shortcuts to scripts - I now have so many that I sometimes forget them for scripts used less often. The latest version of FastScripts has helped this problem with a recent upgrade that has a substantially improved AppleScript dictionary. This is now possible:
tell application "FastScripts"
set s to script items where has keyboard shortcut is true
set SL to {}
repeat with k from 1 to count s
if k < 10 then
set m to "0" & k
else
set m to k as rich text
end if
set end of SL to (m & " " & name of item k of s)
end repeat
set SF to script file of item ¬
((rich text 1 thru 2 of ((choose from list SL) as string)) ¬
as string as number) of s
end tell
run script alias SF