// Title: tigra menu
// URL: http://www.javascript-menu.com/
// Version: 2.0 (commented source)
// Date: 04-05-2003 (mm-dd-yyyy)
// Tech. Support: http://www.softcomplex.com/forum/forumdisplay.php?fid=40
// Notes: This script is free. Visit official site for further details.
//
// modified by MrCat
// Version: 1.1
// Date: 10-30-2006 (mm-dd-yyyy)
// --------------------------------------------------------------------------------
// global collection containing all menus on current page
var A_MENUS = [];
//
// --------------------------------------------------------------------------------
// menu class
// modified for pass elem to creation items func
function menu (placeholder, 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'  : 0,
                'block_left' : 0,
                'width'      : 120,
                'height'     : 22,
                'hide_delay' : 80,
                'expd_delay' : 50,
                'css'        : {
                        'inner' : '',
                        'outer' : '',
						'table' : ''
                }
        };
        
        // 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;

		// create a table and as placeholder for menu
		var menu_table=document.createElement("table");

		var a_level = a_tpl[0],a_css;
		a_css=this.getprop('css');
		var tableClass=a_css['table'];

        if (a_level) a_css=a_level['css'];
        if (a_css && a_css['table']) tableClass=a_css['table'];
		
		menu_table.className=tableClass;
		menu_table.border='0';
		menu_table.cellPadding='0';
		menu_table.cellSpacing='0';

		var table_body=document.createElement("tbody")
		var menu_row = document.createElement("tr");

		// init items recursively
        for (n_order = 0; n_order < a_items.length; n_order++) new menu_item(placeholder, menu_row, this, n_order);
		
		menu_table.appendChild(table_body);
		table_body.appendChild(menu_row);
		placeholder.appendChild(menu_table);

		// 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) {
	
// modified to recalculate submenu's positions

		// 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;

		this.gettop = getPageElementTop; 
		this.getleft= getPageElementLeft; 

		var nx=(o_item.n_depth==0)?this.getleft(o_item.e_oelement):this.getleft(o_item.e_oelement)+o_item.getprop('width');
		var ny=(o_item.n_depth==0)?this.gettop(o_item.e_oelement)+o_item.e_oelement.offsetHeight:this.gettop(o_item.e_oelement);
		
		// 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.left=nx+o_curritem.getprop('block_left');
				o_curritem.e_oelement.style.top=ny+o_curritem.getprop('block_top');
				ny+=o_curritem.getprop('height');
				
                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
// modifyed 

