/******************************************************************************
* Menu Bar                                                                    *
*                                                                             *
* Do not remove this notice.                                                  *
*                                                                             *
* Copyright 2000-2002 by Mike Hall                                            *
* Please see http://www.brainjar.com for terms of use.                        *
******************************************************************************/

//----------------------------------------------------------------------------
// Code to determine the browser and version.
//----------------------------------------------------------------------------

function Browser() {

  var ua, s, i;

  this.isIE    = false;  // Internet Explorer
  this.isNS    = false;  // Netscape
  this.version = null;

  ua = navigator.userAgent;

  s = "MSIE";
  if ((i = ua.indexOf(s)) >= 0) {
    this.isIE = true;
    this.version = parseFloat(ua.substr(i + s.length));
    return;
  }

  s = "Netscape6/";
  if ((i = ua.indexOf(s)) >= 0) {
    this.isNS = true;
    this.version = parseFloat(ua.substr(i + s.length));
    return;
  }

  // Treat any other "Gecko" browser as NS 6.1.

  s = "Gecko";
  if ((i = ua.indexOf(s)) >= 0) {
    this.isNS = true;
    this.version = 6.1;
    return;
  }
}

var browser = new Browser();

//----------------------------------------------------------------------------
// Code for handling the menu bar and active button.
//----------------------------------------------------------------------------

var activeButton = null;

// Capture mouse clicks on the page so any active button can be
// deactivated.

if (browser.isIE)
  document.onmousedown = pageMousedown;
else
  document.addEventListener("mousedown", pageMousedown, true);

function pageMousedown(event) {

  var el;

  // If there is no active button, exit.

  if (activeButton == null)
    return;

  // Find the element that was clicked on.

  if (browser.isIE)
    el = window.event.srcElement;
  else
    el = (event.target.tagName ? event.target : event.target.parentNode);

  // If the active button was clicked on, exit.

  if (el == activeButton)
    return;

  // If the element is not part of a menu, reset and clear the active
  // button.

  if (getContainerWith(el, "DIV", "menu") == null) {
    resetButton(activeButton);
    activeButton = null;
  }
}

function buttonClick(event, menuId) {

  var button;

  // Get the target button element.

  if (browser.isIE)
    button = window.event.srcElement;
  else
    button = event.currentTarget;

  // Blur focus from the link to remove that annoying outline.

  button.blur();

  // Associate the named menu to this button if not already done.
  // Additionally, initialize menu display.

  if (button.menu == null) {
    button.menu = document.getElementById(menuId);
    if (button.menu.initialized == null)
      menuInit(button.menu);
  }

  // Reset the currently active button, if any.

  if (activeButton != null)
    resetButton(activeButton);

  // Activate this button, unless it was the currently active one.

  if (button != activeButton) {
    depressButton(button);
    activeButton = button;
  }
  else
    activeButton = null;

  return false;
}

function buttonMouseover(event, menuId) {

  var button;

  // Find the target button element.

  if (browser.isIE)
    button = window.event.srcElement;
  else
    button = event.currentTarget;

  // If any other button menu is active, make this one active instead.

  if (activeButton != null && activeButton != button)
    buttonClick(event, menuId);
}

function depressButton(button) {

  var x, y;

  // Update the button's style class to make it look like it's
  // depressed.

  button.className += " menuButtonActive";

  // Position the associated drop down menu under the button and
  // show it.

  x = getPageOffsetLeft(button);
  y = getPageOffsetTop(button) + button.offsetHeight;

  button.menu.style.left = x + "px";
  button.menu.style.top  = y + "px";
  button.menu.style.visibility = "visible";
}

function resetButton(button) {

  // Restore the button's style class.

  removeClassName(button, "menuButtonActive");

  // Hide the button's menu, first closing any sub menus.

  if (button.menu != null) {
    closeSubMenu(button.menu);
    button.menu.style.visibility = "hidden";
  }
}

//----------------------------------------------------------------------------
// Code to handle the menus and sub menus.
//----------------------------------------------------------------------------

function menuMouseover(event) {

  var menu;

  // Find the target menu element.

  if (browser.isIE)
    menu = getContainerWith(window.event.srcElement, "DIV", "menu");
  else
    menu = event.currentTarget;

  // Close any active sub menu.

  if (menu.activeItem != null)
    closeSubMenu(menu);
}

