<!-- inicio Desactivar Status -->
var urlglobal
function hidestatus()
{
	window.status='Sololá'
	return true
}
if (document.layers)
document.captureEvents(Event.MOUSEOVER | Event.MOUSEOUT)
document.onmouseover=hidestatus
document.onclick=hidestatus
document.onmouseout=hidestatus
<!-- fin Desactivar Status -->

<!-- inicio Recargar pagina -->
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);
<!-- fin Recargar pagina -->

<!-- inicio Abre ventana -->
function abreventana(donde)
	{
	var x=screen.availWidth;
	var y=screen.availHeight;
	var z="";
	z=donde;
	var abre=window.open(z,"abre","scrollbars=no,width="+x+",height="+y+",top=0,left=0,status=no,toolbar=no,menubar=no,location=no,titlebar = no,fullscreen = no ");
	abre.resizeTo(x,y);
	abre.moveTo(0,0);
	abre.focus();
	}
<!-- fin Abre ventana -->

<!-- inicio Roll Over -->
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;
}

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_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_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];}
}
<!-- fin Roll Over -->

<!-- inicio inputcolor -->
function mark(face,field_color,text_color){
if (document.documentElement){//if browser is IE5+ or NS6+
face.style.backgroundColor=field_color;
face.style.color=text_color;
}
}
<!-- fin inputcolor -->

<!-- inicio resalta TD -->
function Resalta(which) {
resaltado="menuon";
which.className =resaltado;
}

function Resalta2(which) {
	resaltado="menuon2";
	which.className =resaltado;
}

function Resalta3(which) {
	resaltado="menuon3";
	which.className =resaltado;
}
function Resalta4(which) {
	resaltado="link2";
	which.className =resaltado;
}

function Normal(which,estilo) {
which.className =estilo;
}
<!-- fin resalta TD -->

<!-- inicio links menu -->
function abrir(num)
{
  if (num==1)
  {
    window.open('http://www.terra.es','body');
  }
  if (num==2)
  {
    window.open('familia001.htm','body');
  }
   if (num==3)
  {
    window.open('familia0001.htm','body');
  }
}
<!-- fin links menu -->

<!-- inicio fecha -->
var weekdays = new Array(6);
var months = new Array(11);

var today = new Date();
var month = today.getMonth();
var date = today.getDate();
var weekday = today.getDay();
var year = today.getYear();
if ((navigator.appName == "Microsoft Internet Explorer") && (year < 2000))              year="19" + year;
if (navigator.appName == "Netscape")year=1900 + year;
today = null;

weekdays[0] = "Domingo";
weekdays[1] = "Lunes";
weekdays[2] = "Martes";
weekdays[3] = "Miércoles";
weekdays[4] = "Jueves";
weekdays[5] = "Viernes";
weekdays[6] = "Sábado";

months[0] = "Enero";
months[1] = "Febrero";
months[2] = "Marzo";
months[3] = "Abril";
months[4] = "Mayo";
months[5] = "Junio";
months[6] = "Julio";
months[7] = "Agosto";
months[8] = "Septiembre";
months[9] = "Octubre";
months[10] = "Noviembre";
months[11] = "Diciembre";

<!-- fin fecha -->

<!-- Jorge -->
// Indicaran la celda marcada actualmente
var marcado_celda;
var marcado_nivel;
var marcado_mouse;

function marcar(celda, nivel)
{
  // Desmarca la celda actualmente marcada (si existe)
  // y le vuelve a asignar el OnMouseOut
  if (marcado_celda)
  {
    Normal(marcado_celda);
    marcado_celda.onmouseout=marcado_mouse;
  }

  // Guarda los parametros actuales de la celda marcada
  marcado_celda = celda;
  marcado_nivel = nivel;
  marcado_mouse=marcado_celda.onmouseout;

  // Marca la nueva celda y le anula el OnMouseOut
  // para que no se desmarque al pasar por encima
  switch (marcado_nivel)
  {
    case 1: Resalta(marcado_celda); break;
    case 2: Resalta2(marcado_celda); break;
    case 3: Resalta3(marcado_celda); break;
  }
  marcado_celda.onmouseout='';
}
<!-- fin Jorge -->

