function writeButton(urld,url,name,w,h,alt,target,hsp)
{
  gname=name;
  while (typeof(document[name])!="undefined") name+="x";
  reg(gname,name);
  tr(true);
  document.write("<td>");

  if (alt!="") alt=" alt=\""+alt+"\"";
  if (target!="") target=" target=\""+target+"\"";
  if (w>0) w=" width=\""+w+"\"";
    else w="";
  if (h>0) h=" height=\""+h+"\"";
    else h="";
  var l=clicked!=""||!isCurrentFile(url);

//  if(url!="")url=" href=\""+urld+url+"\""; //ESR
  if(url!="")url=" href=\""+url+"\""; //ESR

  if(l)
  {
    if(typeof(clx)!="undefined")
    {
      target="";
      url=" href=\"?"+clx+"\"";
      alt=" alt=\"Click to edit\"";
    }
    document.write("<a "+url+evs(name)+target+">");
  } else {
    gname+=selstate;
  }

  gname+=gtype;

  if(hsp==-1) hsp=" align=\"right\"";
    else if(hsp>0)hsp=" hspace=\""+hsp+"\"";
      else hsp="";

  document.write("<img src=\""+loc+gname+"\" name=\""+name+"\""+w+h+alt+hsp+" border=\"0\" />");

  if(l) document.write("</a>");
  document.write("</td>");
  tr(false);
}

function syncFile(f,nf){var matches='home.html*index.html*welcome.html*default.asp';var p=f.lastIndexOf('/');var sf=f;if(p>=0)sf=f.substr(p+1,f.length-1);if(matches.indexOf(sf)==-1)return "";return sf;}

function isCurrentFile(str)
{
  var p=str.lastIndexOf(':');

  if (p>0) str=str.substr(p+1,str.length-1);

  str=escape(str);
  str=str.toLowerCase();

//  while (str.length>3&&str.substring(0,3)=="../") //ESR
//     str=str.substr(3,str.length-1);              //ESR

  var fstr=str.indexOf(".htm");

  if (fstr==-1) fstr=str.indexOf(".asp");
  if (fstr==-1) fstr=str.indexOf(".php");
  if (fstr==-1) fstr=str.indexOf(".jsp");
  if (fstr==-1) fstr=str.indexOf(".txt");
  if (fstr<1&&str.charAt(str.length-1)!='/') str+="/";

  var current=document.location.href.toLowerCase();

  p=current.lastIndexOf('?');

  if (p>0) current=current.substr(0,p);
  var fcurrent=current.indexOf(".htm");
  if (fcurrent==-1) fcurrent=current.indexOf(".asp");
  if (fcurrent==-1) fcurrent=current.indexOf(".php");
  if (fcurrent==-1) fcurrent=current.indexOf(".jsp");
  if (fcurrent==-1) fcurrent=current.indexOf(".txt");
  if (fcurrent<1&&current.charAt(current.length-1)!='/') current+="/";

  if (fstr!=-1&&fcurrent==-1) current+=syncFile(str,current);
  if (fstr==-1&&fcurrent!=-1) str+=syncFile(current,str);

  var currsize=current.length;
  var strsize=str.length;
  while (strsize>=0&&currsize>=0)
  {
    if (current.charAt(currsize)!=str.charAt(strsize)) return false;
    currsize=currsize-1;
    strsize=strsize-1;
  }
  return true;
}