/* CASCADING POPUP MENUS v5.1 - by Angus Turnbull - http://www.twinhelix.com */
var isDOM=document.getElementById?1:0;
var isIE=document.all?1:0;
var isNS4=navigator.appName=='Netscape'&&!isDOM?1:0;
var isIE4=isIE&&!isDOM?1:0;
var isOp=window.opera?1:0;
var isDyn=isDOM||isIE||isNS4;

function getRef(id, par)
{
 par=!par?document:(par.navigator?par.document:par);
 return (isIE ? par.all[id] :
  (isDOM ? (par.getElementById?par:par.ownerDocument).getElementById(id) :
  (isNS4 ? par.layers[id] : null)));
}

function getSty(id, par)
{
 var r=getRef(id, par);
 return r?(isNS4?r:r.style):null;
}
if (!window.LayerObj) var LayerObj = new Function('id', 'par',
 'this.ref=getRef(id, par); this.sty=getSty(id, par); return this');
function getLyr(id, par) { return new LayerObj(id, par) }

function LyrFn(fn, fc)
{
 LayerObj.prototype[fn] = new Function('var a=arguments,p=a[0],px=isNS4||isOp?0:"px"; ' +
  'with (this) { '+fc+' }');
}
LyrFn('x','if (!isNaN(p)) sty.left=p+px; else return parseInt(sty.left)');
LyrFn('y','if (!isNaN(p)) sty.top=p+px; else return parseInt(sty.top)');
LyrFn('vis','sty.visibility=p');
LyrFn('bgColor','if (isNS4) sty.bgColor=p?p:null; ' +
 'else sty.background=p?p:"transparent"');
LyrFn('bgImage','if (isNS4) sty.background.src=p?p:null; ' +
 'else sty.background=p?"url("+p+")":"transparent"');
LyrFn('clip','if (isNS4) with(sty.clip){left=a[0];top=a[1];right=a[2];bottom=a[3]} ' +
 'else sty.clip="rect("+a[1]+"px "+a[2]+"px "+a[3]+"px "+a[0]+"px)" ');
LyrFn('write','if (isNS4) with (ref.document){write(p);close()} else ref.innerHTML=p');
LyrFn('alpha','var f=ref.filters,d=(p==null); if (f) {' +
 'if (!d&&sty.filter.indexOf("alpha")==-1) sty.filter+=" alpha(opacity="+p+")"; ' +
 'else if (f.length&&f.alpha) with(f.alpha){if(d)enabled=false;else{opacity=p;enabled=true}} }' +
 'else if (isDOM) sty.MozOpacity=d?"":p+"%"');

function setLyr(lVis, docW, par)
{
 if (!setLyr.seq) setLyr.seq=0;
 if (!docW) docW=0;
 var obj = (!par ? (isNS4 ? window : document.body) :
  (!isNS4 && par.navigator ? par.document.body : par));
 var IA='insertAdjacentHTML', AC='appendChild', newID='_js_layer_'+setLyr.seq++;

 if (obj[IA]) obj[IA]('beforeEnd', '<div id="'+newID+'" style="position:absolute"></div>');
 else if (obj[AC])
 {
  var newL=document.createElement('div');
  obj[AC](newL); newL.id=newID; newL.style.position='absolute';
 }
 else if (isNS4)
 {
  var newL=new Layer(docW, obj);
  newID=newL.id;
 }

 var lObj=getLyr(newID, par);
 with (lObj) if (ref) { vis(lVis); x(0); y(0); sty.width=docW+(isNS4?0:'px') }
 return lObj;
}
var CSSmode=document.compatMode;
CSSmode=(CSSmode&&CSSmode.indexOf('CSS')!=-1)||isDOM&&!isIE||isOp?1:0;
if (!window.page) var page = { win: window, minW: 0, minH: 0, MS: isIE&&!isOp,
 db: CSSmode?'documentElement':'body' }
 
page.winW=function()
 { with (this) return Math.max(minW, MS?win.document[db].clientWidth:win.innerWidth-16) }
 
page.winH=function()
 { with (this) return Math.max(minH, MS?win.document[db].clientHeight:win.innerHeight) }
page.scrollX=function()
 { with (this) return MS?win.document[db].scrollLeft:win.pageXOffset }
page.scrollY=function()
 { with (this) return MS?win.document[db].scrollTop:win.pageYOffset }

// *** MOUSE EVENT CONTROL FUNCTIONS ***
function popOver(mN, iN) { with (this)
{
 clearTimeout(hideTimer);
 overM = mN;
 overI = iN;
 if (iN && this.onmouseover) onmouseover(mN, iN);
 litOld = litNow;
 litNow = new Array();
 var litM = mN, litI = iN;
 while(1)
 {
  litNow[litM] = litI;
  if (litM == 'root') break;
  litI = menu[litM][0].parentItem;
  litM = menu[litM][0].parentMenu;
 }
 var same = true;
 for (var z in menu) if (litNow[z] != litOld[z]) same = false;
 if (same) return;
 clearTimeout(showTimer);
 for (thisM in menu) with (menu[thisM][0])
 {
  if (!lyr) continue;
  litI = litNow[thisM];
  oldI = litOld[thisM];
  if (litI && (litI != oldI)) changeCol(thisM, litI, true);
  if (oldI && (oldI != litI)) changeCol(thisM, oldI, false);
  if (litI && !visNow && (thisM != 'root'))
  {
   showMenu(thisM);
   visNow = true;
  }
  if (isNaN(litI) && visNow)
  {
   hideMenu(thisM);
   visNow = false;
  }
 }
 nextMenu = '';
 if ((menu[mN][iN].type == 'sm:') && !menu[mN][0].subsOnClick)
 {
  var targ = menu[mN][iN].href, lyrM = menu[mN][0].lyr;
  var showStr = 'with ('+myName+') { menu.'+targ+'[0].visNow = true; ' +
   'position("'+targ+'"); showMenu("'+targ+'") }';
  nextMenu = targ;
  if (showDelay) showTimer = setTimeout(showStr, showDelay);
  else eval(showStr);
 }
}}

