var date = new Date();
var h   = date.getHours();
var m   = date.getMinutes();
var day = date.getDay();
var show;
var time;
var site;

var program = new Array();
program[0] = "A Prairie Home Companion";
program[1] = "All Things Considered";
program[2] = "Alternative Radio";
program[3] = "BBC World Service";
program[4] = "Bob Edwards Weekend";
program[5] = "Car Talk";
program[6] = "Classical Music";
program[7] = "Here and Now";
program[8] = "Epicentro";
program[9] = "Fresh Air";
program[10] = "From the Top";
program[11] = "Jazz a la Mode";
program[12] = "Jazz Safari";
program[13] = "Latino USA";
program[14] = "Living on Earth";
program[15] = "Marketplace";
program[16] = "Marketplace Money";
program[17] = "Morning Edition";
program[18] = "News and Notes";
program[19] = "On Point";
program[20] = "On the Media";
program[21] = "Only a Game";
program[22] = "Overnight Classical Music";
program[23] = "Saturday Opera";
program[24] = "Says You";
program[25] = "Selected Shorts";
program[26] = "Sound and Spirit";
program[27] = "Soundwaves";
program[28] = "Speaking of Faith";
program[29] = "Studio 360";
program[30] = "Sunday Baroque";
program[31] = "Talk of the Nation";
program[32] = "Tell Me More";
program[33] = "Tertulia";
program[34] = "The Splendid Table";
program[35] = "The State We're In";
program[36] = "The TakeAway";
program[37] = "The Tavis Smiley Show";
program[38] = "The World";
program[39] = "This American Life";
program[40] = "Wait, Wait…Don't Tell Me";
program[41] = "Weekend America";
program[42] = "Weekend Edition Saturday";
program[43] = "Weekend Edition Sunday";
program[44] = "Writer's Voice";
program[45] = "To the Best of Our Knowledge";
program[46] = "World Have Your Say";
program[47] = "BBC NewsHour";

var plink = new Array();
plink[0] = "http://prairiehome.publicradio.org/";
plink[1] = "http://www.npr.org/templates/rundowns/rundown.php?prgId=2";
plink[2] = "http://www.alternativeradio.org/";
plink[3] = "http://www.bbc.co.uk/worldservice/";
plink[4] = "http://www.bobedwardsradio.com/bob-edwards-weekend/";
plink[5] = "ttp://cartalk.com/";
plink[6] = "http://www.wfcr.org/programs/classical.php";
plink[7] = "http://www.here-now.org/";
plink[8] = "http://epicentrored.com/";
plink[9] = "http://www.npr.org/templates/rundowns/rundown.php?prgId=13";
plink[10] = "http://www.fromthetop.org/";
plink[11] = "http://www.wfcr.org/programs/jazz.php";
plink[12] = "http://www.wfcr.org/programs/jazz.php#safari";
plink[13] = "http://www.latinousa.org/";
plink[14] = "http://www.loe.org/";
plink[15] = "http://marketplace.publicradio.org/";
plink[16] = "http://marketplace.publicradio.org/episodes/show_rundown.php?show_id=8";
plink[17] = "http://www.npr.org/templates/rundowns/rundown.php?prgId=3";
plink[18] = "http://www.npr.org/templates/rundowns/rundown.php?prgId=11";
plink[19] = "http://www.onpointradio.org/";
plink[20] = "http://www.onthemedia.org/";
plink[21] = "http://www.onlyagame.org/";
plink[22] = "http://www.wfmt.com/main.taf?erube_fh=wttw&wttw.submit.SimpSchedDay=1&wttw.Channel=bsn";
plink[23] = "http://www.operainfo.org/";
plink[24] = "http://www.saysyou.net/";
plink[25] = "http://selectedshorts.org/";
plink[26] = "http://www.wgbh.org/pages/pri/spirit/";
plink[27] = "http://wfcr.org/soundwaves/index.php";
plink[28] = "http://speakingoffaith.publicradio.org/";
plink[29] = "http://www.studio360.org/";
plink[30] = "http://www.sundaybaroque.org/";
plink[31] = "http://www.npr.org/templates/rundowns/rundown.php?prgId=5";
plink[32] = "http://www.npr.org/templates/rundowns/rundown.php?prgId=46";
plink[33] = "http://www.wfcr.org/programs/tertulia.php";
plink[34] = "http://splendidtable.publicradio.org/";
plink[35] = "http://www.radionetherlands.nl/thestatewerein/";
plink[36] = "http://www.thetakeaway.org/";
plink[37] = "http://www.npr.org/templates/rundowns/rundown.php?prgId=14";
plink[38] = "http://www.theworld.org/";
plink[39] = "http://www.thislife.org/";
plink[40] = "http://www.npr.org/programs/waitwait/";
plink[41] = "http://weekendamerica.publicradio.org/";
plink[42] = "http://www.npr.org/templates/rundowns/rundown.php?prgId=7";
plink[43] = "http://www.npr.org/templates/rundowns/rundown.php?prgId=10";
plink[44] = "http://www.writersvoice.net/";
plink[45] = "http://www.wpr.org/BOOK/";
plink[46] = "http://worldhaveyoursay.wordpress.com/";
plink[47] = "http://www.bbc.co.uk/worldservice/news/2009/03/000000_newshour.shtml";
plink[48] = "http://www.wfmt.com/main.taf?p=12,11,4";

