var refreshSeconds=10; var daysBack=30; var headLineCount=1; var newsItems = new Array(); var newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jul/pr_1238.html'; newsItem[1] = '08-Jul-08: HEAD Pros Swing for Success at Wimbledon'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jul/pr_1239.html'; newsItem[1] = '08-Jul-08: Dimitrov Claims Boys Championship at Wimbledon'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jul/pr_1240.html'; newsItem[1] = '08-Jul-08: International Tennis Hall of Fame Presents Sony Ericsson With Joseph F. Cullman 3rd Award'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jul/pr_1235.html'; newsItem[1] = '07-Jul-08: PTR Wins Two More APEX Awards'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jul/pr_1237.html'; newsItem[1] = '07-Jul-08: Wilson K Factor Dominates Wimbledon'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jul/pr_1232.html'; newsItem[1] = '03-Jul-08: Ricoh Europe Extends ATP Sponsorship by 3 Years'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jul/pr_1231.html'; newsItem[1] = '02-Jul-08: Renowned Tennis Speakers Headline USPTA s World Conference'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1228.html'; newsItem[1] = '30-Jun-08: Prince Extends Popular O3 Speedport Black Racquet Line'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1227.html'; newsItem[1] = '25-Jun-08: USPTA s Tennis Buying Show to be held at La Quinta Resort & Club'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1219.html'; newsItem[1] = '24-Jun-08: Own the Zone Teams with Coach Walter D Amico to Distribute OTZ Band Dampeners in BENELUX Region'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1226.html'; newsItem[1] = '24-Jun-08: Rolex Signs as Exclusive Sponsor of Tennis.com'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1217.html'; newsItem[1] = '20-Jun-08: 45 Pounds Shed In 90 Minutes'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1218.html'; newsItem[1] = '20-Jun-08: Family Circle Tennis Center Is Named Tennis Welcome Center of the Month '; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1220.html'; newsItem[1] = '20-Jun-08: Wimbledon themed Crossword, Wordoku and Wordsearch Launched on TennisPuzzles.com'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1213.html'; newsItem[1] = '18-Jun-08: 2008 Wimbledon LIVE Demonstrates Continued Success for MediaZone in Online International Sports Coverage'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1214.html'; newsItem[1] = '18-Jun-08: PTR Schedules Professional Development Weekend'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1222.html'; newsItem[1] = '18-Jun-08: World TeamTennis Matches to Air on Tennis Channel and VERSUS'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1223.html'; newsItem[1] = '18-Jun-08: Wilson Racquet Sports on Facebook Gives Fans the Opportunity to Recognize Justine Henin'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1224.html'; newsItem[1] = '18-Jun-08: Sony Ericsson WTA Tour Unveils Largest Ad Campaign in Tour History'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1212.html'; newsItem[1] = '17-Jun-08: USPTA Receives Award of Distinction for Feature Article'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1221.html'; newsItem[1] = '17-Jun-08: International Tennis Hall of Fame Announces Presenters for the 2008 Induction Ceremony'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1211.html'; newsItem[1] = '16-Jun-08: Wilson Releases Limited Edition Roger Federer Racket Bag'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1208.html'; newsItem[1] = '11-Jun-08: Tennis Europe & Lawn Tennis Association Present Europe s Premier Coaching Event'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1207.html'; newsItem[1] = '10-Jun-08: Patrick McEnroe and Tracy Austin earn USPTA certification'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1210.html'; newsItem[1] = '10-Jun-08: Dominic Schmitt Named General Manager of Tennis.com'; newsItems[newsItems.length] = newsItem; newsItem = new Array(); newsItem[0] = 'http://tenniswire.org/archives/2008/jun/pr_1206.html'; newsItem[1] = '09-Jun-08: TENNIS Magazine Names Eight Best Resorts for Luxurious Tennis Vacations'; newsItems[newsItems.length] = newsItem; var whichItem = 0; document.write(""); document.write(''); document.write(''); document.write("
'); document.write(' '); document.write(''); document.write(''); document.write(newsItems[0][1]); document.write(''); document.write(''); document.write('
"); document.writeln; setTimeout("refreshPage()", refreshSeconds * 1000); //------ changes text of a at ID spanID. (Assumes there's ONLY text in the span.) ------// function replaceSpan(spanID, newText){ //------ Make a new span with the new text ------// var newSpan = document.createElement("span"); var newTextNode = document.createTextNode(newText ); newSpan.appendChild(newTextNode); //------ get the span currently in the document at spanID ------// var spanElm = document.getElementById(spanID); var textChild = spanElm.childNodes[0]; // assume that span has only text within //------ Replace the span in the doc ------// var replaced = spanElm.replaceChild(newTextNode,textChild); } function newSpanItem(docSpan, dataSpan){ //------ Get the new title ------// var newTitle = newsItems[dataSpan][1]; //------ calculate the ID of the proper news item ------// spanID = "tenniswireNewsFeedSpan" + docSpan; replaceSpan(spanID, newTitle); } function refreshPage(){ whichItem += 1; if (whichItem >= newsItems.length) whichItem = 0; document.getElementById('tenniswireNewsFeedHref0').href = newsItems[whichItem+0][0];newSpanItem(0, whichItem + 0); setTimeout("refreshPage()", refreshSeconds * 1000); }