function popOut(mN, iN) { with (this)
{
 if ((mN != overM) || (iN != overI)) return;
 if (this.onmouseout) onmouseout(mN, iN);
 var thisI = menu[mN][iN];
 if (thisI.href != nextMenu)
 {
  clearTimeout(showTimer);
  nextMenu = '';
 }
 if (hideDelay)
 {
  var delay = ((mN == 'root') && (thisI.type != 'sm:')) ? 50 : hideDelay;
  hideTimer = setTimeout(myName + '.over("root", 0)', delay);
 }
 overM = 'root';
 overI = 0;
}}

function popClick(mN, iN) { with (this)
{
 // Evaluate the onclick event, if any.
 if (this.onclick) onclick(mN, iN);
 var thisI = menu[mN][iN], hideM = true;
 with (thisI) switch (type)
 {
  case 'sm:':
  {
   if (menu[overM][0].subsOnClick)
   {
    menu[href][0].visNow = true;
    position(href);
    showMenu(href);
    hideM = false;
   }
   break;
  }
  case 'js:': { eval(href); break }
  case '': type = 'window';
  default: if (href) eval(type + '.location.href = "' + href + '"');
 }
 if (hideM) over('root', 0);
}}

function popChangeCol(mN, iN, isOver) { with (this.menu[mN][iN])
{
 if (!lyr || !lyr.ref) return;
 var col = isOver?overCol:outCol;
 var bgFn = (col.indexOf('.')==-1) ? 'bgColor' : 'bgImage';
 if (isNS4) lyr[bgFn](col);
 if ((overClass != outClass) || (outBorder != overBorder)) with (lyr)
 {
  if (isNS4) write(this.getHTML(mN, iN, isOver));
  else
  {
   ref.className = (isOver ? overBorder : outBorder);
   var chl = (isDOM ? ref.childNodes : ref.children)
   if (chl) for (var i = 0; i < chl.length; i++) chl[i].className = isOver?overClass:outClass;
  }
 }
 if (!isNS4) lyr[bgFn](col);
 if (outAlpha != overAlpha) lyr.alpha(isOver ? overAlpha : outAlpha);
}}

function popPosition(posMN) { with (this)
{
 for (mN in menu)
 {
  if (posMN && (posMN != mN)) continue;
  with (menu[mN][0])
  {
   if (!lyr || !lyr.ref || !visNow) continue;
   var pM, pI, newX = eval(offX), newY = eval(offY);
   if (mN != 'root')
   {
    pM = menu[parentMenu];
    pI = pM[parentItem].lyr;
    if (!pI) continue;
   }
   var eP = eval(par);
   var pW = (eP && eP.navigator ? eP : window);
   with (pW.page) var sX=scrollX(), wX=sX+winW(), sY=scrollY(), wY=winH()+sY;
   wX = isNaN(wX)||!wX ? 9999 : wX;
   wY = isNaN(wY)||!wY ? 9999 : wY;
   if (pM && typeof(offX)=='number') newX = Math.max(sX,
    Math.min(newX+pM[0].lyr.x()+pI.x(), wX-menuW-(isIE?5:20)));
   if (pM && typeof(offY)=='number') newY = Math.max(sY,
    Math.min(newY+pM[0].lyr.y()+pI.y(), wY-menuH-(isIE?5:20)));
   lyr.x(newX);
   lyr.y(newY);
  }
 }
}}

// *** MENU OBJECT CONSTRUCTION FUNCTIONS ***
function addProps(obj, data, names, addNull)
{
 for (var i = 0; i < names.length; i++) if(i < data.length || addNull) obj[names[i]] = data[i];
}

function ItemStyle()
{
 var names = ['len', 'spacing', 'popInd', 'popPos', 'pad', 'outCol', 'overCol', 'outClass',
  'overClass', 'outBorder', 'overBorder', 'outAlpha', 'overAlpha', 'normCursor', 'nullCursor'];
 addProps(this, arguments, names, true);
}

function popStartMenu(mName) { with (this)
{
 if (!menu[mName]) { menu[mName] = new Array(); menu[mName][0] = new Object(); }
 actMenu = menu[mName];
 aM = actMenu[0];
 actMenu.length = 1;
 var names = ['isVert', 'isVert', 'offX','offY', 'width', 'itemSty', 'par',
  'parentMenu', 'parentItem', 'visNow', 'oncreate', 'subsOnClick'];
 addProps(aM, arguments, names, true);
 aM.extraHTML = '';
 aM.menuW = aM.menuH = 0;
 if (!aM.lyr) aM.lyr = null;
 if (mName == 'root') menu.root[0].oncreate = new Function('this.visNow=true; ' +
  myName + '.position("root"); this.lyr.vis("visible")');
}}

function popAddItem() { with (this) with (actMenu[0])
{
 var aI = actMenu[actMenu.length] = new Object();
 var names = ['text', 'href', 'type', 'itemSty', 'len', 'spacing', 'popInd', 'popPos',
  'pad', 'outCol', 'overCol', 'outClass', 'overClass', 'outBorder', 'overBorder',
  'outAlpha', 'overAlpha', 'normCursor', 'nullCursor',
  'iX', 'iY', 'iW', 'iH', 'lyr'];
 addProps(aI, arguments, names, true);
 var iSty = (arguments[3] ? arguments[3] : actMenu[0].itemSty);
 for (prop in iSty) if (aI[prop]+'' == 'undefined') aI[prop] = iSty[prop];
 if (aI.outBorder)
 {
  if (isNS4) aI.pad++;
 }
 aI.iW = (isVert ? width : aI.len);
 aI.iH = (isVert ? aI.len : width);
 var lastGap = (actMenu.length > 2) ? actMenu[actMenu.length - 2].spacing : 0;
 var spc = ((actMenu.length > 2) && aI.outBorder ? 1 : 0);
 if (isVert)
 {
  menuH += lastGap - spc;
  aI.iX = 0; aI.iY = menuH;
  menuW = width; menuH += aI.iH;
 }
 else
 {
  menuW += lastGap - spc;
  aI.iX = menuW; aI.iY = 0;
  menuW += aI.iW; menuH = width;
 }
 if (aI.outBorder && CSSmode)
 {
  aI.iW -= 2;
  aI.iH -= 2;
 }
}}

