<!-- 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);
}

// *** 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;
}

// *** OPTIONAL CODE FROM HERE DOWN ***

// These two lines handle the window resize bug in NS4. See <body onResize="...">.
// I recommend you leave this here as otherwise when you resize NS4's width menus are hidden.

var popOldWidth = window.innerWidth;
nsResizeHandler = new Function('if (popOldWidth != window.innerWidth) location.reload()');


var tabMenu = new Array();

// Hide timeout.
var tabPopTimer = new Array();
// Array showing highlighted menu items.
var tabLitNow = new Array();

function initMenus()
{
  for (var i=0; i<tabMenu.length; i++)
  {
    tabPopTimer[i] = 0;
    tabLitNow[i] = new Array();
    writeMenu(i);
  }
}

function popOver(indMenu, menuNum, itemNum)
{
  clearTimeout(tabPopTimer[indMenu]);
  hideAllBut(indMenu, menuNum);
  tabLitNow[indMenu] = getTree(indMenu, menuNum, itemNum);
  changeCol(indMenu, tabLitNow[indMenu], true);
  targetNum = tabMenu[indMenu][menuNum][itemNum].target;
  
  if (targetNum > 0)
  {
    thisX = parseInt(tabMenu[indMenu][menuNum][0].ref.left) + parseInt(tabMenu[indMenu][menuNum][itemNum].ref.left);
    thisY = parseInt(tabMenu[indMenu][menuNum][0].ref.top) + parseInt(tabMenu[indMenu][menuNum][itemNum].ref.top);
    
    with (tabMenu[indMenu][targetNum][0].ref)
    {
      left = parseInt(thisX + tabMenu[indMenu][targetNum][0].x);
      top = parseInt(thisY + tabMenu[indMenu][targetNum][0].y);
      visibility = 'visible';
    }
  }
}

function popOut(indMenu, menuNum, itemNum)
{
  if ((menuNum == 0) && !tabMenu[indMenu][menuNum][itemNum].target)
    hideAllBut(indMenu, 0);
  else
    tabPopTimer[indMenu] = setTimeout('hideAllBut(' + indMenu + ', 0)', 500);
}

function getTree(indMenu, 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(tabMenu[indMenu].length);
  
  while (1)
  {
    itemArray[menuNum] = itemNum;
    
    // If we've reached the top of the hierarchy, return.
    if (menuNum == 0)
      return (itemArray);
    
    itemNum = tabMenu[indMenu][menuNum][0].parentItem;
    menuNum = tabMenu[indMenu][menuNum][0].parentMenu;
  }
}

function changeCol(indMenu, changeArray, isOver)
{
  // Pass an array and a boolean to specify colour change, true = over colour.
  for (menuCount=0; menuCount<changeArray.length; menuCount++)
  {
    if (changeArray[menuCount])
    {
      newCol = isOver ? tabMenu[indMenu][menuCount][0].overCol : tabMenu[indMenu][menuCount][0].backCol;
      
      // Change the colours of the div/layer background.
      with (tabMenu[indMenu][menuCount][changeArray[menuCount]].ref)
      {
        if (isNS4)
          bgColor = newCol;
        else
          backgroundColor = newCol;
      }
    }
  }
}

function hideAllBut(indMenu, menuNum)
{
  var keepMenus = getTree(indMenu, menuNum, 1);
  
  for (count=0; count<tabMenu[indMenu].length; count++)
  {
    if (!keepMenus[count])
      tabMenu[indMenu][count][0].ref.visibility = 'hidden';
    
    changeCol(indMenu, tabLitNow[indMenu], false);
  }
}

function writeMenu(indMenu)
{
  if (!isDOM && !isIE4 && !isNS4)
    return;
  
  for (currMenu=0; currMenu<tabMenu[indMenu].length; currMenu++)
  {
    with (tabMenu[indMenu][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<tabMenu[indMenu][currMenu].length; currItem++)
      {
        with (tabMenu[indMenu][currMenu][currItem])
        {
          var itemID = 'menu' + indMenu + 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(' + indMenu + ',' + currMenu + ',' + currItem + ')" onMouseOut="popOut(' + indMenu + ',' + 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 + '" border="0" cellspacing="0" cellpadding="0"><tr><td align="left" height="' + (h-2) + '">' + '<a class="' + textClass + '" href="' + href + '"' + (frame ? ' target="' + frame + '">' : '>') + '<div style="position:relative;left:5px;top:0px">' + text + '</div></a></td>';
          
          if (target > 0)
          {
            // Set target's parents to this menu item.
            tabMenu[indMenu][target][0].parentMenu = currMenu;
            tabMenu[indMenu][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.left = 0;
        ref.top = 0;
        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' + indMenu + currMenu + 'div" ' + 'style="position: absolute; visibility: hidden">' + str + '</div>');
        ref = getSty('menu' + indMenu + 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<tabMenu[indMenu][currMenu].length; currItem++)
      {
        itemName = 'menu' + indMenu + currMenu + 'item' + currItem;
        
        if (isDOM || isIE4)
          tabMenu[indMenu][currMenu][currItem].ref = getSty(itemName);
        
        if (isNS4)
          tabMenu[indMenu][currMenu][currItem].ref = ref.document[itemName];
      }
    }
  }
  
  with (tabMenu[indMenu][0][0])
  {
    ref.left = x;
    ref.top = y;
    ref.visibility = 'visible';
  }
}

//  End -->