function menu_item (placeholder, menu_row, 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;

        // generate inner items using DOM
		
		if (this.n_depth) {
		 // submenus...	 
		 var o = document.createElement("a");
		 o.href=this.a_config[1];
		 o.id='e'+o_root.n_id+'_'+this.n_id+'o';
		 o.className=this.getstyle(0, 0);
		 if (this.a_config[2] && this.a_config[2]['tw']) o.setAttribute('target',this.a_config[2]['tw']);
		 o.onmouseover=new Function('A_MENUS['+o_root.n_id+'].onmouseover('+this.n_id+');');
		 o.onmouseout =new Function('A_MENUS['+o_root.n_id+'].onmouseout('+this.n_id+');');
		 o.onmousedown=new Function('A_MENUS['+o_root.n_id+'].onmousedown('+this.n_id+');');
		 o.onclick=new Function('return A_MENUS['+o_root.n_id+'].onclick('+this.n_id+');');
		 o.style.position='absolute'; 
		 o.style.width=this.getprop('width')+'px';
		 o.style.height=this.getprop('height')+'px';
		 o.style.visibility='hidden';
		 o.style.zIndex=this.n_depth;
		 var i = document.createElement("div");
		 i.id='e'+o_root.n_id+'_'+this.n_id+'i';
		 i.className=this.getstyle(1, 0);
		 i.style.zIndex=this.n_depth;
		 var oText = document.createTextNode(this.a_config[0]);
		 i.appendChild(oText);
		 o.appendChild(i);
		 placeholder.appendChild(o);
		
         this.e_ielement =i;
         this.e_oelement =o;
		} else {
		 //	root menu
		 var menu_link = document.createElement("a");
		 menu_link.href=this.a_config[1];
		 menu_link.style.textDecoration='none';// fix ff link
		 if (this.a_config[2] && this.a_config[2]['tw']) menu_link.setAttribute('target',this.a_config[2]['tw']);
		 menu_link.onmouseover=new Function('A_MENUS['+o_root.n_id+'].onmouseover('+this.n_id+');');
		 menu_link.onmouseout =new Function('A_MENUS['+o_root.n_id+'].onmouseout('+this.n_id+');');
		 menu_link.onmousedown=new Function('A_MENUS['+o_root.n_id+'].onmousedown('+this.n_id+');');
		 menu_link.onclick=new Function('return A_MENUS['+o_root.n_id+'].onclick('+this.n_id+');');

		 var mi_w = this.getprop('width'); 
		 var mi_h = this.getprop('height');

		 var cell=document.createElement("td");
		 cell.id='e'+o_root.n_id+'_'+this.n_id+'o';
		 cell.className=this.getstyle(0, 0);
		 cell.style.visibility='hidden';
		 
		 if (mi_w>0) cell.style.width=mi_w+'px';
		 if (mi_h>0) cell.style.height=mi_h+'px';
		 cell.style.zIndex=this.n_depth;
		 
		 div=document.createElement("div");
		 if (mi_w>0) div.style.width=mi_w+'px';
		 if (mi_h>0) div.style.height=mi_h+'px';
		 div.id='e'+o_root.n_id+'_'+this.n_id+'i';
		 div.className=this.getstyle(1, 0);
		 var menu_text = document.createTextNode(this.a_config[0]);
		 div.appendChild(menu_text);
		 
		 cell.appendChild(div);
		 menu_link.appendChild(cell);
		 menu_row.appendChild(menu_link);
		 
         this.e_ielement=div;
         this.e_oelement=cell;
		}
		
        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(placeholder, menu_row, 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);
}


// ------------------------------------------------------------------------------------------
// calculate top/left position of element in a page
// ------------------------------------------------------------------------------------------
function getPageElementTop(elem) {
 var top=0;
 if (elem) {
  top = elem.offsetTop;         
  var parentObj = elem.offsetParent;  
  while (parentObj != null) {
   if(document.all) { //IE
    if( (parentObj.tagName != "TABLE") && (parentObj.tagName != "BODY") ) 
    top += parentObj.clientTop; 
   } else {           //NN,FF...
    if(parentObj.tagName == "TABLE") {
     var nParBorder = parseInt(parentObj.border);
     if(isNaN(nParBorder)) { 
      var nParFrame = parentObj.getAttribute('frame');
      if(nParFrame != null) top += 1;
     } else if(nParBorder > 0) { top += nParBorder; }
    }
   }
   top += parentObj.offsetTop;      
   parentObj = parentObj.offsetParent; 
  }                                      
 }
 return top;                           
}

// ------------------------------------------------------------------------------------------

function getPageElementLeft(elem) {
 var left=0;
 if (elem) {
  left = elem.offsetLeft;         
  var parentObj = elem.offsetParent;  
  while (parentObj != null) {
   if(document.all) {
    if( (parentObj.tagName != "TABLE") && (parentObj.tagName != "BODY") ) 
    left += parentObj.clientLeft; 
   } else {
    if(parentObj.tagName == "TABLE") {
     var nParBorder = parseInt(parentObj.border);
     if(isNaN(nParBorder)) { 
      var nParFrame = parentObj.getAttribute('frame');
      if(nParFrame != null) left += 1;
     } else if(nParBorder > 0) {
      top += nParBorder;        
     }
    }
   }
   left += parentObj.offsetLeft;      
   parentObj = parentObj.offsetParent; 
  }                                      
 }
return left;
}
// --------------------------------------------------------------------------------
// that's all folks