// *** MAIN MENU CREATION/UPDATE FUNCTIONS ***
function popGetHTML(mN, iN, isOver) { with (this)
{
 var itemStr = '';
 with (menu[mN][iN])
 {
  var textClass = (isOver ? overClass : outClass);
  if ((type == 'sm:') && popInd)
  {
   if (isNS4) itemStr += '<layer class="' + textClass + '" left="'+ ((popPos+iW)%iW) +
    '" top="' + pad + '" height="' + (iH-2*pad) + '">' + popInd + '</layer>';
   else itemStr += '<div class="' + textClass + '" style="position: absolute; left: ' +
    ((popPos+iW)%iW) + 'px; top: ' + pad + 'px; height: ' + (iH-2*pad) + 'px">' + popInd + '</div>';
  }
  if (isNS4) itemStr += (outBorder ? '<span class="' + (isOver?overBorder:outBorder) +
   '"><spacer type="block" width="' + (iW-8) + '" height="' + (iH-8) + '"></span>' : '') +
   '<layer left="' + pad + '" top="' + pad + '" width="' + (iW-2*pad) + '" height="' +
   (iH-2*pad) + '"><a class="' + textClass + '" href="#" ' +
   'onClick="return false" onMouseOver="status=\'\'; ' + myName + '.over(\'' + mN + '\',' +
   iN + '); return true">' + text + '</a></layer>';
  else itemStr += '<div class="' + textClass + '" style="position: absolute; left: ' + pad +
   'px; top: ' + pad + 'px; width: ' + (iW-2*pad) + 'px; height: ' + (iH-2*pad) + 'px">' +
   text + '</div>';
 }
 return itemStr;
}}

function popUpdate(docWrite, upMN) { with (this)
{
 if (!isDyn) return;
 for (mN in menu) with (menu[mN][0])
 {
  if (upMN && (upMN != mN)) continue;
  var str = '';
  for (var iN = 1; iN < menu[mN].length; iN++) with (menu[mN][iN])
  {
   var itemID = myName + '_' + mN + '_' + iN;
   var targM = menu[href];
   if (targM && (type == 'sm:'))
   {
    targM[0].parentMenu = mN;
    targM[0].parentItem = iN;
   }
   var isImg = (outCol.indexOf('.') != -1) ? true : false;
   if (!isIE && normCursor=='hand') normCursor = 'pointer';
   if (isDOM || isIE4)
   {
    str += '<div id="' + itemID + '" ' + (outBorder ? 'class="'+outBorder+'" ' : '') +
     'style="position: absolute; left: ' + iX + 'px; top: ' + iY + 'px; width: ' + iW +
     'px; height: ' + iH + 'px; z-index: 1000; background: ' + (isImg?'url('+outCol+')':outCol) +
     ((typeof(outAlpha)=='number') ? '; filter: alpha(opacity='+ outAlpha + '); -moz-opacity: ' +
      (outAlpha/100) : '') +
     '; cursor: ' + ((type!='sm:' && href) ? normCursor : nullCursor) + '" ';
   }
   else if (isNS4)
   {
    str += '<layer id="' + itemID + '" left="' + iX + '" top="' + iY + '" width="' +
     iW + '" height="' + iH + '" z-index="1000" ' +
     (outCol ? (isImg ? 'background="' : 'bgcolor="') + outCol + '" ' : '');
   }
   var evtMN = '(\'' + mN + '\',' + iN + ')"';
   str += 'onMouseOver="' + myName + '.over' + evtMN +
     ' onMouseOut="' + myName + '.out' + evtMN +
     ' onClick="' + myName + '.click' + evtMN + '>' +
     getHTML(mN, iN, false) + (isNS4 ? '</layer>' : '</div>');
  }
  var eP = eval(par);
  setTimeout(myName + '.setupRef(' + docWrite + ', "' + mN + '")', 50);
  var mVis = visNow ? 'visible' : 'hidden';
  if (docWrite)
  {
   var targFr = (eP && eP.navigator ? eP : window);
   targFr.document.write('<div id="' + myName + '_' + mN + '_Div" style="position: absolute; ' +
    'visibility: ' + mVis + '; left: 0px; top: 0px; width: ' + (menuW+2) + 'px; height: ' +
    (menuH+2) + 'px; z-index: 1000">' + str + extraHTML + '</div>');
  }
  else
  {
   if (!lyr || !lyr.ref) lyr = setLyr(mVis, menuW, eP);
   else if (isIE4) setTimeout(myName + '.menu.' + mN + '[0].lyr.sty.width=' + (menuW+2), 50);
   with (lyr) { sty.zIndex = 1000; write(str + extraHTML) }
  }
 }
}}

function popSetupRef(docWrite, mN) { with (this) with (menu[mN][0])
{
 if (docWrite || !lyr || !lyr.ref) lyr = getLyr(myName + '_' + mN + '_Div', eval(par));
 for (var i = 1; i < menu[mN].length; i++)
  menu[mN][i].lyr = getLyr(myName + '_' + mN + '_' + i, (isNS4?lyr.ref:eval(par)));
 if (menu[mN][0].oncreate) oncreate();
}}

