function createRemote(){
  winRemote=window.open("remote.htm","remote","width=300,height=450,scrollbars=yes,resizable=yes,copyhistory=no,status=no");
  winRemote.creator=self;
  winRemote.focus();
}

function putLastMod(){

// Array of day names
    var dayNames = new  Array("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday");

// Array of month Names
    var monthNames = new Array(
"January","February","March","April","May","June","July","August","September","October","November","December");

    var now = new Date(document.lastModified);
    document.write(dayNames[now.getDay()] + ", " + monthNames[now.getMonth()] + " " + now.getDate() + ", " + now.getFullYear());
}

// the full link with text displayed to click on
function email(name, domain, other, title) {
  emailOpen(name, domain, other, title);
  document.write (name + '@' + domain + '</a>')
}
// The first bit of the link
function emailOpen(name, domain, other, title) {
  document.write('<a href="mail' + 'to:' + name + '@' + domain + other + '" title="' + title + '">');
}

// email('mikec-website', 'canada.com'
function email1 () {
  email('ImInOttawaGM', 'gmail.com', '?subject=http://www.ncf.ca/~ae987/index.htm#1&amp;Body=%0D%0AFrom link at top of homepage%0D%0A','Feedback from http://www.ncf.ca/~ae987/index.htm#1a');
}

function email3 () {
  email('ImInOttawaGM', 'gmail.com', '?subject=http://www.ncf.ca/~ae987/index.htm#3&amp;Body=%0D%0AFrom link in body%0D%0A','Feedback from http://www.ncf.ca/~ae987/index.htm#3a');
}

function email4 () {
  email('ImInOttawaGM', 'gmail.com', '?subject=http://www.ncf.ca/~ae987/index.htm#4&amp;Body=%0D%0AFrom link at bottom of homepage%0D%0A','Feedback from http://www.ncf.ca/~ae987/index.htm#4a');
}