function menuItemMouseover(event, menuId) {

  var item, menu, x, y;

  // Find the target item element and its parent menu element.

  if (browser.isIE)
    item = getContainerWith(window.event.srcElement, "A", "menuItem");
  else
    item = event.currentTarget;
  menu = getContainerWith(item, "DIV", "menu");

  // Close any active sub menu and mark this one as active.

  if (menu.activeItem != null)
    closeSubMenu(menu);
  menu.activeItem = item;

  // Highlight the item element.

  item.className += " menuItemHighlight";

  // Initialize the sub menu, if not already done.

  if (item.subMenu == null) {
    item.subMenu = document.getElementById(menuId);
    if (item.subMenu.initialized == null)
      menuInit(item.subMenu);
  }

  // Get position for submenu based on the menu item.

  x = getPageOffsetLeft(item) + item.offsetWidth;
  y = getPageOffsetTop(item);

  // Adjust position to fit in view.

  var maxX, maxY;

  if (browser.isNS) {
    maxX = window.scrollX + window.innerWidth;
    maxY = window.scrollY + window.innerHeight;
  }
  if (browser.isIE && browser.version < 6) {
    maxX = document.body.scrollLeft + document.body.clientWidth;
    maxY = document.body.scrollTop  + document.body.clientHeight;
  }
  if (browser.isIE && browser.version >= 6) {
    maxX = document.documentElement.scrollLeft + document.documentElement.clientWidth;
    maxY = document.documentElement.scrollTop  + document.documentElement.clientHeight;
  }
  maxX -= item.subMenu.offsetWidth;
  maxY -= item.subMenu.offsetHeight;

  if (x > maxX)
    x = Math.max(0, x - item.offsetWidth - item.subMenu.offsetWidth
      + (menu.offsetWidth - item.offsetWidth));
  y = Math.max(0, Math.min(y, maxY));

  // Position and show it.

  item.subMenu.style.left = x + "px";
  item.subMenu.style.top  = y + "px";
  item.subMenu.style.visibility = "visible";

  // Stop the event from bubbling.

  if (browser.isIE)
    window.event.cancelBubble = true;
  else
    event.stopPropagation();
}

function closeSubMenu(menu) {

  if (menu == null || menu.activeItem == null)
    return;

  // Recursively close any sub menus.

  if (menu.activeItem.subMenu != null) {
    closeSubMenu(menu.activeItem.subMenu);
    menu.activeItem.subMenu.style.visibility = "hidden";
    menu.activeItem.subMenu = null;
  }
  removeClassName(menu.activeItem, "menuItemHighlight");
  menu.activeItem = null;
}

//----------------------------------------------------------------------------
// Code to initialize menus.
//----------------------------------------------------------------------------

function menuInit(menu) {

  var itemList, spanList
  var textEl, arrowEl;
  var itemWidth;
  var w, dw;
  var i, j;

  // For IE, replace arrow characters.

  if (browser.isIE) {
    menu.style.lineHeight = "2.5ex";
    spanList = menu.getElementsByTagName("SPAN");
    for (i = 0; i < spanList.length; i++)
      if (hasClassName(spanList[i], "menuItemArrow")) {
        spanList[i].style.fontFamily = "Webdings";
        spanList[i].firstChild.nodeValue = "4";
      }
  }

  // Find the width of a menu item.

  itemList = menu.getElementsByTagName("A");
  if (itemList.length > 0)
    itemWidth = itemList[0].offsetWidth;
  else
    return;

  // For items with arrows, add padding to item text to make the
  // arrows flush right.

  for (i = 0; i < itemList.length; i++) {
    spanList = itemList[i].getElementsByTagName("SPAN")
    textEl  = null
    arrowEl = null;
    for (j = 0; j < spanList.length; j++) {
      if (hasClassName(spanList[j], "menuItemText"))
        textEl = spanList[j];
      if (hasClassName(spanList[j], "menuItemArrow"))
        arrowEl = spanList[j];
    }
    if (textEl != null && arrowEl != null)
      textEl.style.paddingRight = (itemWidth 
        - (textEl.offsetWidth + arrowEl.offsetWidth)) + "px";
  }

  // Fix IE hover problem by setting an explicit width on first item of
  // the menu.

  if (browser.isIE) {
    w = itemList[0].offsetWidth;
    itemList[0].style.width = w + "px";
    dw = itemList[0].offsetWidth - w;
    w -= dw;
    itemList[0].style.width = w + "px";
  }

  // Mark menu as initialized.

  menu.initialized = true;
}