// *** POPUP MENU MAIN OBJECT CONSTRUCTOR ***
function PopupMenu(myName)
{
 this.myName = myName;
 this.showTimer = 0;
 this.hideTimer = 0;
 this.showDelay = 0;
 this.hideDelay = 500;
 this.showMenu = '';
 this.menu =  new Array();
 this.litNow = new Array();
 this.litOld = new Array();
 this.overM = 'root';
 this.overI = 0;
 this.actMenu = null;
 this.over = popOver;
 this.out = popOut;
 this.changeCol = popChangeCol;
 this.position = popPosition;
 this.click = popClick;
 this.startMenu = popStartMenu;
 this.addItem = popAddItem;
 this.getHTML = popGetHTML;
 this.update = popUpdate;
 this.setupRef = popSetupRef;
 this.showMenu = new Function('mName', 'this.menu[mName][0].lyr.vis("visible")');
 this.hideMenu = new Function('mName', 'this.menu[mName][0].lyr.vis("hidden")');
}

// *** START EDITING HERE, READ THIS SECTION CAREFULLY! ***

// Before you start, make sure you've read the "Conditions Of Use" in this HTML document
// or on my site. Anyway, this menu script is split up into several sections. They are:
// (1) ITEMSTYLES - These define the colour and size of menu items. Required to run.
// (2) MENU DATA - These specify the text and links in the menu. Required to run.
// (3) MENU EFFECTS - Want to remove, or change borders, shadows and animation? Edit them here,
//     or you can delete this section entirely to remove extra effects.
// (4) EVENTS - Activate the menu(s), and choose creation mode (Dynamic / Fast) etc. I recommend
//     you read it, but you only really need to change it if you want multiple menus on one page,
//     or are trying to combine this with other JavaScripts. Required to run.
// (5) OPTIONAL CODE - Extra features like adding clicking to 'sm:' items or status messages on
//     mouseover. Animation/effects functions are here too. You can skip or delete this entirely.
// (6) FRAMESET README - If you're using a frameset, read this, it explains what you need to do.

// *** (1) ITEMSTYLES ***
// The (somewhat lengthy) syntax is:
// styleName = new ItemStyle(length of items, spacing after items, 'popout indicator HTML',
//  popout indicator position, padding of text within item, 'out background colour or image
//  filename', 'hover background colour or filename', 'out text stylesheet class', 'hover text class',
//  'out border stylesheet class', 'hover border class', out opacity percentage or null to make
//  it fully opaque, hover opacity percentage or null, 'CSS mouse cursor for normal items',
//  'CSS cursor for sm: and blank items');
//
// One thing that needs explaining is the popout indicator position -- you pass a positive
// integer to position it from the left of the item, and a negative integer to position it from
// the right edge of the item -- see the example code below if that doesn't make much sense.
// Pass an empty string '' as the over or out background for a transparent background.
// If you pass 'hand' as a cursor, the script automatically translates it to 'pointer' for NS6.
// All stylesheet text/border classes come from the <STYLE> tag in this document, you can change
// the font and border colours and styles used there.
//
// 'horizontal Bar' style: menu items that use this ItemStyle are 100px wide, have 0px gaps
// between them, no popout indicator (the ">" in some menus) or popout indicator position,
// 1px padding of the text within items, #112299 background colour, a hover colour of #ffd911,
// 'menuBarLoText' is the stylesheet class used for the normal menu text and 'menuBarHiText' when highlighted,
// no border styles, 'null' means fully opaque items (set them to numbers between 0 and 100 to
// enable semitranslucency), and the 'hand'/'default' cursors are used for linked/submenu items.

//Original EGA Website colors with orange highlight
//var hBar = new ItemStyle(100, 0, '', 0, 1, '#6677cc', '#ff6600', 'menuBarLoText', 'menuBarHiText', '', '', null, null, 'hand', 'hand');
var hBar = new ItemStyle(100, 0, '', 0, 1, '#112299', '#ffd911', 'menuBarLoText', 'menuBarHiText', '', '',
 null, null, 'pointer', 'pointer');
// The 'sub Menu' items: 22px high, 0px spacing, a 'right arrow' sign for a popout indicator
// (you may wish to use an image tag?), the popout indicator is positioned 20px from the right
// edge of the item, items have 3px padding, inner shadow colour-lo, inner shadow colour-hi, 'lowText' as the dimmed text
// class, 'highText' when it is moused over, and 'itemBorder' as the border stylesheet class.
// No opacity is used, and they have the same cursors as the above ItemStyle.
// Cursors can be set to; default, hand, crosshair, or ibeam.

var subM = new ItemStyle(22, 0, '&#9658;', -20, 3, '#e8ebff', '#6677cc', 'lowText', 'highText',  'itemBorder', 'itemBorder', null, null, 'hand', 'hand');
//var subM = new ItemStyle(22, 0, '&#9658;', -20, 3, '#eeeeee', '#6677cc', 'lowText', 'highText',  'itemBorder', 'itemBorder', null, null, 'hand', 'hand');
// 'subBlank' (not used here) is similar, but has an 'off' border the same colour as its background so it
// appears borderless when dim, and 1px spacing between items to show the hover border.
//var subBlank = new ItemStyle(22, 1, '&gt;', -15, 3, '#eeeeff', '#f66020', 'lowText', 'highText',
// 'itemBorderBlank', 'itemBorder', null, null, 'hand', 'hand');
// The 'button' style (not used here) also has 1px spacing to show up the fancy border, and it has
// different colours/text and less padding. They also have translucency set -- these items
// are 80% opaque when dim and 95% when highlighted. It uses the 'crosshair' cursor for items.
//var button = new ItemStyle(22, 1, '&gt;', -15, 2, '#ccccff', '#f66020', 'buttonText', 'buttonHover',
// 'buttonBorder', 'buttonBorderOver', 80, 95, 'hand', 'hand');  

