<!-- Original:  Angus Turnbull -->
<!-- Web Site:  http://gusnz.cjb.net -->

<!-- This script and many more are available free online at -->
<!-- The JavaScript Source!! http://javascript.internet.com -->

<!-- Begin
var isDOM = (document.getElementById ? true : false); 
var isIE4 = ((document.all && !isDOM) ? true : false);
var isNS4 = (document.layers ? true : false);
function getRef(id) {
if (isDOM) return document.getElementById(id);
if (isIE4) return document.all[id];
if (isNS4) return document.layers[id];
}
function getSty(id) {
return (isNS4 ? getRef(id) : getRef(id).style);
} 
// Hide timeout.
var popTimer = 0;
// Array showing highlighted menu items.
var litNow = new Array();
function popOver(menuNum, itemNum) {
clearTimeout(popTimer);
hideAllBut(menuNum);
litNow = getTree(menuNum, itemNum);
changeCol(litNow, true);
targetNum = menu[menuNum][itemNum].target;
if (targetNum > 0) {
thisX = parseInt(menu[menuNum][0].ref.left) + parseInt(menu[menuNum][itemNum].ref.left);
thisY = parseInt(menu[menuNum][0].ref.top) + parseInt(menu[menuNum][itemNum].ref.top);
with (menu[targetNum][0].ref) {
left = parseInt(thisX + menu[targetNum][0].x);
top = parseInt(thisY + menu[targetNum][0].y);
visibility = 'visible';
      }
   }
}
function popOut(menuNum, itemNum) {
if ((menuNum == 0) && !menu[menuNum][itemNum].target)
hideAllBut(0)
else
popTimer = setTimeout('hideAllBut(0)', 500);
}
function getTree(menuNum, itemNum) {

// Array index is the menu number. The contents are null (if that menu is not a parent)
// or the item number in that menu that is an ancestor (to light it up).
itemArray = new Array(menu.length);

while(1) {
itemArray[menuNum] = itemNum;
// If we've reached the top of the hierarchy, return.
if (menuNum == 0) return itemArray;
itemNum = menu[menuNum][0].parentItem;
menuNum = menu[menuNum][0].parentMenu;
   }
}

// Pass an array and a boolean to specify colour change, true = over colour.
function changeCol(changeArray, isOver) {
for (menuCount = 0; menuCount < changeArray.length; menuCount++) {
if (changeArray[menuCount]) {
newCol = isOver ? menu[menuCount][0].overCol : menu[menuCount][0].backCol;
// Change the colours of the div/layer background.
with (menu[menuCount][changeArray[menuCount]].ref) {
if (isNS4) bgColor = newCol;
else backgroundColor = newCol;
         }
      }
   }
}
function hideAllBut(menuNum) {
var keepMenus = getTree(menuNum, 1);
for (count = 0; count < menu.length; count++)
if (!keepMenus[count])
menu[count][0].ref.visibility = 'hidden';
changeCol(litNow, false);
}

// *** MENU CONSTRUCTION FUNCTIONS ***

function Menu(isVert, popInd, x, y, width, overCol, backCol, borderClass, textClass) {
// True or false - a vertical menu?
this.isVert = isVert;
// The popout indicator used (if any) for this menu.
this.popInd = popInd
// Position and size settings.
this.x = x;
this.y = y;
this.width = width;
// Colours of menu and items.
this.overCol = overCol;
this.backCol = backCol;
// The stylesheet class used for item borders and the text within items.
this.borderClass = borderClass;
this.textClass = textClass;
// Parent menu and item numbers, indexed later.
this.parentMenu = null;
this.parentItem = null;
// Reference to the object's style properties (set later).
this.ref = null;
}

function Item(text, href, frame, length, spacing, target) {
this.text = text;
this.href = href;
this.frame = frame;
this.length = length;
this.spacing = spacing;
this.target = target;
// Reference to the object's style properties (set later).
this.ref = null;
}

