function RelPath(u)
// returns a relative path of absolute path u

{
  MainDirs = new Array('/De/','/En/','/Nl/','/Images/','/Int_Titels/');
  var p = 0;
  var rp = new String('');
  var Found = false;
  var idx = 0;

  while ((idx<MainDirs.length) && (!Found))
    { 
      p=u.indexOf(MainDirs[idx]);
      Found=(p!=-1);
      idx++;
    }
  if (!Found)
    { return '' }
  else
    {
      idx=u.length;
    	while (u.lastIndexOf('/')>p)
        {
          rp='../'+rp; 
	    u=u.substring(0,u.lastIndexOf('/'));
        }
      return rp; 
    }
}

function ConstructHTMLHead(win,lang)

{
  d=win.document;
  d.writeln('<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><HTML><HEAD><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=windows-1252"><META NAME="Author" CONTENT="MegaByte Software">');
  lang=='nl' ? d.writeln('<TITLE>Helvoirts Bierglazen Huis</TITLE>') : d.writeln('<TITLE>Helvoirts House of Beerglasses</TITLE>');
  d.writeln('</HEAD>');
}

function ConstructFrameSet(win,lang,contURL,bodyURL)

{
  d=win.document;
  d.writeln('<FRAMESET BORDER=0 FRAMESPACING=0 FRAMEBORDER=5 COLS="160,*">');
  d.writeln('  <FRAME NAME="Inhoud" SRC="'+contURL+'" SCROLLING="auto" MARGINWIDTH="2" MARGINHEIGHT="2" FRAMEBORDER="yes" BORDER="0">');
  d.writeln('  <FRAMESET BORDER=0 FRAMESPACING=0 FRAMEBORDER=5 ROWS="350,*">');
  d.writeln('    <FRAME NAME="body" SRC="'+bodyURL+'" SCROLLING="auto" MARGINWIDTH="2" MARGINHEIGHT="2">');
  d.writeln('    <FRAME NAME="nav" SRC="'+RelPath(d.location.href)+'Netscape.html" SCROLLING="no">'); 
  d.writeln('  </FRAMESET>');
  d.writeln('</FRAMESET>');
  lang=='nl' ? d.writeln('<NOFRAMES>Deze site maakt gebruik van frames. Zonder frames is deze site niet te bekijken. Stel uw browser zo in dat deze frames ondersteunt.</NOFRAMES>') : d.writeln('<NOFRAMES>This site uses frames. Without frames this site can\'t be viewed. Configure your browser in such a way it supports frames.</NOFRAMES>');
}

function ConstructHTMLFoot(win,lang)

{
  win.document.writeln('</HTML>');
}

function SetNav(prev,prevSect,home,next)

{

}

function ConstructFrame(contURL,bodyURL,lang,prev,prevSect,home,next)

{
  win=top;
  if (win.frames.length==0)
    {win.document.close();
     win.document.open('text/html','replace');
     ConstructHTMLHead(win,lang);
     ConstructFrameSet(win,lang,contURL,bodyURL);
     ConstructHTMLFoot(win,lang);
     SetNav(prev,prevSect,home,next);
   }
}

function DateStr(d)

{
  var MonthNamesEn = new Array('January','February','March','April','May','June','July',
    'August','September','October','November','December');
  var MonthNamesNl = new Array('Januari','Februari','Maart','April','Mei','Juni','Juli','Augustus','September','Oktober','November','December');

  var s = '';
  
  s+=d.getDate()+' ';
  if (document.location.href.indexOf('/Nl/')==-1)
    { s+=(MonthNamesEn[d.getMonth()])+' '; }
  else
    { s+=(MonthNamesNl[d.getMonth()])+' '; }
  if (navigator.appName.indexOf('Netscape')==-1)
    { s+=d.getUTCFullYear(); }
  else
    { if (d.getUTCFullYear()==1900)
	  { s+=d.getUTCFullYear()+100; } // fix Netscape millennium bug
      else
	  { s+=d.getUTCFullYear(); }
    }  
  return s;
}

function NetscapeBrowser()

{
  return (navigator.appName.indexOf('Netscape')!=-1);
}

function img_roll(name,state)

{
 if (document.images)
   { if (state=='down') 
       { document.images[name].src = document.images[name].src.substring(0,document.images[name].src.indexOf(".GIF"))+"_pr.GIF"; }
     else
       { document.images[name].src = document.images[name].src.substring(0,document.images[name].src.indexOf('_pr'))+".GIF";}
   }
}

function WriteLastModified()

{
  lastmod = document.lastModified;
  TimeAfter1970 = Date.parse(lastmod);
  if (TimeAfter1970 == 0)
    { document.write("onbekend") }
  else
    { lm = new Date(TimeAfter1970);
      document.write(DateStr(lm));
    }
}  

function WritePageVersion()

{
  document.writeln('<P><HR><TABLE BORDER=0 WIDTH=100%><TR><TD><FONT SIZE=3><EM>&copy; MegaByte Software, ');
  if (WritePageVersion.arguments.length!=0)
    { document.write(WritePageVersion.arguments[0]+'-'); }
  WriteLastModified();
  document.write('</EM></FONT></TD><TD ALIGN="right"><FONT SIZE=3><EM><A HREF="mailto:info@bierglazenhuis.com">info@bierglazenhuis.com</A></EM></FONT></TD></TR></TABLE></P>');
}