// global collection containing all menus on current page
var A_MENUS = [];
 
// --------------------------------------------------------------------------------
// menu class
function menu (a_items, a_tpl) {
 
 // browser check
 if (!document.body || !document.body.style)
  return;
 
 // store items structure
 this.a_config = a_items;
 
 // store template structure
 this.a_tpl = a_tpl;
 
 // get menu id
 this.n_id = A_MENUS.length;
 
 // declare collections
 this.a_index = [];
 this.a_children = [];
 
 // assigh methods and event handlers
 this.expand      = menu_expand;
 this.collapse    = menu_collapse;
 
 this.onclick     = menu_onclick;
 this.onmouseout  = menu_onmouseout;
 this.onmouseover = menu_onmouseover;
 this.onmousedown = menu_onmousedown;
 
 // default level scope description structure 
 this.a_tpl_def = {
  'block_top'  : 16,
  'block_left' : 16,
  'top'        : 20,
  'left'       : 4,
  'width'      : 120,
  'height'     : 22,
  'hide_delay' : 0,
  'expd_delay' : 0,
  'css'        : {
   'inner' : '',
   'outer' : ''
  }
 };
 
 // assign methods and properties required to imulate parent item
 this.getprop = function (s_key) {
  return this.a_tpl_def[s_key];
 };
 
 this.o_root = this;
 this.n_depth = -1;
 this.n_x = 0;
 this.n_y = 0;
 
 //  init items recursively
 for (n_order = 0; n_order < a_items.length; n_order++)
  new menu_item(this, n_order);
 
 // register self in global collection
 A_MENUS[this.n_id] = this;
 
 // make root level visible
 for (var n_order = 0; n_order < this.a_children.length; n_order++)
  this.a_children[n_order].e_oelement.style.visibility = 'visible';
}
 
// --------------------------------------------------------------------------------
function menu_collapse (n_id) {
 // cancel item open delay
 clearTimeout(this.o_showtimer);
 
 // by default collapse to root level
 var n_tolevel = (n_id ? this.a_index[n_id].n_depth : 0);
 
 // hide all items over the level specified
 for (n_id = 0; n_id < this.a_index.length; n_id++) {
  var o_curritem = this.a_index[n_id];
  if (o_curritem.n_depth > n_tolevel && o_curritem.b_visible) {
   o_curritem.e_oelement.style.visibility = 'hidden';
   o_curritem.b_visible = false;
  }
 }
 
 // reset current item if mouse has gone out of items
 if (!n_id)
  this.o_current = null;
}
 
// --------------------------------------------------------------------------------
function menu_expand (n_id) {
 
 // expand only when mouse is over some menu item
 if (this.o_hidetimer)
  return;
 
 // lookup current item
 var o_item = this.a_index[n_id];
 
 // close previously opened items
 if (this.o_current && this.o_current.n_depth >= o_item.n_depth)
  this.collapse(o_item.n_id);
 this.o_current = o_item;
 
 // exit if there are no children to open
 if (!o_item.a_children)
  return;
 
 // show direct child items
 for (var n_order = 0; n_order < o_item.a_children.length; n_order++) {
  var o_curritem = o_item.a_children[n_order];
  o_curritem.e_oelement.style.visibility = 'visible';
  o_curritem.b_visible = true;
 }
}
 
// --------------------------------------------------------------------------------
//
// --------------------------------------------------------------------------------
function menu_onclick (n_id) {
 // don't go anywhere if item has no link defined
 return Boolean(this.a_index[n_id].a_config[1]);
}
 
// --------------------------------------------------------------------------------
function menu_onmouseout (n_id) {
 
 // lookup new item's object 
 var o_item = this.a_index[n_id];
 
 // apply rollout
 o_item.e_oelement.className = o_item.getstyle(0, 0);
 o_item.e_ielement.className = o_item.getstyle(1, 0);
 
 // update status line 
 o_item.upstatus(7);
 
 // run mouseover timer
 this.o_hidetimer = setTimeout('A_MENUS['+ this.n_id +'].collapse();',
  o_item.getprop('hide_delay'));
}
 
// --------------------------------------------------------------------------------
function menu_onmouseover (n_id) {
 
 // cancel mouseoute menu close and item open delay
 clearTimeout(this.o_hidetimer);
 this.o_hidetimer = null;
 clearTimeout(this.o_showtimer);
 
 // lookup new item's object 
 var o_item = this.a_index[n_id];
 
 // update status line 
 o_item.upstatus();
 
 // apply rollover
 o_item.e_oelement.className = o_item.getstyle(0, 1);
 o_item.e_ielement.className = o_item.getstyle(1, 1);
 
 // if onclick open is set then no more actions required
 if (o_item.getprop('expd_delay') < 0)
  return;
 
 // run expand timer
 this.o_showtimer = setTimeout('A_MENUS['+ this.n_id +'].expand(' + n_id + ');',
  o_item.getprop('expd_delay'));
 
}
 
// --------------------------------------------------------------------------------
// called when mouse button is pressed on menu item
// --------------------------------------------------------------------------------
function menu_onmousedown (n_id) {
 
 // lookup new item's object 
 var o_item = this.a_index[n_id];
 
 // apply mouse down style
 o_item.e_oelement.className = o_item.getstyle(0, 2);
 o_item.e_ielement.className = o_item.getstyle(1, 2);
 
 this.expand(n_id);
// this.items[id].switch_style('onmousedown');
}
 