function writeMenus() {
if (!isDOM && !isIE4 && !isNS4) return;

for (currMenu = 0; currMenu < menu.length; currMenu++) with (menu[currMenu][0]) {
// Variable for holding HTML for items and positions of next item.
var str = '', itemX = 0, itemY = 0;

// Remember, items start from 1 in the array (0 is menu object itself, above).
// Also use properties of each item nested in the other with() for construction.
for (currItem = 1; currItem < menu[currMenu].length; currItem++) with (menu[currMenu][currItem]) {
var itemID = 'menu' + currMenu + 'item' + currItem;

// The width and height of the menu item - dependent on orientation!
var w = (isVert ? width : length);
var h = (isVert ? length : width);

// Create a div or layer text string with appropriate styles/properties.
// Thanks to Paul Maden (www.paulmaden.com) for helping debug this in IE4, apparently
// the width must be a miniumum of 3 for it to work in that browser.
if (isDOM || isIE4) {
str += '<div id="' + itemID + '" style="position: absolute; left: ' + itemX + '; top: ' + itemY + '; width: ' + w + '; height: ' + h + '; visibility: inherit; ';
if (backCol) str += 'background: ' + backCol + '; ';
str += '" ';
}
if (isNS4) {
str += '<layer id="' + itemID + '" left="' + itemX + '" top="' + itemY + '" width="' +  w + '" height="' + h + '" visibility="inherit" ';
if (backCol) str += 'bgcolor="' + backCol + '" ';
}
if (borderClass) str += 'class="' + borderClass + '" ';

// Add mouseover handlers and finish div/layer.
str += 'onMouseOver="popOver(' + currMenu + ',' + currItem + ')" onMouseOut="popOut(' + currMenu + ',' + currItem + ')">';

// Add contents of item (default: table with link inside).
// In IE/NS6+, add padding if there's a border to emulate NS4's layer padding.
// If a target frame is specified, also add that to the <a> tag.

str += '<table width="' + (w - 8) + '" border="0" cellspacing="0" cellpadding="' + (!isNS4 && borderClass ? 3 : 0) + '"><tr><td align="left" height="' + (h - 7) + '">' + '<a class="' + textClass + '" href="' + href + '"' + (frame ? ' target="' + frame + '">' : '>') + text + '</a></td>';
if (target > 0) {

// Set target's parents to this menu item.
menu[target][0].parentMenu = currMenu;
menu[target][0].parentItem = currItem;

// Add a popout indicator.
if (popInd) str += '<td class="' + textClass + '" align="right">' + popInd + '</td>';
}
str += '</tr></table>' + (isNS4 ? '</layer>' : '</div>');
if (isVert) itemY += length + spacing;
else itemX += length + spacing;
}
if (isDOM) {
var newDiv = document.createElement('div');
document.getElementsByTagName('body').item(0).appendChild(newDiv);
newDiv.innerHTML = str;
ref = newDiv.style;
ref.position = 'absolute';
ref.visibility = 'hidden';
}

// Insert a div tag to the end of the BODY with menu HTML in place for IE4.
if (isIE4) {
document.body.insertAdjacentHTML('beforeEnd', '<div id="menu' + currMenu + 'div" ' + 'style="position: absolute; visibility: hidden">' + str + '</div>');
ref = getSty('menu' + currMenu + 'div');
}

// In NS4, create a reference to a new layer and write the items to it.
if (isNS4) {
ref = new Layer(0);
ref.document.write(str);
ref.document.close();
}

for (currItem = 1; currItem < menu[currMenu].length; currItem++) {
itemName = 'menu' + currMenu + 'item' + currItem;
if (isDOM || isIE4) menu[currMenu][currItem].ref = getSty(itemName);
if (isNS4) menu[currMenu][currItem].ref = ref.document[itemName];
   }
}
with(menu[0][0]) {
ref.left = x;
ref.top = y;
ref.visibility = 'visible';
   }
}

var menu = new Array();