<!-- principio Carlos(Gaya) -->
function AbrirNodo(est_codigo,nivel,nivel1,nivel2,nivel3,nod_numero,portada,abierto) {
	url='menu_izq.asp?est_codigo='+est_codigo;
	if (nivel==1) {
	//url=url + '&nivel1=' + nivel1 + '#' + nivel1;
	url=url + '&nivel1=' + nivel1;
	numero=nivel1;
	}
	if (nivel==2) {
		//url=url + '&nivel1=' + nivel1 + '&nivel2=' + nivel2 + '#' + nivel1;
		url=url + '&nivel1=' + nivel1 + '&nivel2=' + nivel2;
		numero=nivel2;
	}
	if (nivel==3) {
		//url=url + '&nivel1=' + nivel1 + '&nivel2=' + nivel2 + '&nivel3=' + nivel3 + '#' + nivel1;
		url=url + '&nivel1=' + nivel1 + '&nivel2=' + nivel2 + '&nivel3=' + nivel3;
		numero=nivel3;
	}
	//Sólo abro la portada si viene un nod_numero y además tiene una portada asociada
	if (portada=='si') {
		portada_url='nivel_01.asp?'
		portada_url=portada_url+'nivel1='+nivel1+'&nivel2='+nivel2+'&nivel3='+nivel3+'&pagina=1'+'&tipoquery=1';
		//alert('tiene portada. ='+ portada_url);
		parent["body"].location.href=portada_url;
	}
	if (abierto=='no') {
			//alert(abierto);
		document.location.href=url;
	}
	else {
		if (parseInt(nivel)==1) {
			cerrarNodo(est_codigo);
		}
		else{
		document.location.href=url;
		}
	}
}
function cerrarNodo(est_codigo) {
	url='menu_izq.asp?est_codigo=' + est_codigo;
	document.location.href=url;
}
function AbrirNodoMarcas(est_codigo,nivel,nivel1,nivel2,nivel3,nod_numero,portada,abierto) {
	url='menu_izq_accesorios.asp?est_codigo='+est_codigo;
	url=url + '&nivel1=' + nivel1;
	numero=nivel1;
	if (nivel==2) {
		url=url + '&nivel2=' + nivel2 + '#' + nivel2;
		numero=nivel2;
	}
	if (nivel==3) {
		url=url + '&nivel2=' + nivel2 + '&nivel3=' + nivel3 + '#' + nivel2;
		numero=nivel3;
	}

	//Sólo abro la portada si viene un nod_numero y además tiene una portada asociada
	if (portada=='si') {
		
		portada_url='nivel_01.asp?'
		portada_url=portada_url+'nivel1='+nivel1+'&nivel2='+nivel2+'&nivel3='+nivel3+'&pagina=1'+'&tipoquery=6';
		//alert('tiene portada. ='+ portada_url);
		parent["body"].location.href=portada_url;
		//window.open(portada_url)
	}
	if (abierto=='no') {
			//alert(abierto);
		document.location.href=url;
	}
	else {
		if (parseInt(nivel)==2) {
			cerrarNodoMarcas(est_codigo);
		}
		else{
		document.location.href=url;
		}
	}
}
function cerrarNodoMarcas(est_codigo) {
	url='menu_izq_accesorios.asp?est_codigo=' + est_codigo;
	document.location.href=url;
}

function mensaje(textomsg) {
	alert(textomsg);
}
function abroventana(url, target) {
	window.open('url', 'target'); 
}
function hacersubmit() {
//document.+formulario+.target="+marco+" 
document.form1.submit();
}
function hacersubmitc(formulario) {
formulario.submit();
}
function hacersubmitmasivo(doc, contador) {
var cont = 1;
var formu
//formu.submit();
for ( cont; cont<contador; cont++ )
	{
	formu=doc.forms.form1;
	//mensaje.call('form' +cont);
	formu.submit();
	//document.write(formu+"<br>");
	}
}
function validar(formulario) {
  if (formulario.usuario.value.length < 1) {
    alert("El campo Usuario no puede estar vacio ");
    formulario.usuario.focus();
    return (false);
	}
	else {
	 if (formulario.pwd.value.length < 1) {
    alert("El campo Password no puede estar vacio ");
    formulario.pwd.focus();
    return (false);
	}
   else {
   //alert("Validación correcta");
   formulario.pwd.value=hex_md5(formulario.pwd.value); 
   hacersubmitc(formulario);
   return (true);
}
}
}
function refrescar() {
  //parent.dchb.location.refresh(); 

  parent.dchb.location.href="cesta.asp"; 
}
function refrescar2() {
  //parent.dchb.location.refresh(); 
  parent.body.location.href="compra.asp"; 
    }
function refrescarcual(cual) {
  //parent.dchb.location.refresh(); 
  parent.body.location.href=cual; 
    }