var timeslot = new Array();
timeslot[0] = "5-9am";
timeslot[1] = "6-7am";
timeslot[2] = "6-8am";
timeslot[3] = "6-9am";
timeslot[4] = "6am-1pm";
timeslot[5] = "7-8am";
timeslot[6] = "7-9am";
timeslot[7] = "8-10am";
timeslot[8] = "8-11am";
timeslot[9] = "9-10am";
timeslot[10] = "9am-4pm";
timeslot[11] = "10-11am";
timeslot[12] = "10am-12pm";
timeslot[13] = "10am-2pm";
timeslot[14] = "11am-12pm";
timeslot[15] = "12-1pm";
timeslot[16] = "12-2pm";
timeslot[17] = "1-2pm";
timeslot[18] = "1-3pm";
timeslot[19] = "1-4:30pm";
timeslot[20] = "2-11pm";
timeslot[21] = "2-3pm";
timeslot[22] = "2-4pm";
timeslot[23] = "3-4pm";
timeslot[24] = "3-5pm";
timeslot[25] = "4-11pm";
timeslot[26] = "4-5pm";
timeslot[27] = "4-6:30pm";
timeslot[28] = "4:30-5pm";
timeslot[29] = "5-11pm";
timeslot[30] = "5-6pm";
timeslot[31] = "6-6:30pm";
timeslot[32] = "6-7pm";
timeslot[33] = "6-8pm";
timeslot[34] = "6:30-7pm";
timeslot[35] = "7pm-6am";
timeslot[36] = "7-8pm";
timeslot[37] = "8-10pm";
timeslot[38] = "8-11pm";
timeslot[39] = "10-10:30pm";
timeslot[40] = "10pm-6am";
timeslot[41] = "10:30-11pm";
timeslot[42] = "11pm-5am";
timeslot[43] = "11pm-6am";
timeslot[44] = "2-5pm";