// Default colours passed to most menu constructors (just passed to functions, not
// a global variable - makes things easier to change later in bulk).
var defOver = '#FFFF00', defBack = '#00FF00';

// Default 'length' of menu items - item height if menu is vertical, width if horizontal.
// Submenuhoogte
var defLength = 22;

// Menu 0 is the special, 'root' menu from which everything else arises.
menu[0] = new Array();
menu[0][0] = new Menu(false, '', 10, 70, 17, '#00FF00', '#009900', '', 'itemText');
menu[0][1] = new Item('Algemeen  ', '', '', 65, 15, 1);
menu[0][2] = new Item('Berichten ', '', '', 70, 15, 2);
menu[0][3] = new Item('Intern    ', '', '', 55, 15, 3);
menu[0][4] = new Item('Blitz     ', '', '', 50, 15, 4);
menu[0][5] = new Item('Rapid     ', '', '', 50, 15, 5);
menu[0][6] = new Item('LiSB      ', '', '', 55, 15, 6);
menu[0][7] = new Item('Links     ', '', '', 50, 15, 7);
menu[0][8] = new Item('Heuvelland', '', '', 75, 15, 8);
menu[0][9] = new Item('Kroeglopen', '', '', 75, 15, 9);
menu[0][10]= new Item('Seizoen   ', '', '', 60, 15, 10);

// Algemeen menu
menu[1] = new Array();
menu[1][0] = new Menu(true, '', 0, 20, 90, defOver, defBack, 'itemBorder', 'itemText');
menu[1][1] = new Item('Bestuur    ', '/algemeen/bestuur.htm   ', '', defLength, 0, 0);
menu[1][2] = new Item('Clublokaal ', '/algemeen/clublokaal.htm', '', defLength, 0, 0);
menu[1][3] = new Item('Contact    ', '/algemeen/contact.htm   ', '', defLength, 0, 0);
menu[1][4] = new Item('Chescode   ', '/algemeen/chesscode.htm ', '', defLength, 0, 0);
menu[1][5] = new Item('Historie   ', '/algemeen/historie.htm  ', '', defLength, 0, 0);
menu[1][6] = new Item('Kampioenen ', '/algemeen/kampioenen.htm', '', defLength, 0, 0);
menu[1][7] = new Item('Materiaal  ', '/algemeen/materiaal.htm ', '', defLength, 0, 0);
menu[1][8] = new Item('Notatieform', '/algemeen/notatie.htm   ', '', defLength, 0, 0);

// Bericht menu
menu[2] = new Array();
menu[2][0] = new Menu(true, '', 0, 20, 280, defOver, defBack, 'itemBorder', 'itemText');
menu[2][1] = new Item('Agenda algemene ledenvergadering 2009     ', '/bericht.htm#b1 ', '', defLength, 0, 0);
menu[2][2] = new Item('2de team toch in 1ste klasse!             ', '/bericht.htm#b2 ', '', defLength, 0, 0);
menu[2][3] = new Item('Opstelling teams lisb-teams               ', '/bericht.htm#b3 ', '', defLength, 0, 0);
menu[2][4] = new Item('Verslag Team 2 ronde 1 door Frits         ', '/bericht.htm#b4 ', '', defLength, 0, 0);
menu[2][5] = new Item('Verslag Team 1 ronde 1 door Luc           ', '/bericht.htm#b5 ', '', defLength, 0, 0);
menu[2][6] = new Item('2 avonden verschoven naar Cadier en Keer  ', '/bericht.htm#b6 ', '', defLength, 0, 0);
menu[2][7] = new Item('Thema-avond in Cadier en Keer             ', '/bericht.htm#b7 ', '', defLength, 0, 0);
menu[2][8] = new Item('Schaken in de Molt                        ', '/bericht.htm#b8 ', '', defLength, 0, 0);
menu[2][9] = new Item('Weekend Malmedy: 18-20 deelnemers         ', '/bericht.htm#b9 ', '', defLength, 0, 0);
menu[2][10]= new Item('Fotos weekend in Malmedy                  ', '/bericht.htm#b10', '', defLength, 0, 0);
menu[2][11]= new Item('Rapid r1: Team 3 eindigt 3de in Bunde     ', '/bericht.htm#b11', '', defLength, 0, 0);
menu[2][12]= new Item('Rapid r1: Team 1 eindigt 2de in Maastricht', '/bericht.htm#b12', '', defLength, 0, 0);
menu[2][13]= new Item('Rapid ronde 1: Team 2 eindigt 4de in Stein', '/bericht.htm#b13', '', defLength, 0, 0);
menu[2][14]= new Item('Aanmeldingen Koninginnedagtoernooi Eijsden', '/bericht.htm#b14', '', defLength, 0, 0);
menu[2][15]= new Item('Verslag Kroegloperstoernooi te Amsterdam  ', '/bericht.htm#b15', '', defLength, 0, 0);
menu[2][16]= new Item('Programma zomertour                       ', '/bericht.htm#b16', '', defLength, 0, 0);

