function is4_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=is4_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

var menuTimeout = false;
var menuShownLayers;
var menuLastArgs = false;

function is4_clearMenu() {
  menuTimeout = false;
//  alert(1);
  for(var i=0;i<menuShownLayers.length;i++) {
    v = menuShownLayers[i];
    is4_showHideLayers(v,'','hide');
  }
  menuShownLayers = new Array();
}


function is4_showHideMenu() { //v6.0
  var args=is4_showHideMenu.arguments;
  
  if(menuTimeout) {
    window.clearTimeout(menuTimeout);
  }

  menuShownLayers = new Array();
//  document.f.t.value += '---------------\n';
  for(var i=0;i<args.length;i+=2) {
    if((menuLastArgs[i] != args[i]) || (menuLastArgs[i+1] != args[i+1])) {
    var state = args[i];
    var obj = args[i+1];
    
//    document.f.t.value += i + ':' + state + ',' + obj + '\n';
    
    is4_showHideLayers(obj,'',state ? 'show' : 'hide');
    if(state) {
      menuShownLayers[menuShownLayers.length] = obj;
    }
  }
  }
  
  menuLastArgs = args;
  
  menuTimeout = window.setTimeout("is4_clearMenu();",30000);
}


function is4_showHideLayers() { //v6.0
  var i,p,v,obj,args=is4_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) 
    if ((obj=is4_findObj(args[i]))!=null) { 
      v=args[i+2];
        if (obj.style) { 
      if(v == 'show') {
        obj.style.zIndex = 1000; 
        obj.style.visibility = 'visible';
        
      } else {
        obj.style.zIndex = -100;
        obj.style.visibility = 'hidden';
      }
      
          // v= (v=='show') ?'visible' : (v=='hide')?'hidden':v; 
      
        } else {
          obj.visibility=v; 
        }
      }
}
function is4_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.is4_p) d.is4_p=new Array();
    var i,j=d.is4_p.length,a=is4_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.is4_p[j]=new Image; d.is4_p[j++].src=a[i];}}
}

function is4_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=is4_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}
function is4_nbGroup(event, grpName) { //v3.0
  var i,img,nbArr,args=is4_nbGroup.arguments;
  if (event == "init" && args.length > 2) {
    if ((img = is4_findObj(args[2])) != null && !img.is4_init) {
      img.is4_init = true; img.is4_up = args[3]; img.is4_dn = img.src;
      if ((nbArr = document[grpName]) == null) nbArr = document[grpName] = new Array();
      nbArr[nbArr.length] = img;
      for (i=4; i < args.length-1; i+=2) if ((img = is4_findObj(args[i])) != null) {
        if (!img.is4_up) img.is4_up = img.src;
        img.src = img.is4_dn = args[i+1];
        nbArr[nbArr.length] = img;
    } }
  } else if (event == "over") {
    document.is4_nbOver = nbArr = new Array();
    for (i=1; i < args.length-1; i+=3) if ((img = is4_findObj(args[i])) != null) {
      if (!img.is4_up) img.is4_up = img.src;
      img.src = (img.is4_dn && args[i+2]) ? args[i+2] : args[i+1];
      nbArr[nbArr.length] = img;
    }
  } else if (event == "out" ) {
    for (i=0; i < document.is4_nbOver.length; i++) {
      img = document.is4_nbOver[i]; img.src = (img.is4_dn) ? img.is4_dn : img.is4_up; }
  } else if (event == "down") {
    if ((nbArr = document[grpName]) != null)
      for (i=0; i < nbArr.length; i++) { img=nbArr[i]; img.src = img.is4_up; img.is4_dn = 0; }
    document[grpName] = nbArr = new Array();
    for (i=2; i < args.length-1; i+=2) if ((img = is4_findObj(args[i])) != null) {
      if (!img.is4_up) img.is4_up = img.src;
      img.src = img.is4_dn = args[i+1];
      nbArr[nbArr.length] = img;
  } }
}
function is4_swapImgRestore() { //v3.0
  var i,x,a=document.is4_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function is4_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.is4_p) d.is4_p=new Array();
    var i,j=d.is4_p.length,a=is4_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.is4_p[j]=new Image; d.is4_p[j++].src=a[i];}}
}
function is4_swapImage() { //v3.0
  var i,j=0,x,a=is4_swapImage.arguments; document.is4_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=is4_findObj(a[i]))!=null){document.is4_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function is4_zeroPad(nr, length) {
  if (length >= 7 && (nr < 1000000)) { nr = "0" + nr; }
  if (length >= 6 && (nr <  100000)) { nr = "0" + nr; }
  if (length >= 5 && (nr <   10000)) { nr = "0" + nr; }
  if (length >= 4 && (nr <    1000)) { nr = "0" + nr; }
  if (length >= 3 && (nr <     100)) { nr = "0" + nr; }
  if (length >= 2 && (nr <      10)) { nr = "0" + nr; }
  return nr;
}

function is4_getDate(fmt) {
  var retVal = "";
  var curDate = new Date();
  var MONTHS_SHORT = new Array('Jan','Feb','Mar','Apr','Jun','Jul','Aug','Sep','Nov','Dec');
  var MONTHS_FULL  = new Array('Januari','Februari','Maart','April','Juni','Juli','Augustus','September','November','December');

  var day = curDate.getDate();
  var month = curDate.getMonth();
  var year = curDate.getYear();

  if (fmt == "" || typeof(fmt) == "undefined" ) { fmt = "%d-%b-%Y"; }

  retVal = fmt;
  retVal = retVal.replace(/%b/,MONTHS_SHORT[month]);
  retVal = retVal.replace(/%B/,""+MONTHS_FULL[month]+"");
  retVal = retVal.replace(/%m/,is4_zeroPad(month,2));
  retVal = retVal.replace(/%d/,is4_zeroPad(day,2));
  retVal = retVal.replace(/%y/,is4_zeroPad(year-100,2));
  retVal = retVal.replace(/%Y/,(year+1900));
  return retVal;
}


//
// Example: username=is4_getCookie('username');
//
function is4_getCookie(c_name)
{
  if (document.cookie.length>0)
  {
    c_start=document.cookie.indexOf(c_name + "=");
    if (c_start!=-1)
    { 
      c_start=c_start + c_name.length+1; 
      c_end=document.cookie.indexOf(";",c_start);
      if (c_end==-1) c_end=document.cookie.length;
      return unescape(document.cookie.substring(c_start,c_end));
    } 
  }
  return "";
}


//
// Example: is4_setCookie('username',username,365);
//
function is4_setCookie(c_name,value,expiredays,path)
{
  var exdate=new Date();
        if (!path) { path="/"; }
  exdate.setDate(exdate.getDate()+expiredays);
  document.cookie=c_name+ "=" +escape(value)+
    ((expiredays==null) ? "" : ";expires="+exdate.toGMTString())+
                "; path="+path ;
}


//
// Example:
//
function is4_addOnloadEvent(fnc){
    if ( typeof window.addEventListener != "undefined" ) {
        window.addEventListener( "load", fnc, false );
    } else if ( typeof window.attachEvent != "undefined" ) {
        window.attachEvent( "onload", fnc );
    } else {
        if ( window.onload != null ) {
            var oldOnload = window.onload;
            window.onload = function ( e ) {
                oldOnload( e );
                window[fnc]();
            };
        } else {
            window.onload = fnc;
        }
    }
}