function grabarfavo(codarti){
url='grabarfavo.asp?codarti='+codarti;
document.location.href=url;
}
function abrefavo(codcli){
	if (codcli == 0) {
	alert("Su sesión ha expirado, haga login de nuevo para grabar favoritos");
	}
	else{
	window.open('nivel_01.asp?codcli='+codcli+'&tipoquery=5&pagina=1', 'body'); 
	}
}
function abrecuenta(codcli){
	if (codcli == 0) {
	alert("Su sesión ha expirado, haga login de nuevo para ver sus datos");
	}
	else{
	window.open('form_registro.asp?codcli='+codcli, 'body'); 
	}
}
function urlcual(url, formulario){
//return window.location.hash
//document.formulario.url.value=ventana.location.hash;
formulario.url.value = url;
}
function urlcual2(url){
anterior = url;
urlglobal = url;
//window.open('compra.asp?anterior='+anterior, 'body'); 
}
function urlcual3(){
anterior = urlglobal;
//urlglobal = url;
window.open('compra.asp?anterior='+anterior, 'body'); 

}
function ira(donde){
url = donde;
//document.location.href=donde;
window.open(''+donde+'', 'body'); 
//alert(url);
}
function accionact(formulario){
formulario.accion.value = 'act';
}
function acciondlt(formulario){
formulario.accion.value = 'dlt';
}
function limpiarbuscador(){
window.open('buscador.asp', 'dchc');
//alert("hola");
}
function abandonar(){
url='abandonar.asp?dedonde=inicio';
document.location.href=url;
}
function confirmaPedido(){ 
    if (confirm("¿Desea finalizar y confirmar su pedido?")){ 
       //parent.dchd.location.href="finpedido.asp";
	   window.open('finpedido.asp', 'dchd');
    } 
} 
function validarcantidad(cantmin, formulario) {

  if (formulario.cantidad.value.length < 1) {
    alert("El campo Cantidad no puede estar vacio ");
    formulario.cantidad1.focus();
    return (false);
	}
	else {
	 if (formulario.cantidad.value < cantmin) {
    alert("No puede pedir menos de la cantidad mínima ");
    formulario.cantidad1.focus();
    return (false);
	}
   else {
   //alert("Validación correcta");
   hacersubmitc(formulario);
   refrescar();
   return (true);
}
}
}
function validarpedidominimo(cantmin, formulario) {

	if (cantmin < 60) {
	alert("El pedido mínimo son 60 €");
	formulario.obsped.focus();
	return (false);
	}
	else{
	hacersubmitc(formulario);
	return (true);
	}
}