// Intern menu
menu[3] = new Array();
menu[3][0] = new Menu(true, '', 0, 20, 70, defOver, defBack, 'itemBorder', 'itemText');
menu[3][1] = new Item('Agenda   ', '/intern/agenda.htm   ', '', defLength, 0, 0);
menu[3][2] = new Item('Systeem  ', '/intern/systeem.htm  ', '', defLength, 0, 0);
menu[3][3] = new Item('Cyclus 1 ', '/intern/cyclus1.htm  ', '', defLength, 0, 0);
menu[3][4] = new Item('Cyclus 2 ', '/intern/cyclus2.htm  ', '', defLength, 0, 0);
menu[3][5] = new Item('Eindstand', '/intern/eindstand.htm', '', defLength, 0, 0);
menu[3][6] = new Item('Ratings  ', '/intern/ratings.htm  ', '', defLength, 0, 0);

// Blitz menu
menu[4] = new Array();
menu[4][0] = new Menu(true, '', 0, 20, 80, defOver, defBack, 'itemBorder', 'itemText');
menu[4][1] = new Item('Systeem  ', '/blitz/systeem.htm  ', '', defLength, 0, 0);
menu[4][2] = new Item('Cyclus 1 ', '/blitz/cyclus1.htm  ', '', defLength, 0, 0);
menu[4][3] = new Item('Cyclus 2 ', '/blitz/cyclus2.htm  ', '', defLength, 0, 0);
menu[4][4] = new Item('Cyclus 3 ', '/blitz/cyclus3.htm  ', '', defLength, 0, 0);
menu[4][5] = new Item('Cyclus 4 ', '/blitz/cyclus4.htm  ', '', defLength, 0, 0);
menu[4][6] = new Item('Cyclus 5 ', '/blitz/cyclus5.htm  ', '', defLength, 0, 0);
menu[4][7] = new Item('Eindstand', '/blitz/eindstand.htm', '', defLength, 0, 0);
menu[4][8] = new Item('Ratings  ', '/blitz/ratings.htm  ', '', defLength, 0, 0);

// Rapid menu
menu[5] = new Array();
menu[5][0] = new Menu(true, '', 0, 20, 70, defOver, defBack, 'itemBorder', 'itemText');
menu[5][1] = new Item('Systeem  ', '/rapid/systeem.htm  ', '', defLength, 0, 0);
menu[5][2] = new Item('Voorronde', '/rapid/voorronde.htm', '', defLength, 0, 0);
menu[5][3] = new Item('Finale   ', '/rapid/finale.htm   ', '', defLength, 0, 0);
menu[5][4] = new Item('Ratings  ', '/rapid/ratings.htm  ', '', defLength, 0, 0);

