//epasearch
var basedir="/"
var searchdir="http://epasearchcom.site.securepod.com/search/"
var thumbdir="http://epasearchcom.site.securepod.com/search/thumbs/"
var previewdir="http://epasearchcom.site.securepod.com/search/previews/"
var imagedir = "/graphics/"
// no background
var backgrd = "/graphics/white.jpg"
var cgidir = "http://epasearchcom.site.securepod.com/cgi-bin/epa-search/"
var jsdir="/search/"
var cgiext=".pl"

//get browser
   var browser = navigator.appName;
   var Nav = (browser == "Netscape");
   var IE = (browser == "Microsoft Internet Explorer");
//------------------------------------------------------------

function lasttime() {
// Copyright Keith Robinson ccaakwr@ucl.ac.uk
   var browser = navigator.appName;
   var Nav = (browser == "Netscape");
   var IE = (browser == "Microsoft Internet Explorer");
   var plat= navigator.platform;
   var mac= (plat=="MacPPC")
   var vers = navigator.appVersion
   var vers2 = parseInt(vers)
   var box = getCookie("box")
   var boxes=getCookie("boxes")
// epa versin 
// only called if there are images to show
   var s = "<p><br><img src=\"graphics/lasttime.jpg\" width=\"171\" height=\"54\"></p>\n"
   s += "<table border=\"2\" cellpadding=\"5\" bordercolor=\"#c86f51\">\n"
   var bo = boxes.split("#")
   var l =bo.length
// Are there any discards
   var dis =getCookie("discards")
   if (!dis){
   } else {
      bo[l]="discards"
      l = l+1
   }
   document.writeln(s)
   s = ""
// col keeps count of cols and starts a new row when it reaches 3
   if (mac) {
      s += "<form method=\"get\" name=\"light1\" target=\"newwinbcp\"\n";
      s += "action=\""+cgidir+"lightbx2"+cgiext+"\">\n";
      s += "<input type=\"hidden\" name=\"thisbox\" value=\"boxmanager\">\n";
   } else {
//use Netscape            s += "<form>\n";
      s += "<form method=\"get\" name=\"light1\" target=\"newwinbcp\"\n";
      s += "action=\""+cgidir+"lightbx2"+cgiext+"\">\n";
      s += "<input type=\"hidden\" name=\"thisbox\" value=\"boxmanager\">\n";
   }
   document.writeln(s)
   s = ""
   s += "<center><table border=\"1\" cellpadding=\"5\"><tr align=\"center\">\n";
   var col = 0;
   for(var i=0; i < bo.length; i++) {
      col += 1;
      if (col == 4 ) {
// start new row
         col = 1;
         s += "</tr><tr align=\"center\">\n"
      }
// Add Lightbox Cell
      buc = bo[i].substr(0,1)
      buc = buc.toUpperCase()
      buc += bo[i].substr(1,bo[i].length)
      s += "<td><font face=\"Verdana, Arial, Helvetica, sans-serif\"><strong>"+buc+"</strong><br>"
// Are there any images in the lightbox
      var sl = getCookie(bo[i])
      document.writeln(s)
      s = ""
      if (!sl) {
         s += "No Pictures<br><br>";
         s += "<img src=\""+imagedir+"nopics.jpg\" ><br><br>\n"
      } else {
         var p= sl.split("#");
         var ns = p.length
         s += ns +" pictures<br>"
// get first picture and display it
         var d = 0
         for (var ins=0;ins<ns;ins++){
            var q=p[ins].split("@")
            if (q[1]!="x"){
               d = ins
               break
            }
         }
// p[i] contains picture name and caption
         var q=p[d].split("@")
// check for missing thumbnail
         if (q[1]=="x"){
// missing thumb
            s += "<img src=\""+imagedir+"nothumb.jpg\"><br> "
            s += q[2]+"<br>"+q[0]+"<br>\n"
            document.writeln(s)
            s = ""
         } else {
            s += "<img src=\""+thumbdir
            s += q[0]
            s += ".jpg\" width=\""+q[1]+"\" height\""+q[2] 
            s += "\" alt=\""+q[3]+"\" border=\"1\" class=\"border\" ><br>"+q[0]+"<br>\n"
            document.writeln(s)
            s = ""
         }
      }
 //Don show button if no pics in light box
      if (!sl) {
	  } else {
         s += "<input type=\"button\" value=\"Open Lightbox\" name=\""+bo[i]+"\" \n";
         document.writeln(s)
         s = ""
         if (mac) {
            s += "onClick=\"makewin2('"+bo[i]+"')\">\n";
         } else {
//use Netscape    s += "onClick=\"makewin('"+bo[i]+"')\">\n";
            s += "onClick=\"makewin2('"+bo[i]+"')\">\n";
         }
	  }
      s += "</font></td>\n"
   }
   s += "</table></form><font face=\"Verdana, Arial, Helvetica, sans-serif\">\n"
   s += "<h5 align=\"center\">There is currently information on over 900 pictures.<br></h5>\n"
   if (mac) {
      s += "<h6 align=\"center\">Macintosh version</h6><br>\n"
   } else {
      s += "<h6 align=\"center\">PC version</h6>\n"
   }
   document.writeln(s)
   if (mac) {
      if (vers2 < 5 && IE) {
         s = "<table width=\"90%\" border=\"2\" cellpadding=\"10\">\n"
         s += "<tr bgcolor=\"\#FF3333\">\n"
         s += "<td>Whilst developing this search program we have become very aware of the\n"
         s += "differences between different web browsers running on different typres of computers.\n"
         s += "We have tried to address most of the problems we have come across but we\n"
         s += "have found Internet Explorer 4.5 running on a Macintosh very difficult to\n"
         s += "support. Code that works well under Netscape 4 and Internet Explorer 5.5\n"
         s += "fails to work using IE 4.5. If you are using IE version 4.5 or earlier you may have\n"
         s += "problems with some of the picture sorting facilities. The search engine will\n"
         s += "work correctly but selecting and sorting pictures may not. We suggest you\n"
         s += "upgrade to IE 5.5 to avoid these problems.</td>\n"
         s += "</tr>\n"
         s += "</table>\n"
         document.writeln(s)
      }
   }
   s = "</font>\n"
   document.writeln(s)
}