// *** (2) MENU DATA ***
// Read this section VERY CAREFULLY, it explains how to arrange and tweak the menus themselves.
// To use this script you must create one or more PopupMenu() objects, that will contain all
// the menu data and settings used. This demo contains one, named 'pMenu', although you can
// have as many totally separate menus as you want on one page.
//
// Next we add menus and items to the object, using its startMenu() and addItem()
// commands. Each menu object MUST contain one menu named 'root', which is the first, always
// visible menu. The syntax of the startMenu() command is:
//
// startMenu('menu name', Vertical menu (true/false)?, left, top, width, default ItemStyle
//  for items in this menu, optional parent frame/window or layer in which this menu resides);
//
// In order, the parameters are: a name for the menu like 'root' or 'mFile', which you can use to
// refer to this menu from other menus, to pop it out.
//    Next, pass 'true' if you want this to be a vertical stacked menu or 'false' if you want this
// to be a horizontal menu bar. You can orientate each menu differently this way.
//   The Left and Top positions allow you to locate this menu either absolutely from the page or
// relative to menu item that pops it out. If you want to offset this menu from the item that pops
// it out, set the positions as NUMBERS, e.g. 130, 10 would put the upper-left corner of this menu
// 130px across and 10px down from the upper-left corner of the item that popped it out.
//   If you put '130', '10' as positions in QUOTES, you can position the menu from the upper-left
// corner of the whole page. These strings can also include formulae to centre or scroll the menu,
// examples are included later on. Note: the 'root' menu is always positioned from the page corner.
//    The 'width' depends on the orientation of the menu -- for vertical menus it's the width,
// for horizontal menus it is the height. Basically, it's the constant dimension for all the items.
//    The parent window or layer parameter is optional, if not specified the current window is
// used -- this example does not use frames. See the frameset example file if you're using them,
// they are strings that when evaluated return a reference, like 'window.top'.
//
// Once you have created a menu, you add items to that menu using the addItem() command.
// You must give it THREE compulsory parameters: 1) The HTML/text to display in the item. 2) The
// menuname/filename/URL the item activates. 3) The action type or target frame of that item.
// All other parameters are optional -- you can override the menu's default ItemStyle with the
// item's own, and optionally override that was well by specifying a list of parameters in the
// same order as an ItemStyle, to give each item its own dimensions / colours etc.
// See the example menu below for an example of these extras...
//
// addItem('Text', 'URL or menuname', 'action type', optional ItemStyle, length, spacing,
//  'popout indicator', popout indicator position, etc... in the same order as ItemStyles);
//
// The third parameter, 'action type', tells the script what to do with the second parameter.
// You can tell the script to load a file in the current window or a particular frame, tell it
// to pop out a menu, or tell it to run a JavaScript command. You do these like this:
//
// addItem('Text', 'file.html', ''); //blank means opens up 'file.html' in the current window.
// addItem('Text', 'file.html', 'parent.content');  //opens 'file.html' in a frame named 'content'.
// addItem('Text', 'menuName', 'sm:');  //pops out another submenu called 'menuName'.
// addItem('Text', 'alert("Hello")', 'js:');  //runs a JavaScript command when clicked.
//
// Also, this system means 'sm:' items aren't normally clickable. If you do want to add click or mouseover 
// actions to items, see the "Optional Code" section of the script below.
//
var pMenu = new PopupMenu('pMenu');
with (pMenu)
{
// *** MOVE OR CENTRE THE MENU HERE ***
// To centre it, or scroll with the window etc, just include a global variable or formula as one
// of the positions. This script includes my page object, which has several useful methods, namely
// 'page.winW()', 'page.winH()', 'page.scrollY()' and 'page.scrollX()'. These return the current
// dimensions of the visible window area and the scroll position of the window, which can be
// used to position menus however you want. 

// Next line CENTRES the menu.
 startMenu('root', false, 'page.winW()/2 - (pMenu.menu.root[0].menuW/2-40)', 151, 19, hBar); 
//startMenu('root', false, 10, 'page.scrollY()', 17, hBar); // Floats with window as you scroll.
//startMenu('root', false, 10, 0, 17, hBar, 'frameName'); // To create in subframe.

// The 'root' menu here is horizontal, positioned at (x = 7, y = 99), is 18px high, and by default
// items use the colours and dimensions in the 'hBar' ItemStyle defined above.


//startMenu('root', false, 87, 151, 18, hBar); //



// startMenu('root', false, 4, 81, 18, hBar);
// The text is 'Home', and this item pops out the 'mHome' submenu when moused over.
addItem('&nbsp;HOME', 'mHome', 'sm:', hBar, 76);
addItem('&nbsp;&nbsp;Generic Medicines', 'mGenerics', 'sm:', hBar, 140);
addItem('&nbsp;&nbsp;Biosimilar Medicines', 'mBiosimilars', 'sm:', hBar, 140  	);
addItem('&nbsp;Positions &amp; Documents', 'mPolicy', 'sm:', hBar, 160);
addItem('&nbsp;Facts &amp; Figures', 'mFacts', 'sm:', hBar, 124);
addItem('News Room', 'mPress', 'sm:', hBar, 96);
addItem('Conferences', 'mEvents', 'sm:', hBar, 112);
addItem('&nbsp;Links', 'mLinks', 'sm:', hBar, 62);

	startMenu('mHome', true, 5, 20, 100, subM);
		// Note how all the types are '', indicating these links open in the current frame.
		addItem('What\'s New?', '../../ega-whatsnew.htm', '');
		addItem('About the EGA', '../../ega-intro.htm', '');
		addItem('Contact Us', '../../ega-contact.htm', '');
		addItem('Search EGA Web', '../../htdig/common/search.html', '');
		addItem('The IGPA', '../../igpa.htm', '');

	startMenu('mGenerics', true, 5, 20, 125, subM);
		addItem('Basic Notions ', '../../gen-basics.htm', '');
		addItem('FAQ on Generics', '../../FAQ-generics.htm', '');
		addItem('EGA Fact Sheets', '../../ega-factshts.htm', '');
		addItem('Myths &amp; Realities', '../../ega-mythsrealities.htm', '');
		addItem('Science &amp; Generics', 'mGenScience', 'sm:');
		addItem('Affordability', 'mGenAfford', 'sm:');
		addItem('Intellectual Property', 'mGenIP', 'sm:');
		addItem('Glossary', '../../glossary.htm', '');
		addItem('Further Resources', '../../gen-resources.htm', '');
			startMenu('mGenScience', true, 125, 0, 140, subM);		
				addItem('Quality, Safety & Efficacy', '../../gen-quality.htm', '');
				addItem('Marketing Authorisation', '../../gen-authorisation.htm', '');
				addItem('Pharmacovigilance', '../../gen-vigilance.htm', '');
			startMenu('mGenAfford', true, 125, 0, 155, subM);		
				addItem('Healthcare Economics', '../../gen-economics.htm', '');
				addItem('The Economics of Generics', '../../gen-econgenerics.htm', '');
				addItem('Generics in Europe', '../../gen-geneurope.htm', '');
				addItem('Promoting Generics', '../../gen-promotion.htm', '');
				addItem('Competitiveness & Innovation', '../../gen-competitive.htm', '');
			startMenu('mGenIP', true, 125, 0, 150, subM);		
				addItem('Intellectual Property Rights', '../../gen-ipr.htm', '');
				addItem('Pharmaceutical Patents', '../../gen-phrmapatents.htm', '');
				addItem('Data Exclusivity', '../../gen-dataex.htm', '');
				addItem('\" Evergreening \"', '../../gen-evergrn.htm', '');


	startMenu('mBiosimilars', true, 5, 20, 145, subM);
//		addItem('Presentation', 'ega-biosimilars.htm', '');
		addItem('FAQ on Biosimilars', '../../FAQ-biosimilars.htm', '');
		addItem('EGA Positions', '../../bio-positions.htm', '');
		addItem('Articles &amp; Presentations', '../../bio-articles.htm', '');
		addItem('Legal &amp; Regulatory', '../../bio-regulatory.htm', '');
				
	startMenu('mPolicy', true, 5, 20, 140, subM);
		addItem('EGA Position Papers', '../../pol-positions.htm', '');		
		addItem('Science &amp; Regulatory', 'mScience', 'sm:');
		addItem('Intellectual Property', 'mIP', 'sm:');
		addItem('EU Pharma Review', '../../pol-pharmarev.htm', '');
		addItem('Current Issues', 'mLegprops', 'sm:');
			startMenu('mScience', true, 140, 7, 170, subM);
				addItem('Product Development', '../../pol-reg-prodev.htm', '');
				addItem('Marketing Authorisation', '../../pol-reg-mktauth.htm', '');
				addItem('Post-Authorisation Surveillance', '../../pol-reg-surveille.htm', '');
			startMenu('mIP', true, 140, 7, 135, subM);
				addItem('General IP Issues', '../../pol-ipgeneral.htm', '');
				addItem('TRIPS / DOHA', '../../pol-iptrips.htm', '');
				addItem('Patents', '../../pol-ippatents.htm', '');
				addItem('SPCs', '../../pol-ipspc.htm', '');
				addItem('Data Exclusivity', '../../pol-ipdataex.htm', '');
				addItem('Access to Medicines', '../../pol-ipaccess.htm', '');				
			startMenu('mLegprops', true, 140, 7, 150, subM);				
				addItem('EU Pharma Package', '../../pol-legislation.htm', '');
				addItem('&nbsp;&nbsp;&bull; Falsified Medicines', '../../pol-legislation.htm#false', '');
				addItem('&nbsp;&nbsp;&bull; Pharmacovigilance', '../../pol-legislation.htm#phv', '');
				addItem('&nbsp;&nbsp;&bull; Information to Patients', '../../pol-legislation.htm#info', '');
				addItem('EC Sectory Inquiry', '../../pol-inquiry.htm', '');
		
	startMenu('mFacts', true, 5, 20, 140, subM);
		addItem('Healthcare Economics', '../../fac-hcmarkets.htm', '');
		addItem('Pricing &amp; Reimbursement', '../../fac-pricing.htm', '');
		addItem('Industry Statistics', '../../fac-indstats.htm', '');

	startMenu('mPress', true, 5, 20, 100, subM);
		addItem('Press Releases', '../../pr-release.htm', '');
		addItem('Latest News', '../../pr-press.htm', '');	
		addItem('Publications', '../../pr-press.htm#pubs', '');			
		addItem('Media Kit', '../../pr-mediakit.htm', '');

	startMenu('mEvents', true, 5, 20, 105, subM);
		addItem('EGA Events', '../../ega-events.htm#EGA', '');
		addItem('IGPA Events', '../../ega-events.htm#IGPA', '');
		addItem('External Events', '../../ega-events.htm#External', '');
		addItem('Past Events', '../../ega-events.htm#Past', '');

	startMenu('mLinks', true, 5, 20, 150, subM);
		addItem('EGA Member Companies', '../../ega-links.htm#Companies', '');
		addItem('EGA Member Associations', '../../ega-links.htm#EGAassocs', '');
		addItem('IGPA Members', '../../ega-links.htm#IGPAassocs', '');
		addItem('Regulatory Bodies', '../../ega-links.htm#RegLinks', '');
		addItem('EU Institutions', '../../ega-links.htm#EU', '');
		addItem('International Organisations', '../../ega-links.htm#International', '');
		addItem('NGOs &amp; Other Entities', '../../ega-links.htm#NGOs', '');
		addItem('Publications & Studies ', '../../ega-links.htm#Publications', '');
		addItem('Market Research Cos.', '../../ega-links.htm#MktResearch', '');
			/*startMenu('mPeriodicals', true, -100, 0, 97, subM);
				addItem('General Press', '#', '');
				addItem('Pharma Press', '#', '');
				addItem('Scientific Journals', '#', '');*/
}
// *** (3) MENU EFFECTS AND ANIMATION ***
addMenuBorder(pMenu, window.subBlank,
 null, '#666666', 1, '#CCCCDD', 2);