// Extern menu
//menu[6] = new Array();
//menu[6][0] = new Menu(true, '', 0, 20, 70, defOver, defBack, 'itemBorder', 'itemText');
//menu[6][1] = new Item('Agenda     ', '/extern/agenda.htm  ', '', defLength, 0, 0);
//menu[6][2] = new Item('Systeem    ', '/doc/reglementen.pdf', '', defLength, 0, 0);
//menu[6][3] = new Item('Teams      ', '/extern/teams.htm   ', '', defLength, 0, 0);
//menu[6][4] = new Item('Team 1 (PK)', '/extern/team1.htm   ', '', defLength, 0, 0);
//menu[6][5] = new Item('Team 2 (1A)', '/extern/team2.htm   ', '', defLength, 0, 0);
//menu[6][5] = new Item('Rapidbeker ', '/extern/rapid.htm   ', '', defLength, 0, 0);
//menu[6][6] = new Item('Ratings    ', '/extern/ratings.htm ', '', defLength, 0, 0);

// LiSB menu
menu[6] = new Array();
menu[6][0] = new Menu(true, '', 0, 20, 90, defOver, defBack, 'itemBorder', 'itemText');
menu[6][1] = new Item('Bondskompet ', 'http://www.lisb.nl/bcomp/2009-2010',                                                     '', defLength, 0, 0);
menu[6][2] = new Item('Rapidkompet ', 'http://80.69.87.162/~lisb/new/index.php?option=com_content&task=view&id=312&Itemid=356', '', defLength, 0, 0);
menu[6][3] = new Item('Bondsorgaan ', 'http://80.69.87.162/~lisb/new/index.php?option=com_content&task=view&id=44&Itemid=152',  '', defLength, 0, 0);
menu[6][4] = new Item('Verenigingen', 'http://80.69.87.162/~lisb/new/index.php?option=com_wrapper&Itemid=161',                  '', defLength, 0, 0);
menu[6][5] = new Item('Kalender    ', 'http://80.69.87.162/~lisb/new/index.php?option=com_content&task=view&id=316&Itemid=360', '', defLength, 0, 0);
menu[6][6] = new Item('Reglementen ', 'http://80.69.87.162/~lisb/new/index.php?option=com_content&task=view&id=12&Itemid=35',   '', defLength, 0, 0);
menu[6][7] = new Item('KNSB-Ratings', 'http://xaa.dohd.org/rating/clubs.php?club=1906&listid=57',                               '', defLength, 0, 0);

// Links menu
menu[7] = new Array();
menu[7][0] = new Menu(true, '', 0, 20, 90, defOver, defBack, 'itemBorder', 'itemText');
menu[7][1] = new Item('LiSB         ', 'http://www.lisb.nl/                       ', '', defLength, 0, 0);
menu[7][2] = new Item('KNSB         ', 'http://www.schaakbond.nl/                 ', '', defLength, 0, 0);
menu[7][3] = new Item('ASVB         ', 'http://www.asvb.de/db/db_tabelle.phtml?view_klasse=4', '', defLength, 0, 0);
menu[7][4] = new Item('KBSB-FRBE    ', 'http://www.frbe-kbsb.be/index.php         ', '', defLength, 0, 0);
menu[7][5] = new Item('FIDE         ', 'http://www.fide.com/                      ', '', defLength, 0, 0);
menu[7][6] = new Item('Geilenkirchen', 'http://www.schachfreunde-geilenkirchen.de/', '', defLength, 0, 0);
menu[7][7] = new Item('KNSB-Ratings ', 'http://xaa.dohd.org/rating/index.php      ', '', defLength, 0, 0);
menu[7][8] = new Item('Sevilla      ', 'http://www.jbfsoftware.com/               ', '', defLength, 0, 0);
menu[7][9] = new Item('Schakersinfo ', 'http://www.schakers.info/                 ', '', defLength, 0, 0);
menu[7][10]= new Item('Chessvibes   ', 'http://www.chessvibes.com/                ', '', defLength, 0, 0);
menu[7][11]= new Item('ChessBase    ', 'http://chessbase.com/                     ', '', defLength, 0, 0);
menu[7][12]= new Item('FICS         ', 'http://www.freechess.org/                 ', '', defLength, 0, 0);

