Home Categories DIY Lyrics

Jeff's Recently Read RSS Channels   Sample Output:     Der Schockwellenreiter   Slashdot   Privacy Digest   Motivational Quotes o...   rebelutionary   Wired News   Scripting News   blivet   Quotes of the Day   Scott Rosenberg's Lin...   MetaFilter   Aaron Swartz: The Weblog     Jeff's Recently Read RSS Channels was inspired by Jon Udell's most excellent mySubscriptions script. Recently Read RSS Channels scans my Radio Subscriptions, sorts them by the last time they were changed, and lists them along with image links for Radio Subscriptions and XML Feeds. Important Note: It has been brought to my attention that this macro does not work as a text file in your Radio Macros folder. Usually this is due to a compile error. However, this script compiles and runs just fine when placed in a Radio object database, e.g. radio.root. To set up your own Recently Read RSS Macro: Copy the following code: on jtcRecentlyReadRSS (ctSubscriptions=12, pretext="<p>", posttext="</p>", maxNameLength=24) { local (channelTable); local (changeTable); new (tableType, @channelTable); new (tableType, @changeTable); for adrService in (@aggregatorData.services) { local (channelTitle = adrService^.compilation.channeltitle); local (channelDescription = adrService^.compilation.channeldescription); local (channelUrl = adrService^.compilation.channellink); local (rssUrl = nameOf(adrService^)); channelTable.[channelTitle] = {channelDescription, channelURL, rssURL}; changeTable.[channelTitle] = adrService^.timeLastChange}; local (ctServices = sizeOf (changeTable)); oldTarget = target.set(@changeTable); table.sortBy("Value"); target.set (@oldTarget); local (htmlText = ""); on add (s) { htmlText = htmlText + preText + s + postText + cr}; local (ctOutput = 0); while ( ctOutput < ctSubscriptions) && (ctOutput < ctServices) { local (channelTitle = nameOf (changeTable[ctServices - ctOutput])); local (channelDescription = string.replaceAll (channelTable.[channelTitle][1],"'","'")); bundle { // clean up Description channelDescription = searchEngine.stripMarkup (channelDescription)}; local (channelUrl = channelTable.[channelTitle][2]); local (rssUrl = string.urlencode (channelTable.[channelTitle][3])); local (lastChange = date.timeString (changeTable.[channelTitle], false)); local (longChannelTitle = string.replaceAll (channelTitle,"'","'")); bundle { // clean up the channelTitle channelTitle = longChannelTitle; if string.length (channelTitle) > maxNameLength { channelTitle = string.mid (channelTitle, 1, maxNameLength - 3) + "..."}; channelTitle = string.replaceAll (channelTitle," "," "); bundle { <a href="//">//</a> clean up Alwin... if channelTitle contains "<a href=\"mailto:alwin@mac.com\">" { channelTitle = string.replaceAll (channelTitle, "<a href=\"mailto:alwin@mac.com\">Alwin Hawkins</a>", "Alwin Hawkins")}}}; local (baseURL = "http://127.0.0.1:5335/system/pages/subscriptions?url="); local (imgTag = "<img alt=\"Click to subscribe in Radio\" border=\"0\" src=\"http://radio.weblogs.com/0001018/images/bullets/tinyCoffeeCup.jpg\" width=\"10\" height=\"10\">"); local (imgTagX = "<img alt=\"Click to subscribe in Radio\" border=\"0\" src=\"http://radio.weblogs.com/0001018/images/bullets/tinyXML.jpg\" width=\"16\" height=\"7\">"); local (toolText = "Click on the XML coffee mug to subscribe to "" + longChannelTitle + "" in Radio UserLand."); add ("<a href=\"" + rssURL + "\" title=\"Click here for the XML version of "" + longChannelTitle + "."\">" + imgTagX + "</a> <a href=\"" + baseURL + rssUrl + "\" title=\"" + toolText + "\">" + imgTag + "</a> <a href=\"" + channelUrl + "\" title=\"" + channelDescription + " Last changed: " + lastChange + "\">" + channelTitle + "</a>"); ctOutput ++}; return (htmlText)} Paste the code into a new document in your favorite text editor. Save this document in your Radio UserLand/Macros folder, as "jtcRecentlyReadRSS.txt". Now to use this Favorites Macro: Copy the following code: <%jtcrecentlyReadRSS (12, "<p class=\"realsmall\">", "</p>")%> Paste the code where ever you want (in your posts and/or templates). This macro can also be implemented as a Web Service. Special Thanks to Dictionary.com for showing me how to distribute code snippets without the recipient unintentionally picking up invisible characters which render the code inoperable.