// <script>

  var IE = (document.all) ? true : false;
  var N4 = (document.layers) ? true : false;
  var N6 =  (document.getElementById && !document.all) ? true : false;
  
  var menu_node_base = "";
  var menu_node_in = "";
  var menu_node_out = "";
  var menu_node_no = "";
  var menu_node_no2 = "";
  var menu_id = 0;
  var previousOpened = new Array();
  var previousOpenedLen = 0;
  var menu_base_items = {};
  
  function o (id) {
	if (N4)      return document[id];
    else if (N6) return document.getElementById(id);
    else         return document.all(id);
	}

  function setContent(obj,html) {
    if (IE || N6) obj.innerHTML = html;
	else if (N4) { with (obj.document) { open(); write(html); close(); } }
    else window.status = "ERROR: Unsupported browser";
	}
  
  function menuNodes (node_base,node_in,node_out,node_no) {
    menu_node_base  = node_base;
    menu_node_in  = node_in;
    menu_node_out = node_out;
    menu_node_no = node_no;
    menu_node_no2 = "<img src='/pics/menu_arrow_red_r.gif' width=8 height=8 alt='' border=0 style='cursor:default;'>";
    }

  function makeMenu (menu) {
    document.write(menu);
    //o("menu_" + menu_id).className = "menu";
    }

  function contains_not (id1,id2) {
    if (o(id1).innerHTML.indexOf(o(id2).innerHTML) == -1) {
      return true;
      }
    }   
    
  function markMenu (id,className,image) {
    o("menuAnchor_" + id).className = className;
    setContent(o("menuNode_" + id),image);
    }
  
  function openMenu (id,onlyClose) {
    if (o("menu_" + id)) {
      if (onlyClose || o("menu_" + id).className == "menuSub") {
        o("menu_" + id).className = "menuSubHidden";
        if (menu_base_items[id]) {
          markMenu(id,"menuTitle",menu_node_base);
          o("menuTitleRow_" + id).style.backgroundColor = "";
          }
        else {
          markMenu(id,"menuTitleActive",menu_node_in);
          }
        
        //setContent(o("menuNode_" + id),menu_node_in);
        // Set InActive style
        //o("menu_" + id).style.color = "red";//menuTitleActive";
        //o("menuAnchor_" + id).className = "menuTitle";
        }
      else {  
        for (var i = 0; i < previousOpenedLen; i++) {
          if (previousOpened[i] && contains_not("menu_" + previousOpened[i],"menu_" + id)) { 
            var p = previousOpened[i];
            previousOpened[i] = false;
            previousOpenedLen--;
            openMenu(p,true);
            }
          }
        previousOpened[previousOpenedLen] = id;
        previousOpenedLen++;
        o("menu_" + id).className = "menuSub";
        //setContent(o("menuNode_" + id),menu_node_out);
        // Set Active style
        //o("menu_" + id).style.color = "blue";
        //o("menuAnchor_" + id).className = "menuTitleActive";

        markMenu(id,"menuTitleActive",menu_node_out);
        if (menu_base_items[id]) {
          o("menuTitleRow_" + id).style.backgroundColor = "#E8CBDC";
          }
        

        var all;
        if (IE) {
          all = o("menu_" + id).all.tags("A");
          }
        else {
          all = o("menu_" + id).getElementsByTagName("A");
          }
        for (var i = 0; i < all.length; i++) {
          all[i].className = "menuTitleActive";
          }
        }
      }
    }
  
  function m (title,url,menu,base) {
    if (!url) url = "javascript:;";
    var n = menu_node_no;
    title = title.replace(/["']/,"?");
    var title2 = title.replace(/<[^>]*>/,"");
    menu_id++;
    if (menu) n = menu_node_in;
    var clas = "menuNode";
    if (base) {
      n = menu_node_base;
      if (!menu || menu == "") {
        n = menu_node_no2;
        }
      menu_base_items[menu_id] = true;
      var clas = "menuNodeBase";
      }
    
    var c = 'onClick="openMenu(' + menu_id + ')"';
    var html = 
               '<table border=0 class="menu" cellpadding=0 cellspacing=0 width="100%"><tr valign=top ' +
               'id=menuTitleRow_' + menu_id + '>' +
               '<td class="menuNodeCell"><div class=' + clas + ' ' + c + 
               ' id="menuNode_' + (menu_id) + '">' + 
               n + '</div></td>' +
               '<td class="menuTitleCell" nowrap><div class="menuTitleDiv">' + 
               '<a href="' + url + '" class="menuTitle" ' + c + ' target=main ' +
               "onMouseOver=\"top.window.status='" + title2 + "'; return true;\" " +
               "onMouseOut=\"top.window.status=''\" title='" + title2 + "' " +
               "id=menuAnchor_" + menu_id + ">" + 
               title + '</a></div></td></tr>';
    if (menu) {
      html += '<tr><td><img src="pics/spacer.gif" width="1" height="1" border="0"></td><td><div class="menuSubHidden" id="menu_' + menu_id + '">' + menu + '</div></td></tr>';
      }
    return html + "</table>";
    }