//----------------------------------------------------------------------------
// General utility functions.
//----------------------------------------------------------------------------

function getContainerWith(node, tagName, className) {

  // Starting with the given node, find the nearest containing element
  // with the specified tag name and style class.

  while (node != null) {
    if (node.tagName != null && node.tagName == tagName &&
        hasClassName(node, className))
      return node;
    node = node.parentNode;
  }

  return node;
}

function hasClassName(el, name) {

  var i, list;

  // Return true if the given element currently has the given class
  // name.

  list = el.className.split(" ");
  for (i = 0; i < list.length; i++)
    if (list[i] == name)
      return true;

  return false;
}

function removeClassName(el, name) {

  var i, curList, newList;

  if (el.className == null)
    return;

  // Remove the given class name from the element's className property.

  newList = new Array();
  curList = el.className.split(" ");
  for (i = 0; i < curList.length; i++)
    if (curList[i] != name)
      newList.push(curList[i]);
  el.className = newList.join(" ");
}

function getPageOffsetLeft(el) {

  var x;

  // Return the x coordinate of an element relative to the page.

  x = el.offsetLeft;
  if (el.offsetParent != null)
    x += getPageOffsetLeft(el.offsetParent);

  return x;
}

function getPageOffsetTop(el) {

  var y;

  // Return the x coordinate of an element relative to the page.

  y = el.offsetTop;
  if (el.offsetParent != null)
    y += getPageOffsetTop(el.offsetParent);

  return y;
}


/**************************************************/
/* Inicio Defines styles de la meva Terra.        */
/**************************************************/


/********************    Formato "España, Sábado 13 de Julio del 2002"  *************************************************************************************************************/
function writeCurDate_Espanol()
{
		 	var dtCurrent,strDate,straWeek,straMonth;
			straWeek=new Array("Domingo","Lunes","Martes","Miércoles","Jueves","Viernes","Sábado");
			straMonth=new Array("Enero","Febrero","Marzo","Abril","Mayo","Junio","Julio","Agosto","Septiembre","Octubre","Noviembre","Diciembre");
			dtCurrent=new Date();
			strDate="España, "+ straWeek[dtCurrent.getDay()]+" "+dtCurrent.getDate()+" de "+ straMonth[dtCurrent.getMonth()]+" del "+dtCurrent.getFullYear();
			document.write(strDate);
}

/********************    Formato "Espanya, Dissabte 13 de Juliol del 2002"  *************************************************************************************************************/

function writeCurDate_Catala()
{
		 	var dtCurrent,strDate,straWeek,straMonth;
			straWeek=new Array("Diumenge","Dilluns","Dimarts","Dimecres","Dijous","Divendres","Dissabte");
			straMonth=new Array("Gener","Febrer","Març","Abril","Maig","Juny","Juliol","Agost","Setembre","Octubre","Novembre","Desembre");
			dtCurrent=new Date();
			strDate="Espanya, "+ straWeek[dtCurrent.getDay()]+" "+dtCurrent.getDate()+" de "+ straMonth[dtCurrent.getMonth()]+" del "+dtCurrent.getFullYear();
			document.write(strDate);
}


/****************************************************************************************************************************************************************/
/********************    Formato "España, Sábado 13 de Julio del 2002"  *** Spain, on Monday, the 5th of March, 2007 **************************************************/

function writeCurDate_Ingles()
{
		 	var dtCurrent,strDate,straWeek,straMonth;
			straWeek=new Array("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday");
			straMonth=new Array("January","February","March","April","May","June","July","August","September","October","November","December");
			dtCurrent=new Date();
			strDate="Spain,"+" "+ straWeek[dtCurrent.getDay()]+", "+ ""+ straMonth[dtCurrent.getMonth()]+" "+""+ dtCurrent.getDate()+", "+dtCurrent.getFullYear();
			document.write(strDate);
}