// Heuvelland menu
menu[8] = new Array();
menu[8][0] = new Menu(true, '', 0, 20, 100, defOver, defBack, 'itemBorder', 'itemText');
menu[8][1] = new Item('Uitnodiging', '/heuvelland/uitnodiging.htm', '', defLength, 0, 0);
menu[8][2] = new Item('Speelschema', '/heuvelland/speelschema.htm', '', defLength, 0, 0);
menu[8][3] = new Item('Eindstand  ', '/heuvelland/eindstand.htm  ', '', defLength, 0, 0);
menu[8][4] = new Item('Verslag    ', '/heuvelland/verslag.htm    ', '', defLength, 0, 0);
menu[8][5] = new Item('Fotos      ', '/heuvelland/fotos.htm      ', '', defLength, 0, 0);

// Kroeglopen menu
menu[9] = new Array();
menu[9][0] = new Menu(true, '', 0, 20, 100, defOver, defBack, 'itemBorder', 'itemText');
menu[9][1] = new Item('Organisatie', '/kroeglopen/organisatie.htm', '', defLength, 0, 0);
menu[9][2] = new Item('Aanmelden  ', '/kroeglopen/aanmelden.htm  ', '', defLength, 0, 0);
menu[9][3] = new Item('Lokatie    ', '/kroeglopen/lokatie.htm    ', '', defLength, 0, 0);
menu[9][4] = new Item('Systeem    ', '/kroeglopen/systeem.htm    ', '', defLength, 0, 0);
menu[9][5] = new Item('Deelnemers ', '/kroeglopen/deelnemers.htm ', '', defLength, 0, 0);
menu[9][6] = new Item('Speelschema', '/kroeglopen/speelschema.htm', '', defLength, 0, 0);
menu[9][7] = new Item('Eindstand  ', '/kroeglopen/eindstand.htm  ', '', defLength, 0, 0);
menu[9][8] = new Item('Verslag    ', '/kroeglopen/verslag.htm    ', '', defLength, 0, 0);
menu[9][9] = new Item('Fotos      ', '/kroeglopen/fotos.htm      ', '', defLength, 0, 0);

// Seizoen menu
menu[10] = new Array();
menu[10][0] = new Menu(true, '', 0, 20, 80, defOver, defBack, 'itemBorder', 'itemText');
menu[10][1] = new Item('2008/2009', 'http://2008-2009.dejuistez.nl/index.htm', '', defLength, 0, 0);
menu[10][2] = new Item('2007/2008', 'http://2007-2008.dejuistez.nl/index.htm', '', defLength, 0, 0);
menu[10][3] = new Item('2006/2007', 'http://2006-2007.dejuistez.nl/index.htm', '', defLength, 0, 0);
menu[10][4] = new Item('2005/2006', 'http://2005-2006.dejuistez.nl/index.htm', '', defLength, 0, 0);
menu[10][5] = new Item('2004/2005', 'http://2004-2005.dejuistez.nl/index.htm', '', defLength, 0, 0);
menu[10][6] = new Item('2003/2004', 'http://2003-2004.dejuistez.nl/index.htm', '', defLength, 0, 0);
menu[10][7] = new Item('2002/2003', 'http://2002-2003.dejuistez.nl/index.htm', '', defLength, 0, 0);
menu[10][8] = new Item('1990/2002', 'http://1990-2002.dejuistez.nl/index.htm', '', defLength, 0, 0);


var popOldWidth = window.innerWidth;
nsResizeHandler = new Function('if (popOldWidth != window.innerWidth) location.reload()');

if (isNS4) document.captureEvents(Event.CLICK);
document.onclick = clickHandle;

function clickHandle(evt)
{
 if (isNS4) document.routeEvent(evt);
 hideAllBut(0);
}


function moveRoot()
{
 with(menu[0][0].ref) left = ((parseInt(left) < 100) ? 100 : 5);
}
//  End -->