//-----------------------------------------------------------------------------
function resetboxes(){
// Copyright Keith Robinson ccaakwr@ucl.ac.uk
   var boxes=getCookie("boxes")
   if (!boxes) {
   } else {
// find all light boxes and zero them
      var bo = boxes.split("#")
      for(var i=0; i < bo.length; i++) {
         setCookie(bo[i],"",now,"/")
         deleteCookie(bo[i],"/")
// is box open
         var h = getCookie(bo[i]+"han")
         if (!h || h != "yes"){
         } else {
            kill_window(bo[i])
         }
         var c = document.cookie
      }
   }
   boxes="main";
   setCookie("boxes",boxes,now,"/");
   setCookie("box",boxes,now,"/");
   setCookie("main","",now,"/")
   deleteCookie("main","/")
   setCookie("discards","",now,"/")
   deleteCookie("discards","/")
   h = getCookie("discardshan")
   if (!h || h != "yes"){
   } else {
      kill_window("discards")
   }
   setCookie("discardshan","no",now,"/")
   h = getCookie("boxmanhan")
   if (!h || h != "yes"){
   } else {
      kill_window("boxmanager")
   }
   setCookie("boxmanhan","no",now,"/")
   setCookie("mainhan","no",now,"/")
   setCookie("savecap","yes",now,"/")
   setCookie("preview","",now,"/")
   deleteCookie("preview","/")
   var plat= navigator.platform;
//   alert("platform "+plat)
   var mac= (plat=="MacPPC")
//   alert(mac)
//   if (mac || Nav) {
//      window.location="index2m.htm"
//   } else {
//      window.location="index2n.htm"
//   }
   window.location="search.htm"
}
//-------------------------------------------------------------------
function carryon(){
// Copyright Keith Robinson ccaakwr@ucl.ac.uk
// Leave box content alone
   var boxes=getCookie("boxes")
// leave savecap alone
//setCookie("savecap","yes",now,"/")
   setCookie("preview","",now,"/")
   deleteCookie("preview","/")
   var plat= navigator.platform;
//   alert("platform "+plat)
   var mac= (plat=="MacPPC")
//   alert(mac)
//   if (mac || Nav) {
//      window.location="index2m.htm"
//   } else {
//      window.location="index2n.htm"
//   }
   window.location="search.htm"
}