<!--
  // Example:
// alert( readCookie("Cookoliver") );
function verifico_checkeo(nombreCheck, estado){
	cajaoculta=eval('document.formulario.a_'+nombreCheck);
	if (estado)
		cajaoculta.value="si";
	else
		cajaoculta.value="no";
}

function MM_CheckFlashVersion(reqVerStr,msg){
  with(navigator){
    var isIE  = (appVersion.indexOf("MSIE") != -1 && userAgent.indexOf("Opera") == -1);
    var isWin = (appVersion.toLowerCase().indexOf("win") != -1);
    if (!isIE || !isWin){  
      var flashVer = -1;
      if (plugins && plugins.length > 0){
        var desc = plugins["Shockwave Flash"] ? plugins["Shockwave Flash"].description : "";
        desc = plugins["Shockwave Flash 2.0"] ? plugins["Shockwave Flash 2.0"].description : desc;
        if (desc == "") flashVer = -1;
        else{
          var descArr = desc.split(" ");
          var tempArrMajor = descArr[2].split(".");
          var verMajor = tempArrMajor[0];
          var tempArrMinor = (descArr[3] != "") ? descArr[3].split("r") : descArr[4].split("r");
          var verMinor = (tempArrMinor[1] > 0) ? tempArrMinor[1] : 0;
          flashVer =  parseFloat(verMajor + "." + verMinor);
        }
      }
      // WebTV has Flash Player 4 or lower -- too low for video
      else if (userAgent.toLowerCase().indexOf("webtv") != -1) flashVer = 4.0;

      var verArr = reqVerStr.split(",");
      var reqVer = parseFloat(verArr[0] + "." + verArr[2]);
  
      if (flashVer < reqVer){
        if (confirm(msg))
          window.location = "http://www.macromedia.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash";
      }
    }
  } 
}

function readCookie(name)
{
  var cookieValue = "";
  var search = name + "=";
  if(document.cookie.length > 0)
  { 
    offset = document.cookie.indexOf(search);
    if (offset != -1)
    { 
      offset += search.length;
      end = document.cookie.indexOf(";", offset);
      if (end == -1) end = document.cookie.length;
      cookieValue = unescape(document.cookie.substring(offset, end))
    }
  }
  if (cookieValue=="NaN" || cookieValue==""){cookieValue=0;}
  return cookieValue;
}

// Ejemplo
// writeCookie("Cookoliver", "imagen23.jpg", 24);
// Stores the string "my name" in the cookie "myCookie" which expires after 24 hours.
function writeCookie(name, value, hours)
{
  var expire = "";
  if(hours != null)
  {
    expire = new Date((new Date()).getTime() + hours * 3600000);
    expire = "; expires=" + expire.toGMTString();
  }
  document.cookie = name + "=" + escape(value) + expire;
}


function cambia_ima() { //Modificacion de MM_swapImage  : no se modifica con el swap
	 var i,j=0,x,a=cambia_ima.arguments; 
  for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){x.src=a[i+2];}
}  




function toHex(dec) {
	var hexCharacters = "0123456789ABCDEF"
	if (dec < 0)
		return "00"
	if (dec > 255)
		return "FF"
	var i = Math.floor(dec / 16)
	var j = dec % 16
	return hexCharacters.charAt(i) + hexCharacters.charAt(j)
}
// funcion que manda variables a otra pagina
// ej: 
// <a href="javascript:pasarVariables('destino.html', 'var1,var2','senti de,verdad')">aqu&iacute;</a>
function pasarVariables(pagina, nombres, valores, ancho, alto) {
       pagina +="?";
    nomVec = nombres.split(",");
    valores = valores.split(",");
	for (i=0; i<nomVec.length; i++)
      pagina += nomVec[i] + "=" + escape((valores[i]))+"&";
    pagina = pagina.substring(0,pagina.length-1);
//	alert (pagina);

	Ventana=window.open(pagina,'','scrollbars=yes,height='+alto+',left='+((screen.width/2)-(ancho/2))+',top='+((screen.height/2)-(alto/2))+',width='+ancho);
	Ventana.focus()
	
  }
 