/****************************************************************************************************************************************************************/
/********************    Formato "España, Sábado 13 de Julio del 2002"  ******** L'Espagne, un lundi 5 mars de 2007 ********************************************************/

function writeCurDate_Frances()
{
		 	var dtCurrent,strDate,straWeek,straMonth;
			straWeek=new Array("Dimanche","Lundi","Mardi","Mercredi","Jeudi","Vendredi","Samedi");
			straMonth=new Array("Janvier","Février","Mars","Avril","Mai","Juin","Juillet","Août","Septembre","Octobre","Novembre","Décembre");
			dtCurrent=new Date();
			
			strDate="Espagne. "+" "+straWeek[dtCurrent.getDay()]+" "+dtCurrent.getDate() +" "+ straMonth[dtCurrent.getMonth()]+" "+dtCurrent.getFullYear();
			document.write(strDate);
}


/****************************************************************************************************************************************************************/
/********************    Formato "Sábado, 13/7/2002"  *************************************************************************************************************/
/*Italian:  Mercoledi, 4 Maggio, 2006 */

function writeCurDate_Italiano()																
{																				
		 	var dtCurrent,strDate,straWeek,straMonth;												

  			straWeek=new Array("Domenica","Lunedi","Martedi","Miercoledi","Giovedi","Venerdi","Sabato");							
  			straMonth=new Array("Gennaio","Febraio","Marzo","Apprile","Maggio","Giugno","luglioio","Agosto","Settembre","Ottobre","Novembre","Dicembre");	
			dtCurrent=new Date();
			strDate="Spagna. "+ straWeek[dtCurrent.getDay()]+", "+dtCurrent.getDate()+" "+ straMonth[dtCurrent.getMonth()]+" "+dtCurrent.getFullYear();
			document.write(strDate);
}
/****************************************************************************************************************************************************************/

/****************************************************************************************************************************************************************/
/********************    Formato "Sábado, 13/7/2002"  *************************************************************************************************************/
/*function writeCurDate()																	*/
/*{																				*/
/*		 	var dtCurrent,strDate,straWeek,straMonth;												*/
/*																				*/
/*			straWeek=new Array("Domingo","Lunes","Martes","Miercoles","Jueves","Viernes","Sábado");							*/
/*			straMonth=new Array("Enero","Febrero","Marzo","Abril","Mayo","Junio","Julio","Agosto","Septiembre","Octubre","Noviembre","Diciembre");	*/
/*			dtCurrent=new Date();															*/
/*			strDate=straWeek[dtCurrent.getDay()]+", "+dtCurrent.getDate()+"/"+(dtCurrent.getMonth()+1)+"/"+dtCurrent.getFullYear();			*/
/*			document.write(strDate);														*/
/*}																				*/
/****************************************************************************************************************************************************************/



function aviso_legal ()
{
if (event.button==2)
{
alert('© 2001 BioGest.es')
 }
}



function Modregistro()
{
window.open("http://www.biogest.es/index.htm","REGISTRO","width=700,height=540,top=0,left=45,resize=0,directories=0,scrollbars=0,status=0,location=0");
}



function nuevaventana(nombre,especif)
{
window.open(nombre,'_blank',especif);
}


function enviar_open_window() {
	window.open("index.htm="+document.location +"&texto="+escape(document.title),"sendNewWindow","toolbar=0,width=400,height=350,directories=0,status=0,scrollbars=0,resizable=0,menubar=0");
  }


/**************************************************/
/* Final  Defines styles de la meva Terra.        */
/**************************************************/


/********************************************************/
/* Inicio  Funcioniones invercacomes varias             */
/********************************************************/


<!--

/********************************************************/
/* Inicio  Funcion Mapa popup invoca un punto del mapa  */
/********************************************************/

 window.name='principal';
 function mOvr(src,clrOver) {
 if (!src.contains(event.fromElement)) {
	 src.style.cursor = 'hand';
	 src.bgColor = clrOver;
	}
 }

/*******************************************************/
/* Final  Funcion Mapa popup invoca un punto del mapa  */
/*******************************************************/


 function mOut(src,clrIn) {
	if (!src.contains(event.toElement)) {
	 src.style.cursor = 'default';
	 src.bgColor = clrIn;
	}
 }
 function mClk(src) {
	if(event.srcElement.tagName=='TD')
		src.children.tags('A')[0].click();
 }