//WFCR Schedule
function wfcrsched()
{
if (day>0 && day<6) //Weekdays
{
 if (h<5) {show=program[22]; time=timeslot[42]; site=plink[22];} //Overnight Classical Music
 else if (h>=6&&h<9) {show=program[17]; time=timeslot[3]; site=plink[17];} //Morning Edition
 else if (h>=9&&h<16) {show=program[6]; time=timeslot[10]; site=plink[6];} //Classical Music
 else if (h==16||h==17) {show=program[1]; time=timeslot[27]; site=plink[1];} //All Things Considered (except last half hour)
 else if (h==18&&m<30) {show=program[1]; time=timeslot[27]; site=plink[1];} //All Things Considered (last half hour)
 else if (h==18&&m>=30) {show=program[15]; time=timeslot[31]; site=plink[15];} //Marketplace
 else if (h==19) {show=program[9]; time=timeslot[36]; site=plink[9];} //Fresh Air
 else if (h>=20&&h<23) {show=program[11]; time=timeslot[38]; site=plink[11];} //Jazz a la Mode
 else if (day<5&&h==23) {show=program[22]; time=timeslot[42]; site=plink[22];} //Overnight Classical Music (except Friday)
 else if (day==5&&h==23) {show=program[22]; time=timeslot[43]; site=plink[22];} //Overnight Classical Music (Friday)
 else {show="1"; time="a"}
}
else if (day==6) //Saturday
{
 if (h<6) {show=program[22]; time=timeslot[43]; site=plink[22];} //Overnight Classical Music
 else if (h==6) {show=program[14]; time=timeslot[1]; site=plink[14];} //Living On Earth
 else if (h==7) {show=program[21]; time=timeslot[5]; site=plink[21];} //Only a Game
 else if (h>=8&&h<11) {show=program[42]; time=timeslot[8]; site=plink[42];} //Weekend Edition Saturday
 else if (h==11) {show=program[5]; time=timeslot[14]; site=plink[5];} //Car Talk
 else if (h==12) {show=program[40]; time=timeslot[15]; site=plink[40];} //Wait Wait Don't Tell Me
 else if (h>=13&&h<16) {show=program[23]; time=timeslot[19]; site=plink[23];} //Saturday Opera (except last half hour)
 else if (h==16&&m<30) {show=program[23]; time=timeslot[19]; site=plink[23];} //Saturday Opera (last half hour)
 else if (h==16&&m>=30) {show=program[24]; time=timeslot[28]; site=plink[24];} //Says You
 else if (h==17) {show=program[1]; time=timeslot[30]; site=plink[1];} //All Things Considered
 else if (h==18||h==19) {show=program[0]; time=timeslot[33]; site=plink[0];} //A Prairie Home Companion
 else if (h>=20&&h<23) {show=program[12]; time=timeslot[38]; site=plink[12];} //Jazz Safari
 else if (h==23) {show=program[22]; time=timeslot[43]; site=plink[22];} //Overnight Classical Music
 else {show="2"; time="b"}
}
else if (day==0) //Sunday
{
 if (h<6) {show=program[22]; time=timeslot[43]; site=plink[22];} //Overnight Classical Music
 else if (h==6||h==7) {show=program[30]; time=timeslot[2]; site=plink[30];} //Sunday Baroque
 else if (h==8||h==9) {show=program[43]; time=timeslot[7]; site=plink[43];} //Weekend Edition Sunday
 else if (h>=10&&h<14) {show=program[6]; time=timeslot[13]; site=plink[6];} //Classical Music
 else if (h==14) {show=program[10]; time=timeslot[21]; site=plink[10];} //From the Top
 else if (h==15||h==16) {show=program[0]; time=timeslot[24]; site=plink[0];} //A Prairie Home Companion
 else if (h==17) {show=program[1]; time=timeslot[30]; site=plink[1];} //All Things Considered
 else if (h==18) {show=program[5]; time=timeslot[32]; site=plink[5];} //Car Talk
 else if (h==19) {show=program[39]; time=timeslot[36]; site=plink[39];} //This American Life
 else if (h==20||h==21) {show=program[33]; time=timeslot[37]; site=plink[33];} //Tertulia
 else if (h==22&&m<30) {show=program[8]; time=timeslot[39]; site=plink[8];} //Epicentro
 else if (h==22&&m>=30) {show=program[13]; time=timeslot[41]; site=plink[13];} //Latino USA
 else if (h==23) {show=program[22]; time=timeslot[42]; site=plink[22];} //Overnight Classical Music
 else {show="3"; time="c"}
}
else
 {show="4"; time="b"}
 
document.write("<b><a href="+site+" target='_blank'>"+show+"</a></b> "+time);
//document.write(time);
}

//HD2 Schedule
function hdsched()
{
if (day==0&&(h==8||h==9)) //Sunday
 {show=program[30]; time=timeslot[7]; site=plink[30];} //Sunday Baroque
else
 {show=program[6]; time=""; site=plink[48];} //Beethoven Satellite Network
 
document.write("<b><a href="+site+" target='_blank'>"+show+"</a></b> "+time);
//document.write(time);
 
}

