/* sendEmail - send link to selected page via email */
function sendEmail() {
    var page1;
    var page2;
    var page3;
    var page4;
    page1 = document.location.pathname;
    page2 = page1.length;
    page3 = page1.indexOf("/");
    page4 = page1.substr(page3+1,page2-page3);
    target = "emailpage.asp?page=" + page4
    location=target;
}
/* imgres - create appropriate html img tag based on screen resolution */
function imgres(mode,imgna,imgno,imgcl,imgalt,imghhgt,imghwdt,imghwin,imgmhgt,imgmwdt,imgmwin)
{ 
   var sres = "r1024";
   var pfx = "hi_";
   var imgreswn = imghwin;
   var imgreswd = imghwdt;
   var imgresht = imghhgt;
//   var now = new Date();
//   var hour = now.getHours();
//  if (hour < 10)
//    {var scheme = "red";};
//  if (hour > 9 && hour < 18)
//    {var scheme = "blue";};
//  if (hour > 17)
//    {var scheme = "red";};
    var scheme = "";
  if ((screen.width == 640) && (screen.height == 480) || (screen.width == 800) && (screen.height == 600))  
    {
     var sres = "r800";
     var pfx = "med_";
     var imgreswn = imgmwin;
     var imgreswd = imgmwdt;
     var imgresht = imgmhgt;
    }
  if (mode == '8') 
    {
     document.writeln("<a href=\"#\" onclick=\"NewWindow(\'enlarge.asp\?pic=" + sres + '/' + pfx + imgna + "\&hght=" + imgresht + "\',\'PollenBrooks\',\'" + imgreswd + "\',\'" + imgreswn + "\','no')\"")
     document.writeln("onmouseOver=\"window.status=\'" + imgalt + "\'; return true\"")
     document.writeln("onmouseOut=\"window.status=\'Prelude Properties\'; return true\">")
     document.writeln(imgalt + "</A>");
    }
  else if (mode == '7') 
    {
     document.write("<img border='0' name='picture_" + imgno + "' src='images/" + sres + scheme + '/' + pfx + imgna + "' alt='" + imgalt + "'>");
    }
  else if (mode == '6') 
    {
     document.write("<img class='" + imgcl + "' align='center' src='images/" + sres + scheme + '/' + pfx + imgna + "' hsrc='images/" + sres + scheme + '/' + pfx + imgno + "'>");
    }
  else if (mode == '5') 
    {
     document.writeln("<a href=\"#\" onclick=\"NewWindow(\'enlarge.asp\?pic=" + sres + '/' + pfx + 'large-' + imgna + "\&hght=" + imgresht + "\',\'PollenBrooks\',\'" + imgreswd + "\',\'" + imgreswn + "\','no')\"")
     document.writeln("onmouseOver=\"window.status=\'" + imgalt + "\'; return true\"")
     document.writeln("onmouseOut=\"window.status=\'Prelude Properties\'; return true\">")
     document.writeln("<img border='0' alt='" + imgalt + "' class='" + imgcl + "' src='images/" + sres + '/' + pfx + imgna + "'></A>");
    }
  else if (mode == '4')
    {
     document.write("<img border='0' alt='" + imgalt + "' class='" + imgcl + "' src='images/" + sres + scheme + '/' + pfx + imgna + "'>");
    }
  else if (mode == '3')
    {
     document.write("<img border='0' alt='" + imgalt + "' class='" + imgcl + "' src='../images/" + sres + scheme + '/' + pfx + imgna + "'>");
    }
  else if (mode == '2')
    {
     document.write("<img alt='" + imgalt + "' class='" + imgcl + "' src='../images/" + sres + scheme + '/' + pfx + imgna + "'>");
    }
  else if (mode == '1')
    {
     document.write("<img class='" + imgcl + "' style='filter:blendTrans(duration=3)' name='slide" + imgno + "' align='center' src='images/" + sres + scheme + '/' + pfx + imgna + "'>");
    }
  else 
    { 
     document.write("<img alt='" + imgalt + "' class='" + imgcl + "' src='images/" + sres + scheme + '/' + pfx + imgna + "'>");
    }
}