function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}

/*
//Llamada a la hoja de estilos según plataforma y navegador
var appver = navigator.appVersion.substring(0,navigator.appVersion.indexOf('.'));
var bIsOk = (navigator.appName == 'Netscape') && (appver >= '5') || (navigator.appName == 'Microsoft Internet Explorer') && (appver >= '4');
//Hoja de estilos para Mac
var plat_mac = "plantilla.css";
//Hoja de estilos para Pc según navegador
var Pc_n4 = "plantillan.css";
var Pc_e4 = "plantilla.css";
if((navigator.appVersion.indexOf("Mac")!= -1)){
  	document.write("<link rel='stylesheet' href='" + plat_mac + "' type='text/css'>");
}
else{
	if (bIsOk){
	   document.write("<link rel='stylesheet' href='" + Pc_e4 + "' type='text/css'>");
	}else{
	   document.write("<link rel='stylesheet' href='" + Pc_n4 + "' type='text/css'>");
	}
}
*/
 function CambiarTicker() {
   	window.document.frmTicker.action = window.document.location;
   	document.frmTicker.submit();
 }
function MM_goToURL() { //v3.0
  var i, args=MM_goToURL.arguments; document.MM_returnValue = false;
  for (i=0; i<(args.length-1); i+=2) eval(args[i]+".location='"+args[i+1]+"'");
}
function articulo(pagina,articulo){
 window.document.form_articulo.articulo.value=articulo+'.php';
 window.document.form_articulo.action='http://www.biogest.es/'+pagina+'_articulos.php';
 window.document.form_articulo.submit();
 }
function ver_resultado(codigo_valor){
	url = "/ficha.php?codigo_valor="+codigo_valor; 
	window.open(url,'Ficha','width=550,height=500,top=0,left=0,scrollbars=1'); 
}
function ver_analisis(codigo_at){
	url = "at_devolucion.php?valor="+codigo_at; 
	window.document.location = url;
} 
function ver_grafico(codigo_valor,nombre){
	url = 'grafico.php?indice='+codigo_valor+'&nombre='+nombre; 
	
	window.open(url,'Grafico','width=550,height=500,top=0,left=0,scrollbars=1'); 
} 	

// Variables para Cookies
var num_visitas;

// Funciones para Cookies
function setCookie(name, value, expires, path, domain, secure) {
  var curCookie = name + "=" + escape(value) +
      ((expires) ? "; expires=" + expires.toGMTString() : "") +
      ((path) ? "; path=" + path : "") +
      ((domain) ? "; domain=" + domain : "") +
      ((secure) ? "; secure" : "");
  document.cookie = curCookie;
}

function getCookie(name) {
  var dc = document.cookie;
  var prefix = name + "=";
  var begin = dc.indexOf("; " + prefix);
  if (begin == -1) {
    begin = dc.indexOf(prefix);
    if (begin != 0) return null;
  } else
    begin += 2;
  var end = document.cookie.indexOf(";", begin);
  if (end == -1)
    end = dc.length;
  return unescape(dc.substring(begin + prefix.length, end));
}

function fixDate(date) {
  var base = new Date(0);
  var skew = base.getTime();
  if (skew > 0)
    date.setTime(date.getTime() - skew);
}

function grabar_info(nombre, dato) {
    tope = new Date();
    fixDate(tope);
    tope.setTime(tope.getTime() + 365 * 24 * 60 * 60);
    setCookie(nombre, dato, tope);
}

function recuperar_info(nombre) {
    num_visitas = getCookie(nombre);
	if(!num_visitas) {
		num_visitas = 0;
	}
}

function actualizar_info() {
	// Hasta 30/03/2002
	var fecha = new Date();
	var tope = new Date("March 30, 2002 23:59:59");
	if(fecha < tope) {
		recuperar_info("numero_visitas");
		if(num_visitas < 3) {
			popup = window.open('popup_biogest.htm', 'popup', 'scrollbars=0,resizable=0,directories=0,menubar=0,location=0,status=0,height=200,width=260');
			num_visitas ++;
			grabar_info("numero_visitas", num_visitas);
		}
	}
}






/********************************************************/
/* Inicio  Funcioniones varias                          */
/********************************************************/

//-->