//WNNZ Schedule
function wnnzsched()
{
if (day>0 && day<6) //Weekdays
{
 if (h<6&&day!=1) {show=program[3]; time=timeslot[40]; site=plink[3];} //BBC World Service - except Monday
 else if (h<6&&day==1) {show=program[3]; time=timeslot[35]; site=plink[3];} //BBC World Service - Monday
 else if (h==6) {show=program[36]; time=timeslot[1]; site=plink[36];} //The TakeAway
 else if (h==7||h==8) {show=program[17]; time=timeslot[6]; site=plink[17];} //Morning Edition
 else if (h==9) {show=program[47]; time=timeslot[9]; site=plink[47];} //BBC NewsHour
 else if (h==10) {show=program[19]; time=timeslot[11]; site=plink[19];} //On Point
 else if (h==11) {show=program[32]; time=timeslot[14]; site=plink[32];} //Tell Me More
 else if (h==12) {show=program[7]; time=timeslot[15]; site=plink[7];} //Here and Now
 else if (h==13) {show=program[9]; time=timeslot[17]; site=plink[9];} //Fresh Air
 else if (h==14) {show=program[31]; time=timeslot[21]; site=plink[31];} //Talk of the Nation
 else if (h==15) {show=program[38]; time=timeslot[23]; site=plink[38];} //The World
 else if (h==16||h==17||h==18&&m<30) {show=program[1]; time=timeslot[27]; site=plink[1];} //All Things Considered
 else if (h==18&&m>=30) {show=program[15]; time=timeslot[34]; site=plink[15];} //Marketplace
 else if (h==19) {show=program[38]; time=timeslot[36]; site=plink[38];} //The World (repeat)
 else if (h==20||h==21) {show=program[31]; time=timeslot[37]; site=plink[31];} //Talk of the Nation (1st hr repeat)
 else if (h>21) {show=program[3]; time=timeslot[40]; site=plink[3];} //BBC World Service
 else {show="1"; time="a"}
}
else if (day==6) //Saturday
{
 if (h<6) {show=program[3]; time=timeslot[40]; site=plink[3];} //BBC World Service
 else if (h==6||h==7) {show=program[37]; time=timeslot[2]; site=plink[37];} //Tavis Smiley
 else if (h==8||h==9) {show=program[42]; time=timeslot[7]; site=plink[42];} //Weekend Edition Saturday
 else if (h==10) {show=program[20]; time=timeslot[11]; site=plink[20];} //On the Media
 else if (h==11) {show=program[34]; time=timeslot[14]; site=plink[34];} //The Splendid Table
 else if (h==12||h==13) {show=program[4]; time=timeslot[16]; site=plink[4];} //Bob Edwards Weekend
 else if (h==14) {show=program[39]; time=timeslot[21]; site=plink[39];} //This American Life
 else if (h==15||h==16) {show=program[45]; time=timeslot[24]; site=plink[45];} //To the Best of Our Knowledge
 else if (h==17) {show=program[29]; time=timeslot[30]; site=plink[29];} //Studio 360
 else if (h==18) {show=program[2]; time=timeslot[32]; site=plink[2];} //Alternative Radio
 else if (h>18) {show=program[3]; time=timeslot[35]; site=plink[3];} //BBC World Service
 else {show="2"; time="b"}
}
else if (day==0) //Sunday
{
 if (h<6) {show=program[3]; time=timeslot[35]; site=plink[3];} //BBC World Service
 else if (h==6) {show=program[9]; time=timeslot[1]; site=plink[9];} //Fresh Air Weekend
 else if (h==7) {show=program[28]; time=timeslot[5]; site=plink[28];} //Speaking of Faith
 else if (h==8||h==9) {show=program[43]; time=timeslot[7]; site=plink[43];} //Weekend Edition Sunday
 else if (h==10) {show=program[5]; time=timeslot[11]; site=plink[5];} //Car Talk
 else if (h==11) {show=program[40]; time=timeslot[14]; site=plink[40];} //Wait Wait Don't Tell Me
 else if (h==12) {show=program[24]; time=timeslot[15]; site=plink[24];} //Says You
 else if (h==13) {show=program[25]; time=timeslot[17]; site=plink[25];} //Selected Shorts
 else if (h==14) {show=program[44]; time=timeslot[21]; site=plink[44];} //Writer's Voice
 else if (h==15) {show=program[14]; time=timeslot[23]; site=plink[14];} //Living on Earth
 else if (h==16) {show=program[20]; time=timeslot[26]; site=plink[20];} //On the Media
 else if (h==17) {show=program[27]; time=timeslot[30]; site=plink[27];} //Soundwaves
 else if (h==18&&m<30) {show=program[13]; time=timeslot[31]; site=plink[13];} //Latino USA
 else if (h==18&&m>=30) {show=program[8]; time=timeslot[34]; site=plink[8];} //Epicentro
 else if (h>18) {show=program[3]; time=timeslot[35]; site=plink[3];} //BBC World Service
 else {show="3"; time="c"}
}
else
 {show="4"; time="b"}
 
document.write("<b><a href="+site+" target='_blank'>"+show+"</a></b> "+time);
//document.write(time);
 
}