// --------------------------------------------------------------------------------
// menu item Class
function menu_item (o_parent, n_order) {
 
 // store parameters passed to the constructor
 this.n_depth  = o_parent.n_depth + 1;
 this.a_config = o_parent.a_config[n_order + (this.n_depth ? 3 : 0)];
 
 // return if required parameters are missing
 if (!this.a_config) return;
 
 // store info from parent item
 this.o_root    = o_parent.o_root;
 this.o_parent  = o_parent;
 this.n_order   = n_order;
 
 // register in global and parent's collections
 this.n_id = this.o_root.a_index.length;
 this.o_root.a_index[this.n_id] = this;
 o_parent.a_children[n_order] = this;
 
 // calculate item's coordinates
 var o_root = this.o_root,
  a_tpl  = this.o_root.a_tpl;
 
 // assign methods
 this.getprop  = mitem_getprop;
 this.getstyle = mitem_getstyle;
 this.upstatus = mitem_upstatus;
 
 this.n_x = n_order
  ? o_parent.a_children[n_order - 1].n_x + this.getprop('left')
  : o_parent.n_x + this.getprop('block_left');
 
 this.n_y = n_order
  ? o_parent.a_children[n_order - 1].n_y + this.getprop('top')
  : o_parent.n_y + this.getprop('block_top');
 
 // generate item's HMTL
 document.write (
  '<a id="e' + o_root.n_id + '_'
   + this.n_id +'o" class="' + this.getstyle(0, 0) + '" href="' + this.a_config[1] + '"'
   + (this.a_config[2] && this.a_config[2]['tw'] ? ' target="'
   + this.a_config[2]['tw'] + '"' : '')
   + (this.a_config[2] && this.a_config[2]['tt'] ? ' title="'
   + this.a_config[2]['tt'] + '"' : '') + ' style="position: absolute; top: '
   + this.n_y + 'px; left: ' + this.n_x + 'px; width: '
   + this.getprop('width') + 'px; height: '
   + this.getprop('height') + 'px; visibility: hidden;'
   +' z-index: ' + this.n_depth + ';" '
   + 'onclick="return A_MENUS[' + o_root.n_id + '].onclick('
   + this.n_id + ');" onmouseout="A_MENUS[' + o_root.n_id + '].onmouseout('
   + this.n_id + ');" onmouseover="A_MENUS[' + o_root.n_id + '].onmouseover('
   + this.n_id + ');" onmousedown="A_MENUS[' + o_root.n_id + '].onmousedown('
   + this.n_id + ');"><div  id="e' + o_root.n_id + '_'
   + this.n_id +'i" class="' + this.getstyle(1, 0) + '">'
   + this.a_config[0] + "</div></a>\n"
  );
 this.e_ielement = document.getElementById('e' + o_root.n_id + '_' + this.n_id + 'i');
 this.e_oelement = document.getElementById('e' + o_root.n_id + '_' + this.n_id + 'o');
 
 this.b_visible = !this.n_depth;
 
 // no more initialization if leaf
 if (this.a_config.length < 4)
  return;
 
 // node specific methods and properties
 this.a_children = [];
 
 // init downline recursively
 for (var n_order = 0; n_order < this.a_config.length - 3; n_order++)
  new menu_item(this, n_order);
}
 
// --------------------------------------------------------------------------------
// reads property from template file, inherits from parent level if not found
// ------------------------------------------------------------------------------------------
function mitem_getprop (s_key) {
 
 // check if value is defined for current level
 var s_value = null,
  a_level = this.o_root.a_tpl[this.n_depth];
 
 // return value if explicitly defined
 if (a_level)
  s_value = a_level[s_key];
 
 // request recursively from parent levels if not defined
 return (s_value == null ? this.o_parent.getprop(s_key) : s_value);
}
// --------------------------------------------------------------------------------
// reads property from template file, inherits from parent level if not found
// ------------------------------------------------------------------------------------------
function mitem_getstyle (n_pos, n_state) {
 
 var a_css = this.getprop('css');
 var a_oclass = a_css[n_pos ? 'inner' : 'outer'];
 
 // same class for all states 
 if (typeof(a_oclass) == 'string')
  return a_oclass;
 
 // inherit class from previous state if not explicitly defined
 for (var n_currst = n_state; n_currst >= 0; n_currst--)
  if (a_oclass[n_currst])
   return a_oclass[n_currst];
}
 
// ------------------------------------------------------------------------------------------
// updates status bar message of the browser
// ------------------------------------------------------------------------------------------
function mitem_upstatus (b_clear) {
 window.setTimeout("window.status=unescape('" + (b_clear
  ? ''
  : (this.a_config[2] && this.a_config[2]['sb']
   ? escape(this.a_config[2]['sb'])
   : escape(this.a_config[0]) + (this.a_config[1]
    ? ' ('+ escape(this.a_config[1]) + ')'
    : ''))) + "')", 10);
}
 
// --------------------------------------------------------------------------------
// that's all folks