function validform1(formulario) {

  if (formulario.Codcli.value.length < 1) {
    alert("El campo Código Cliente no puede estar vacio ");
    formulario.Codcli.focus();
    return (false);
	}
	else {
	 if (formulario.Nomcom.value.length < 1) {
    alert("El campo Nombre Establecimiento no puede estar vacio ");
    formulario.Nomcom.focus();
    return (false);
	}
	else {
	 if (formulario.Email.value.length < 1) {
    alert("El campo Email no puede estar vacio ");
    formulario.Email.focus();
    return (false);
	}
	else {
	var checkOK = "0123456789"; 
  var checkStr = formulario.Codcli.value; 
  var allValid = true; 
  var decPoints = 0; 
  var allNum = ""; 
  for (i = 0; i < checkStr.length; i++) { 
    ch = checkStr.charAt(i); 
    for (j = 0; j < checkOK.length; j++) 
      if (ch == checkOK.charAt(j))
        break; 
    if (j == checkOK.length) { 
      allValid = false; 
      break; 
    } 
    allNum += ch; 
  } 
  if (!allValid) { 
    alert("Escriba sólo dígitos en el campo Código Cliente");
    formulario.Codcli.focus(); 
    return (false); 
  } 
  else {
   if ((formulario.Email.value.indexOf ('@', 0) == -1)||(formulario.Email.value.length < 5)) { 
    alert("Escriba una dirección de correo válida en el campo Email."); 
    return (false); 
  }
   else {
   //alert("Validación correcta");
   hacersubmitc(formulario);
  return (true);
  }
}
}
}
}
}
function validform2(formulario) {

  if (formulario.Razsoc.value.length < 1) {
    alert("El campo Razón Social no puede estar vacio ");
    formulario.Razsoc.focus();
    return (false);
	}
	else {
	 if (formulario.NifCif.value.length < 1) {
    alert("El campo Nif / Cif no puede estar vacio ");
    formulario.NifCif.focus();
    return (false);
	}
	else {
	 if (formulario.PerCon.value.length < 1) {
    alert("El campo Persona de Contacto no puede estar vacio ");
    formulario.PerCon.focus();
    return (false);
	}
	else {
	 if (formulario.Dir.value.length < 1) {
    alert("El campo Dirección no puede estar vacio ");
    formulario.Dir.focus();
    return (false);
	}
	else {
	 if (formulario.Pob.value.length < 1) {
    alert("El campo Población no puede estar vacio ");
    formulario.Pob.focus();
    return (false);
	}
	else {
	 if (formulario.Codpos.value.length < 1) {
    alert("El campo Código Postal no puede estar vacio ");
    formulario.Codpos.focus();
    return (false);
	}
	else {
	 if (formulario.Tfno.value.length < 1) {
    alert("El campo Teléfono no puede estar vacio ");
    formulario.Tfno.focus();
    return (false);
	}
	else {
	 if (formulario.Email.value.length < 1) {
    alert("El campo Email no puede estar vacio ");
    formulario.Email.focus();
    return (false);
	}
	else {
	var checkOK = "0123456789"; 
  var checkStr = formulario.Codpos.value; 
  var allValid = true; 
  var decPoints = 0; 
  var allNum = ""; 
  for (i = 0; i < checkStr.length; i++) { 
    ch = checkStr.charAt(i); 
    for (j = 0; j < checkOK.length; j++) 
      if (ch == checkOK.charAt(j))
        break; 
    if (j == checkOK.length) { 
      allValid = false; 
      break; 
    } 
    allNum += ch; 
  } 
  if (!allValid) { 
    alert("Escriba sólo dígitos en el campo Código Postal");
    formulario.Codpos.focus(); 
    return (false); 
  }
  else {
	var checkOK = "0123456789"; 
  var checkStr = formulario.Tfno.value; 
  var allValid = true; 
  var decPoints = 0; 
  var allNum = ""; 
  for (i = 0; i < checkStr.length; i++) { 
    ch = checkStr.charAt(i); 
    for (j = 0; j < checkOK.length; j++) 
      if (ch == checkOK.charAt(j))
        break; 
    if (j == checkOK.length) { 
      allValid = false; 
      break; 
    } 
    allNum += ch; 
  } 
  if (!allValid) { 
    alert("Escriba sólo dígitos en el campo Teléfono");
    formulario.Tfno.focus(); 
    return (false); 
  } 
 
  else {
	 if (formulario.Codpos.value.length != 5) {
    alert("El campo Código Postal debe tener 5 dígitos ");
    formulario.Codpos.focus();
    return (false);
	}
	 else {
	 if (formulario.Tfno.value.length < 9) {
    alert("El campo Teléfono debe tener al menos 9 dígitos ");
    formulario.Tfno.focus();
    return (false);
	}
	 else {
 	 if ((formulario.Email.value.indexOf ('@', 0) == -1)||(formulario.Email.value.length < 5)) { 
    alert("Escriba una dirección de correo válida en el campo Email."); 
	formulario.Email.focus();
    return (false); 
	}
   
   else {
   //alert("Validación correcta");
   hacersubmitc(formulario);
  return (true);
  }
 }
 }
}
}
}
}
}
}
}
}
}
}
}
<!--Valida formulario registro-->
function validform(formulario) {
  if (formulario.Nombre.value.length < 1) {
    alert("El campo Nombre no puede estar vacio ");
    formulario.Nombre.focus();
    return (false);
	}
	else {
	 if (formulario.Ape.value.length < 1) {
    alert("El campo Apellidos no puede estar vacio ");
    formulario.NifCif.focus();
    return (false);
	}
	else {
	 if (formulario.Pwd.value.length < 1) {
    alert("El campo password no puede estar vacio ");
    formulario.Pwd.focus();
    return (false);
	}
	else {
	 if (formulario.Pwd2.value.length < 1) {
    alert("El campo confirma password no puede estar vacio ");
    formulario.Pwd2.focus();
    return (false);
	}
	else {
	 if (formulario.Dir.value.length < 1) {
    alert("El campo Dirección no puede estar vacio ");
    formulario.Dir.focus();
    return (false);
	}
	else {
	 if (formulario.Pob.value.length < 1) {
    alert("El campo Población no puede estar vacio ");
    formulario.Pob.focus();
    return (false);
	}
	else {
	 if (formulario.Codpos.value.length < 1) {
    alert("El campo Código Postal no puede estar vacio ");
    formulario.Codpos.focus();
    return (false);
	}
	else {
	 if (formulario.Tfno.value.length < 1) {
    alert("El campo Teléfono no puede estar vacio ");
    formulario.Tfno.focus();
    return (false);
	}
	else {
	 if (formulario.Email.value.length < 1) {
    alert("El campo Email no puede estar vacio ");
    formulario.Email.focus();
    return (false);
	}
	else {
	var checkOK = "0123456789"; 
  var checkStr = formulario.Codpos.value; 
  var allValid = true; 
  var decPoints = 0; 
  var allNum = ""; 
  for (i = 0; i < checkStr.length; i++) { 
    ch = checkStr.charAt(i); 
    for (j = 0; j < checkOK.length; j++) 
      if (ch == checkOK.charAt(j))
        break; 
    if (j == checkOK.length) { 
      allValid = false; 
      break; 
    } 
    allNum += ch; 
  } 
  if (!allValid) { 
    alert("Escriba sólo dígitos en el campo Código Postal");
    formulario.Codpos.focus(); 
    return (false); 
  }
  else {
	var checkOK = "0123456789"; 
  var checkStr = formulario.Tfno.value; 
  var allValid = true; 
  var decPoints = 0; 
  var allNum = ""; 
  for (i = 0; i < checkStr.length; i++) { 
    ch = checkStr.charAt(i); 
    for (j = 0; j < checkOK.length; j++) 
      if (ch == checkOK.charAt(j))
        break; 
    if (j == checkOK.length) { 
      allValid = false; 
      break; 
    } 
    allNum += ch; 
  } 
  if (!allValid) { 
    alert("Escriba sólo dígitos en el campo Teléfono");
    formulario.Tfno.focus(); 
    return (false); 
  } 
 //nuevo
 else {
  var checkOK = "0123456789"; 
  var checkStr = formulario.Fax.value; 
  var allValid = true; 
  var decPoints = 0; 
  var allNum = ""; 
  for (i = 0; i < checkStr.length; i++) { 
    ch = checkStr.charAt(i); 
    for (j = 0; j < checkOK.length; j++) 
      if (ch == checkOK.charAt(j))
        break; 
    if (j == checkOK.length) { 
      allValid = false; 
      break; 
    } 
    allNum += ch; 
  } 
  if (!allValid && formulario.Fax.value.length > 0) { 
    alert("Escriba sólo dígitos en el campo Fax");
    formulario.Fax.focus(); 
    return (false); 
  }
  else {
  var checkOK = "0123456789"; 
  var checkStr = formulario.Mov1.value; 
  var allValid = true; 
  var decPoints = 0; 
  var allNum = ""; 
  for (i = 0; i < checkStr.length; i++) { 
    ch = checkStr.charAt(i); 
    for (j = 0; j < checkOK.length; j++) 
      if (ch == checkOK.charAt(j))
        break; 
    if (j == checkOK.length) { 
      allValid = false; 
      break; 
    } 
    allNum += ch; 
  } 
  if (!allValid && formulario.Mov1.value.length > 0) { 
    alert("Escriba sólo dígitos en el campo Movil 1");
    formulario.Mov1.focus(); 
    return (false); 
  }
  else {
  var checkOK = "0123456789"; 
  var checkStr = formulario.Mov2.value; 
  var allValid = true; 
  var decPoints = 0; 
  var allNum = ""; 
  for (i = 0; i < checkStr.length; i++) { 
    ch = checkStr.charAt(i); 
    for (j = 0; j < checkOK.length; j++) 
      if (ch == checkOK.charAt(j))
        break; 
    if (j == checkOK.length) { 
      allValid = false; 
      break; 
    } 
    allNum += ch; 
  } 
  if (!allValid && formulario.Mov2.value.length > 0) { 
    alert("Escriba sólo dígitos en el campo Movil 2");
    formulario.Mov2.focus(); 
    return (false); 
  }
 //fin nuevo
  else {
	 if (formulario.Codpos.value.length != 5) {
    alert("El campo Código Postal debe tener 5 dígitos");
    formulario.Codpos.focus();
    return (false);
	}
	 else {
	 if (formulario.Tfno.value.length < 9) {
    alert("El campo Teléfono debe tener al menos 9 dígitos ");
    formulario.Tfno.focus();
    return (false);
	}
	//nuevo
	 else {
	 if (formulario.Fax.value.length > 0 && formulario.Fax.value.length < 9) {
	alert("El campo Fax debe tener al menos 9 dígitos ");
    formulario.Fax.focus();
    return (false);
	}
	 else {
	 if (formulario.Mov1.value.length > 0 && formulario.Mov1.value.length < 9) {
	alert("El campo Movil 1 debe tener al menos 9 dígitos ");
    formulario.Mov1.focus();
    return (false);
	}
	 else {
	 if (formulario.Mov2.value.length > 0 && formulario.Mov2.value.length < 9) {
	alert("El campo Movil 2 debe tener al menos 9 dígitos ");
    formulario.Mov2.focus();
    return (false);
	}
	//fin nuevo
	 else {
 	 if ((formulario.Email.value.indexOf ('@', 0) == -1)||(formulario.Email.value.length < 5)) { 
    alert("Escriba una dirección de correo válida en el campo Email."); 
	formulario.Email.focus();
    return (false); 
	}
   else {
	 if (formulario.Pwd.value != formulario.Pwd2.value) {
    alert("El campo Password no coincide con el campo confirma Password.");
    formulario.Pwd.focus();
    return (false);
	}
   else {
   //alert("Validación correcta");
   formulario.Pwd.value=hex_md5(formulario.Pwd.value); 
   hacersubmitc(formulario);
   return (true);
  }
 }
 }
	 }
	 }
	 }
	 }
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
<!-- fin Carlos(Gaya) -->

<!-- inicio menus desplegables -->
		function over(cambia,nombre){
			var btn = document.getElementById(nombre);		
		}
	
		function toggleTable(el) {
			var myelement = document.getElementById(el); 
			
			if( !myelement.style.display || myelement.style.display == "none" ) { 
				myelement.style.display="block";
				
			} else { 
				myelement.style.display = "none";
				
			}
		} 	
<!-- fin menus desplegables -->
<!--Inicio encriptacion-->
/*
 * A JavaScript implementation of the RSA Data Security, Inc. MD5 Message
 * Digest Algorithm, as defined in RFC 1321.
 * Version 2.1 Copyright (C) Paul Johnston 1999 - 2002.
 * Other contributors: Greg Holt, Andrew Kepert, Ydnar, Lostinet
 * Distributed under the BSD License
 * See http://pajhome.org.uk/crypt/md5 for more info.
 */

/*
 * Configurable variables. You may need to tweak these to be compatible with
 * the server-side, but the defaults work in most cases.
 */
var hexcase = 0;  /* hex output format. 0 - lowercase; 1 - uppercase        */
var b64pad  = ""; /* base-64 pad character. "=" for strict RFC compliance   */
var chrsz   = 8;  /* bits per input character. 8 - ASCII; 16 - Unicode      */

/*
 * These are the functions you'll usually want to call
 * They take string arguments and return either hex or base-64 encoded strings
 */
function hex_md5(s){ return binl2hex(core_md5(str2binl(s), s.length * chrsz));}
function b64_md5(s){ return binl2b64(core_md5(str2binl(s), s.length * chrsz));}
function str_md5(s){ return binl2str(core_md5(str2binl(s), s.length * chrsz));}
function hex_hmac_md5(key, data) { return binl2hex(core_hmac_md5(key, data)); }
function b64_hmac_md5(key, data) { return binl2b64(core_hmac_md5(key, data)); }
function str_hmac_md5(key, data) { return binl2str(core_hmac_md5(key, data)); }

/*
 * Perform a simple self-test to see if the VM is working
 */
function md5_vm_test()
{
  return hex_md5("abc") == "900150983cd24fb0d6963f7d28e17f72";
}

/*
 * Calculate the MD5 of an array of little-endian words, and a bit length
 */
function core_md5(x, len)
{
  /* append padding */
  x[len >> 5] |= 0x80 << ((len) % 32);
  x[(((len + 64) >>> 9) << 4) + 14] = len;

  var a =  1732584193;
  var b = -271733879;
  var c = -1732584194;
  var d =  271733878;

  for(var i = 0; i < x.length; i += 16)
  {
    var olda = a;
    var oldb = b;
    var oldc = c;
    var oldd = d;

    a = md5_ff(a, b, c, d, x[i+ 0], 7 , -680876936);
    d = md5_ff(d, a, b, c, x[i+ 1], 12, -389564586);
    c = md5_ff(c, d, a, b, x[i+ 2], 17,  606105819);
    b = md5_ff(b, c, d, a, x[i+ 3], 22, -1044525330);
    a = md5_ff(a, b, c, d, x[i+ 4], 7 , -176418897);
    d = md5_ff(d, a, b, c, x[i+ 5], 12,  1200080426);
    c = md5_ff(c, d, a, b, x[i+ 6], 17, -1473231341);
    b = md5_ff(b, c, d, a, x[i+ 7], 22, -45705983);
    a = md5_ff(a, b, c, d, x[i+ 8], 7 ,  1770035416);
    d = md5_ff(d, a, b, c, x[i+ 9], 12, -1958414417);
    c = md5_ff(c, d, a, b, x[i+10], 17, -42063);
    b = md5_ff(b, c, d, a, x[i+11], 22, -1990404162);
    a = md5_ff(a, b, c, d, x[i+12], 7 ,  1804603682);
    d = md5_ff(d, a, b, c, x[i+13], 12, -40341101);
    c = md5_ff(c, d, a, b, x[i+14], 17, -1502002290);
    b = md5_ff(b, c, d, a, x[i+15], 22,  1236535329);

    a = md5_gg(a, b, c, d, x[i+ 1], 5 , -165796510);
    d = md5_gg(d, a, b, c, x[i+ 6], 9 , -1069501632);
    c = md5_gg(c, d, a, b, x[i+11], 14,  643717713);
    b = md5_gg(b, c, d, a, x[i+ 0], 20, -373897302);
    a = md5_gg(a, b, c, d, x[i+ 5], 5 , -701558691);
    d = md5_gg(d, a, b, c, x[i+10], 9 ,  38016083);
    c = md5_gg(c, d, a, b, x[i+15], 14, -660478335);
    b = md5_gg(b, c, d, a, x[i+ 4], 20, -405537848);
    a = md5_gg(a, b, c, d, x[i+ 9], 5 ,  568446438);
    d = md5_gg(d, a, b, c, x[i+14], 9 , -1019803690);
    c = md5_gg(c, d, a, b, x[i+ 3], 14, -187363961);
    b = md5_gg(b, c, d, a, x[i+ 8], 20,  1163531501);
    a = md5_gg(a, b, c, d, x[i+13], 5 , -1444681467);
    d = md5_gg(d, a, b, c, x[i+ 2], 9 , -51403784);
    c = md5_gg(c, d, a, b, x[i+ 7], 14,  1735328473);
    b = md5_gg(b, c, d, a, x[i+12], 20, -1926607734);

    a = md5_hh(a, b, c, d, x[i+ 5], 4 , -378558);
    d = md5_hh(d, a, b, c, x[i+ 8], 11, -2022574463);
    c = md5_hh(c, d, a, b, x[i+11], 16,  1839030562);
    b = md5_hh(b, c, d, a, x[i+14], 23, -35309556);
    a = md5_hh(a, b, c, d, x[i+ 1], 4 , -1530992060);
    d = md5_hh(d, a, b, c, x[i+ 4], 11,  1272893353);
    c = md5_hh(c, d, a, b, x[i+ 7], 16, -155497632);
    b = md5_hh(b, c, d, a, x[i+10], 23, -1094730640);
    a = md5_hh(a, b, c, d, x[i+13], 4 ,  681279174);
    d = md5_hh(d, a, b, c, x[i+ 0], 11, -358537222);
    c = md5_hh(c, d, a, b, x[i+ 3], 16, -722521979);
    b = md5_hh(b, c, d, a, x[i+ 6], 23,  76029189);
    a = md5_hh(a, b, c, d, x[i+ 9], 4 , -640364487);
    d = md5_hh(d, a, b, c, x[i+12], 11, -421815835);
    c = md5_hh(c, d, a, b, x[i+15], 16,  530742520);
    b = md5_hh(b, c, d, a, x[i+ 2], 23, -995338651);

    a = md5_ii(a, b, c, d, x[i+ 0], 6 , -198630844);
    d = md5_ii(d, a, b, c, x[i+ 7], 10,  1126891415);
    c = md5_ii(c, d, a, b, x[i+14], 15, -1416354905);
    b = md5_ii(b, c, d, a, x[i+ 5], 21, -57434055);
    a = md5_ii(a, b, c, d, x[i+12], 6 ,  1700485571);
    d = md5_ii(d, a, b, c, x[i+ 3], 10, -1894986606);
    c = md5_ii(c, d, a, b, x[i+10], 15, -1051523);
    b = md5_ii(b, c, d, a, x[i+ 1], 21, -2054922799);
    a = md5_ii(a, b, c, d, x[i+ 8], 6 ,  1873313359);
    d = md5_ii(d, a, b, c, x[i+15], 10, -30611744);
    c = md5_ii(c, d, a, b, x[i+ 6], 15, -1560198380);
    b = md5_ii(b, c, d, a, x[i+13], 21,  1309151649);
    a = md5_ii(a, b, c, d, x[i+ 4], 6 , -145523070);
    d = md5_ii(d, a, b, c, x[i+11], 10, -1120210379);
    c = md5_ii(c, d, a, b, x[i+ 2], 15,  718787259);
    b = md5_ii(b, c, d, a, x[i+ 9], 21, -343485551);

    a = safe_add(a, olda);
    b = safe_add(b, oldb);
    c = safe_add(c, oldc);
    d = safe_add(d, oldd);
  }
  return Array(a, b, c, d);

}

/*
 * These functions implement the four basic operations the algorithm uses.
 */
function md5_cmn(q, a, b, x, s, t)
{
  return safe_add(bit_rol(safe_add(safe_add(a, q), safe_add(x, t)), s),b);
}
function md5_ff(a, b, c, d, x, s, t)
{
  return md5_cmn((b & c) | ((~b) & d), a, b, x, s, t);
}
function md5_gg(a, b, c, d, x, s, t)
{
  return md5_cmn((b & d) | (c & (~d)), a, b, x, s, t);
}
function md5_hh(a, b, c, d, x, s, t)
{
  return md5_cmn(b ^ c ^ d, a, b, x, s, t);
}
function md5_ii(a, b, c, d, x, s, t)
{
  return md5_cmn(c ^ (b | (~d)), a, b, x, s, t);
}

/*
 * Calculate the HMAC-MD5, of a key and some data
 */
function core_hmac_md5(key, data)
{
  var bkey = str2binl(key);
  if(bkey.length > 16) bkey = core_md5(bkey, key.length * chrsz);

  var ipad = Array(16), opad = Array(16);
  for(var i = 0; i < 16; i++)
  {
    ipad[i] = bkey[i] ^ 0x36363636;
    opad[i] = bkey[i] ^ 0x5C5C5C5C;
  }

  var hash = core_md5(ipad.concat(str2binl(data)), 512 + data.length * chrsz);
  return core_md5(opad.concat(hash), 512 + 128);
}

/*
 * Add integers, wrapping at 2^32. This uses 16-bit operations internally
 * to work around bugs in some JS interpreters.
 */
function safe_add(x, y)
{
  var lsw = (x & 0xFFFF) + (y & 0xFFFF);
  var msw = (x >> 16) + (y >> 16) + (lsw >> 16);
  return (msw << 16) | (lsw & 0xFFFF);
}

/*
 * Bitwise rotate a 32-bit number to the left.
 */
function bit_rol(num, cnt)
{
  return (num << cnt) | (num >>> (32 - cnt));
}

/*
 * Convert a string to an array of little-endian words
 * If chrsz is ASCII, characters >255 have their hi-byte silently ignored.
 */
function str2binl(str)
{
  var bin = Array();
  var mask = (1 << chrsz) - 1;
  for(var i = 0; i < str.length * chrsz; i += chrsz)
    bin[i>>5] |= (str.charCodeAt(i / chrsz) & mask) << (i%32);
  return bin;
}

/*
 * Convert an array of little-endian words to a string
 */
function binl2str(bin)
{
  var str = "";
  var mask = (1 << chrsz) - 1;
  for(var i = 0; i < bin.length * 32; i += chrsz)
    str += String.fromCharCode((bin[i>>5] >>> (i % 32)) & mask);
  return str;
}

/*
 * Convert an array of little-endian words to a hex string.
 */
function binl2hex(binarray)
{
  var hex_tab = hexcase ? "0123456789ABCDEF" : "0123456789abcdef";
  var str = "";
  for(var i = 0; i < binarray.length * 4; i++)
  {
    str += hex_tab.charAt((binarray[i>>2] >> ((i%4)*8+4)) & 0xF) +
           hex_tab.charAt((binarray[i>>2] >> ((i%4)*8  )) & 0xF);
  }
  return str;
}

/*
 * Convert an array of little-endian words to a base-64 string
 */
function binl2b64(binarray)
{
  var tab = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
  var str = "";
  for(var i = 0; i < binarray.length * 4; i += 3)
  {
    var triplet = (((binarray[i   >> 2] >> 8 * ( i   %4)) & 0xFF) << 16)
                | (((binarray[i+1 >> 2] >> 8 * ((i+1)%4)) & 0xFF) << 8 )
                |  ((binarray[i+2 >> 2] >> 8 * ((i+2)%4)) & 0xFF);
    for(var j = 0; j < 4; j++)
    {
      if(i * 8 + j * 6 > binarray.length * 32) str += b64pad;
      else str += tab.charAt((triplet >> 6*(3-j)) & 0x3F);
    }
  }
  return str;
}

<!--Fin encriptacion-->