var isDOM_GMM = (document.getElementById ? true : false); 
var isIE4_GMM = ((document.all && !isDOM_GMM) ? true : false);
var isNS4_GMM = (document.layers ? true : false);


function getRefGMM(id) {
if (isDOM_GMM) return document.getElementById(id);
if (isIE4_GMM) return document.all[id];
if (isNS4_GMM) return document.layers[id];
}
function getStyGMM(id) {
return (isNS4_GMM ? getRefGMM(id) : getRefGMM(id).style);
} 
// Hide timeout.
var popTimerGMM = 0;
// Array showing highlighted menuGMM items.
var litNowGMM = new Array();
function popOverGMM(menuGMMNum, itemNumGMM) {
clearTimeout(popTimerGMM);
hideAllButGMM(menuGMMNum);
litNowGMM = getTreeGMM(menuGMMNum, itemNumGMM);
changeColGMM(litNowGMM, true);
targetNum = menuGMM[menuGMMNum][itemNumGMM].target;
if (targetNum > 0) {
thisX = parseInt(menuGMM[menuGMMNum][0].ref.left) + parseInt(menuGMM[menuGMMNum][itemNumGMM].ref.left);
thisY = parseInt(menuGMM[menuGMMNum][0].ref.top) + parseInt(menuGMM[menuGMMNum][itemNumGMM].ref.top);
with (menuGMM[targetNum][0].ref) {
left = parseInt(thisX + menuGMM[targetNum][0].x);
top = parseInt(thisY + menuGMM[targetNum][0].y);
visibility = 'visible';
      }
   }
}
function popOutGMM(menuGMMNum, itemNumGMM) {
if ((menuGMMNum == 0) && !menuGMM[menuGMMNum][itemNumGMM].target)
hideAllButGMM(0)
else
popTimerGMM = setTimeout('hideAllButGMM(0)', 500);
}
function getTreeGMM(menuGMMNum, itemNumGMM) {

// 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(menuGMM.length);

while(1) {
itemArray[menuGMMNum] = itemNumGMM;
// If we've reached the top of the hierarchy, return.
if (menuGMMNum == 0) return itemArray;
itemNumGMM = menuGMM[menuGMMNum][0].parentItem;
menuGMMNum = menuGMM[menuGMMNum][0].parentMenu;
   }
}

// Pass an array and a boolean to specify colour change, true = over colour.
function changeColGMM(changeArray, isOver) {
for (menuCount = 0; menuCount < changeArray.length; menuCount++) {
if (changeArray[menuCount]) {
newCol = isOver ? menuGMM[menuCount][0].overCol : menuGMM[menuCount][0].backCol;
// Change the colours of the div/layer background.
with (menuGMM[menuCount][changeArray[menuCount]].ref) {
if (isNS4_GMM) bgColor = newCol;
else backgroundColor = newCol;
         }
      }
   }
}
function hideAllButGMM(menuGMMNum) {
var keepMenus = getTreeGMM(menuGMMNum, 1);
for (count = 0; count < menuGMM.length; count++)
if (!keepMenus[count])
menuGMM[count][0].ref.visibility = 'hidden';
changeColGMM(litNowGMM, false);
}

// *** MENU CONSTRUCTION FUNCTIONS ***

function MenuGMM(isVert, popInd, x, y, width, overCol, backCol, borderClass, textClass) {
// True or false - a vertical menuGMM?
this.isVert = isVert;
// The popout indicator used (if any) for this menuGMM.
this.popInd = popInd
// Position and size settings.
this.x = x;
this.y = y;
this.width = width;
// Colours of menuGMM 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 menuGMM and item numbers, indexed later.
this.parentMenu = null;
this.parentItem = null;
// Reference to the object's style properties (set later).
this.ref = null;
}

function ItemGMM(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 ModificaItemGMM(xquis,ys,target) {
menuGMM[xquis][ys].target = target;
}

function writeMenuGMMs() {
if (!isDOM_GMM && !isIE4_GMM && !isNS4_GMM) return;

for (currMenu = 0; currMenu < menuGMM.length; currMenu++) with (menuGMM[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 menuGMM object itself, above).
// Also use properties of each item nested in the other with() for construction.
for (currItem = 1; currItem < menuGMM[currMenu].length; currItem++) with (menuGMM[currMenu][currItem]) {
var itemID = 'menuG' + currMenu + 'itemG' + 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_GMM || isIE4_GMM) {
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_GMM) {
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="popOverGMM(' + currMenu + ',' + currItem + ')" onMouseOut="popOutGMM(' + 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) + '" height="20" cellspacing="0" cellpadding="0"><tr><td align="left" valign="top" height="' + (h - 7) + '">' + '<a  target="_self" href="' + href + '"' + (frame ?
' target="' + frame + '">' : '>') +'<font face="Verdana" color="#FFFFFF" size="1">'+ text + '</font></a></td>';
if (target > 0) {

// Set target's parents to this menu item.
menuGMM[target][0].parentMenu = currMenu;
menuGMM[target][0].parentItem = currItem;

// Add a popout indicator.
if (popInd) str += '<td color="#FFFFFF" class="' + textClass + '" align="right">' + popInd + '</td>';
}
str += '</tr></table>' + (isNS4_GMM ? '</layer>' : '</div>');
if (isVert) itemY += length + spacing;
else itemX += length + spacing;
}
if (isDOM_GMM) {
var newDiv = document.createElement('divG');
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_GMM) {
document.body.insertAdjacentHTML('beforeEnd', '<div id="menuG' + currMenu + 'divG" ' + 'style="position: absolute; visibility: hidden">' + str + '</div>');
ref = getStyGMM('menuG' + currMenu + 'divG');
}

// In NS4, create a reference to a new layer and write the items to it.
if (isNS4_GMM) {
ref = new Layer(0);
ref.document.write(str);
ref.document.close();
}

for (currItem = 1; currItem < menuGMM[currMenu].length; currItem++) {
itemName = 'menuG' + currMenu + 'itemG' + currItem;
if (isDOM_GMM || isIE4_GMM) menuGMM[currMenu][currItem].ref = getStyGMM(itemName);
if (isNS4_GMM) menuGMM[currMenu][currItem].ref = ref.document[itemName];
   }
}
with(menuGMM[0][0]) {
ref.left = x;
ref.top = y;
ref.visibility = 'visible';
   }
}