function abre_pagina(ubicacion,nombre,parametros){
window.open(ubicacion,nombre,parametros);
}
contador_publi=0;
function abre_publicidad(ubicacion,ancho,alto){
	if (!alto) {alto=screen.height-90;}
	if (!ancho) {ancho=650;}
	contador_publi++;
	recursos=window.open(ubicacion,'recursos'+contador_publi,'scrollbars=yes,status=yes,height='+alto+',left='+((screen.width/2)-(ancho/2))+',top='+(((screen.height-20)-alto)/2-20)+',width='+ancho);
	recursos.focus();

	
}

function pongo_fecha(){  //funcion tomada del home de la DPIN
   mesarray=new Array("Enero", "Febrero", "Marzo", "Abril", "Mayo", "Junio", "Julio","Agosto", "Septiembre", "Octubre", "Noviembre", "Diciembre");
   diaarray=new Array( "Domingo","Lunes", "Martes", "Miércoles", "Jueves", "Viernes", "Sábado");
   hoy = new Date();
   dias = hoy.getDate();
   dia = hoy.getDay();
   mes = hoy.getMonth();
   mes=mesarray[mes];
   dia =diaarray[dia];
   anno = hoy.getYear();
   document.write(dia+" "+dias+" "+" de "+mes+" de "+anno);
}

function escribo_subtitulo(texto){
	if (parent.tituloSec!=null){
		parent.tituloSec.innerHTML=texto;
	}
}


function abre_foto(nombre,descripcion, fotografo){
	if (descripcion){
		pasarVariables('vis_fotos.htm','archivo,descripcion,fotografo', nombre+','+descripcion+','+fotografo, 200, 200);
	}
	else{
		pasarVariables('vis_fotos.htm', 'archivo', nombre);
	}
}

function abre_video(archivo,titulo, descripcion){
	if (descripcion){
		pasarVariables('vis_video.htm','archivo,titulo,descripcion', archivo+','+titulo+','+descripcion, 500, 500);
	}
	else{
		pasarVariables('vis_video.htm', 'archivo', archivo);
	}
}

function va_contacto(){
	opener.location.href='contacto.php';
	close();
}

function despliega(nombre){
	tabla=eval(nombre + ".style");
	if (tabla.display=="block") {
		tabla.display="none";
	}
	else{
		tabla.display="block";
	}
}

//detecto navegador
browserName = navigator.appName;
browserVer = parseInt(navigator.appVersion);
var msie4 = (browserName == "Microsoft Internet Explorer" && browserVer >= 4);
if ((browserName == "Netscape" && browserVer >= 3) || msie4 || browserName=="Konqueror") {version = "n3";} else {version = "n2";}


vie_scroll=1;
vie_heigth=1;
incre=2;



//contador dpara dar acceso
contadorAcceso=0;

function lanza(pagina){
	contadorAcceso++;
	if (contadorAcceso==3) {
		parent.location.href=pagina;
	}
}

//inicia_rota_enca();

// Funciones traducidas
function MM_callJS(jsStr) { //v2.0
  return eval(jsStr)
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_validateForm() { //v4.0
  var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
  for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args[i]);
    if (val) { nm=val.name; if ((val=val.value)!="") {
      if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
        if (p<1 || p==(val.length-1)) errors+='- '+nm+' debe contener una dirección de email.\n';
      } else if (test!='R') { num = parseFloat(val);
        if (isNaN(val)) errors+='- '+nm+' debe contener un número.\n';
        if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
          min=test.substring(8,p); max=test.substring(p+1);
          if (num<min || max<num) errors+='- '+nm+' debe contener un número entre '+min+' y '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+nm+' es requerido.\n'; }
  } if (errors) alert('Los siguientes errores han ocurrido:\n'+errors);
  document.MM_returnValue = (errors == '');
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}