addDropShadow(pMenu, window.subM,
 [40,"#333333",6,6,-4,-4], [40,"#666666",4,4,0,0]);
addDropShadow(pMenu, window.subBlank,
 [40,"#333333",6,6,-4,-4], [40,"#666666",4,4,0,0]);

// Un-comment the next section to add "drop-down" animation to the menus.
/*
if (!isOp && navigator.userAgent.indexOf('rv:0.')==-1)
{
 pMenu.showMenu = new Function('mN','menuAnim(this, mN, 10)');
 pMenu.hideMenu = new Function('mN','menuAnim(this, mN, -10)');
}
*/


// *** (4) EVENTS ***
if (!isNS4)
{
 pMenu.update(true);
}
else
{
 var popOldOL = window.onload;
 window.onload = function()
 {
  if (popOldOL) popOldOL();
  pMenu.update();
 }
}
var nsWinW = window.innerWidth, nsWinH = window.innerHeight, popOldOR = window.onresize;
window.onresize = function()
{
 if (popOldOR) popOldOR();
 if (isNS4 && (nsWinW!=innerWidth || nsWinH!=innerHeight)) history.go(0);
 pMenu.position();
}

window.onscroll = function()
{
 pMenu.position();
}
if (isNS4)
{
 document.captureEvents(Event.CLICK);
 document.onclick = function(evt)
 {
  with (pMenu) if (overI) click(overM, overI);
  return document.routeEvent(evt);
 }
}
if (!isIE || isOp)
{
 var nsPX=pageXOffset, nsPY=pageYOffset;
 setInterval('if (nsPX!=pageXOffset || nsPY!=pageYOffset) ' +
 '{ nsPX=pageXOffset; nsPY=pageYOffset; window.onscroll() }', 50);
}
// MOUSE EVENTS:
// If you want, you can assign functions to handle mouse events like mouse over/out/click.
// You'll want to use these for assigning click actions to 'sm:' items or status messages etc.
// 'with (this)' means use the properties of the menu object, and it's passed the current
// menu name (mN) and item number (iN) you can use to calculate the active item.
// To uncomment and activate, delete the /* and */ at the start and end.
pMenu.onclick = function(mN, iN) { with (this)
{
 // Do actions depending on the item that the mouse was over at the time of the click.
 // You may wish to use nested IFs or 'switch' statements etc. if you're familiar with JS.
 if (mN == 'root') {
/*  if (iN == 1) status = 'Congratulations, you\'ve mastered clicking!';*/
  // Click on second item in root menu will navigate to 'edit.html'. Copy and paste this for
  // each menu item to add click actions to 'sm:' (sub-menu) items...
  if (iN == 1) location.href = '../../index.htm';
  if (iN == 2) location.href = '../../ega-generics.htm';
  if (iN == 3) location.href = '../../ega-biosimilars.htm';
  if (iN == 4) location.href = '../../ega-policy.htm';
  if (iN == 5) location.href = '../../ega-facts.htm';
  if (iN == 6) location.href = '../../pr-press.htm';
  if (iN == 7) location.href = '../../ega-events.htm';
  if (iN == 8) location.href = '../../ega-links.htm';
 }
   if (mN == 'mPolicy') {
  if (iN == 2) location.href = '../../pol-sci_reg.htm';
  if (iN == 3) location.href = '../../pol-intprop.htm';
  if (iN == 5) location.href = '../../pol-legislation.htm';  
 }
  if (mN == 'mGenerics') {
  if (iN == 2) location.href = '../../gen-science.htm';
  if (iN == 3) location.href = '../../gen-affordability.htm';
  if (iN == 4) location.href = '../../gen-patents.htm';
  if (iN == 8) location.href = '../../gen-resources.htm';
 }

}}
// Set the status message to the URL if the 'action type' is nothing, and clear on mouseout.
pMenu.onmouseover = function(mN, iN) { with (this)
{
 // 
 // You can set what appears in the status line here. mN ==  ('subMenu_name')
 with (menu[mN][iN]) if (!type) status = href;
 if (mN == 'root') {
 if (iN == 1) status = 'Home of the European Generic medicines Association';
 if (iN == 2) status = 'A general Introduction to Generic Medicines';
 if (iN == 3) status = 'In-depth Information on Biosimilar Medicinal Products';
 if (iN == 4) status = 'Position Papers, Legislative Documents, Regulatory Guidelines & Scientific Articles';
 if (iN == 5) status = 'Facts & Figures on Generic Medicines and Healthcare'; 
 if (iN == 6) status = 'Press Releases and News Items';
 if (iN == 7) status = 'Up-coming Conferences and Events';  
 if (iN == 8) status = 'Links to External Sites of Interest'; 
}
if (mN == 'mHome') {
 if (iN == 1) status = 'Latest additions to the EGA website';
 if (iN == 2) status = 'All About the EGA';
 if (iN == 4) status = 'Where We Are and How to Contact Us'; 
 if (iN == 5) status = 'Search for Articles on the EGA Website';  
 if (iN == 6) status = 'The International Generic Pharmaceutical Alliance'; 
 }
 if (mN == 'mGenerics') {
 if (iN == 1) status = 'Basic Introduction to Generic Medicines';
 if (iN == 2) status = 'Frequently Asked Questions about Generics';
 if (iN == 3) status = 'Fundamental Facts about Generic Medicines';
 if (iN == 4) status = 'The Science of Generics';
 if (iN == 5) status = 'Affordability & Sustainable Healthcare';
 if (iN == 6) status = 'Patents and Generics';
 if (iN == 7) status = 'A glossary of terms and acronymns pertaining to pharmaceuticals';
 if (iN == 8) status = 'Additional Resources on Generic Medicines';
 }
	 if (mN == 'mGenScience') {
	 if (iN == 1) status = 'Quality, Safety & Efficacy of Generic Medicines';
	 if (iN == 2) status = 'Marketing Authorisation Procedures for Generic Medicines';
	 if (iN == 3) status = 'Pharmacovigilance or post-marketing safety monitoring';
	 }
	 if (mN == 'mGenAfford') {
	 if (iN == 1) status = 'The Economics of Sustainable Healthcare';
	 if (iN == 2) status = 'The Economic Benefits of Generic Medicines';
	 if (iN == 3) status = 'The Role of Generic Medicines in Europe';
 	 if (iN == 4) status = 'Promoting Wider Use of Generic Medicines';
	 if (iN == 5) status = 'Competitiveness and Innovation in the Pharmaceutical Industry';
	 }
	 if (mN == 'mGenIP') {
	 if (iN == 1) status = 'Basics of Intellectual Property Rights';
	 if (iN == 2) status = 'Ever Increasing Patent Protection on Pharmaceutical Products';
	 if (iN == 3) status = 'What is Data Exclusivity and How Does it Work?';
 	 if (iN == 4) status = 'Evergreening: Strategies to Prolong Patent Protection';

	 }
 if (mN == 'mBiosimilars') {
 if (iN == 1) status = 'Frequently Asked Questions about Biosimilar Medicines';
 if (iN == 2) status = 'EGA Postions and Policy Statements on Biosimilar Medicines';
 if (iN == 3) status = 'Scientific Articles and Presentations on Biosimilars Medicines';
 if (iN == 4) status = 'The EU Legal and Regulatory Framework for Biosimilars Medicines';
 }

if (mN == 'mPolicy') {
 if (iN == 1) status = 'EGA Position Papers and Policy Documents';
 if (iN == 2) status = 'Scientific & Regulatory Matters';
 if (iN == 3) status = 'Intellectual Property Issues';
 if (iN == 4) status = 'Results of the EU Review of Pharmaceutical Legislation';
 if (iN == 5) status = 'Current Legislative Proposals';
 }
  if (mN == 'mFacts') {
 if (iN == 1) status = 'Healthcare Economics Statistics';
 if (iN == 2) status = 'A Roundup of Pricing & Reimbursement Policies in Europe';
 if (iN == 3) status = 'The Generic Medicines Industry in Figures';
 if (iN == 4) status = 'Results of the EU Review of Pharmaceutical Legislation';
 if (iN == 5) status = 'Current Legislative Proposals';
 }
}}
pMenu.onmouseout = function() { status = '' }

// ANIMATION:
function menuAnim(menuObj, menuName, dir)
{
 var mD = menuObj.menu[menuName][0];
 if (!mD.timer) mD.timer = 0;
 if (!mD.counter) mD.counter = 0;
 with (mD)
 {
  clearTimeout(timer);
  if (!lyr || !lyr.ref) return;
  if (dir>0) lyr.vis('visible');
  lyr.sty.zIndex = 1001 + dir;
  lyr.clip(0, 0, menuW+2, (menuH+2)*Math.pow(Math.sin(Math.PI*counter/200),0.75) );
  if ((isDOM&&!isIE) && (counter>=100)) lyr.sty.clip='';
  counter += dir;
  if (counter>100) counter = 100;
  else if (counter<0) { counter = 0; lyr.vis('hidden') }
  else timer = setTimeout(menuObj.myName+'.'+(dir>0?'show':'hide')+'Menu("'+menuName+'")', 40);
 }
}
function menuFilterShow(menuObj, menuName, filterName)
{
 var mD = menuObj.menu[menuName][0];
 with (mD.lyr)
 {
  sty.filter = filterName;
  var f = ref.filters;
  if (f&&f.length&&f[0]) f[0].Apply();
  vis('visible');
  if (f&&f.length&&f[0]) f[0].Play();
 }
}
// BORDERS AND DROPSHADOWS:
function addMenuBorder(mObj, iS, alpha, bordCol, bordW, backCol, backW)
{
 for (var mN in mObj.menu)
 {
  var mR=mObj.menu[mN], dS='<div style="position:absolute; background:';
  if (mR[0].itemSty != iS) continue;
  for (var mI=1; mI<mR.length; mI++)
  {
   mR[mI].iX += bordW+backW;
   mR[mI].iY += bordW+backW;
  }
  mW = mR[0].menuW += 2*(bordW+backW);
  mH = mR[0].menuH += 2*(bordW+backW);
  if (isNS4) mR[0].extraHTML += '<layer bgcolor="'+bordCol+'" left="0" top="0" width="'+mW+
   '" height="'+mH+'" z-index="980"><layer bgcolor="'+backCol+'" left="'+bordW+'" top="'+
   bordW+'" width="'+(mW-2*bordW)+'" height="'+(mH-2*bordW)+'" z-index="990"></layer></layer>';
  else mR[0].extraHTML += dS+bordCol+'; left:0px; top:0px; width:'+mW+'px; height:'+mH+
   'px; z-index:980; '+(alpha!=null?'filter:alpha(opacity='+alpha+'); -moz-opacity:'+(alpha/100):'')+
   '">'+dS+backCol+'; left:'+bordW+'px; top:'+bordW+'px; width:'+(mW-2*bordW)+'px; height:'+
   (mH-2*bordW)+'px; z-index:990"></div></div>';
 }
}

function addDropShadow(mObj, iS)
{
 for (var mN in mObj.menu)
 {
  var a=arguments, mD=mObj.menu[mN][0], addW=addH=0;
  if (mD.itemSty != iS) continue;
  for (var shad=2; shad<a.length; shad++)
  {
   var s = a[shad];
   if (isNS4) mD.extraHTML += '<layer bgcolor="'+s[1]+'" left="'+s[2]+'" top="'+s[3]+'" width="'+
    (mD.menuW+s[4])+'" height="'+(mD.menuH+s[5])+'" z-index="'+(arguments.length-shad)+'"></layer>';
   else mD.extraHTML += '<div style="position:absolute; background:'+s[1]+'; left:'+s[2]+
    'px; top:'+s[3]+'px; width:'+(mD.menuW+s[4])+'px; height:'+(mD.menuH+s[5])+'px; z-index:'+
    (a.length-shad)+'; '+(s[0]!=null?'filter:alpha(opacity='+s[0]+'); -moz-opacity:'+(s[0]/100):'')+
    '"></div>';
   addW=Math.max(addW, s[2]+s[4]);
   addH=Math.max(addH, s[3]+s[5]);
  }
  mD.menuW+=addW; mD.menuH+=addH;
 }
}