<!-- Marcado múltiple de casillas checkbox -------------------------------------------------------------

function marcaEfectos(campo,actual,total) {
	total = total * 1;
	actual = actual * 1;
	if (total > 0) {
		for (i = 1; i < total+1; i++) {
			destino = eval('document.form1.' + campo + i + '_' + actual);
			origen = eval('document.form1.' + campo + '0' + '_' + actual);
			if (origen.checked) {
				destino.checked = true;
			} else {
				destino.checked = false;
			}
		}
	}
}

<!-- Marcado múltiple de casillas checkbox -------------------------------------------------------------

function marcaBorrar(campo1,campo2,total) {
	total = eval(total);
	if ((campo2.length > 1) && (campo2.length < (total+1))) {  // de 2 a 'total' celdas, siempre más de 1 elementos
		if (campo1.checked) {
			for (i = 0; i < campo2.length; i++) { campo2[i].checked = true; comprueba(campo2[i]); } } else {
				for (i = 0; i < campo2.length; i++) { campo2[i].checked = false; comprueba(campo2[i]); } } }
		else if (campo2.length = 1) { if (campo1.checked) { campo2.checked = true; comprueba(campo2); } else { campo2.checked = false; comprueba(campo2); } }
}

<!-- Iguala combos  ---------------------------------------------------------------------------------- 
function igualaTamanos(campo,total) {
	total = eval(total);
	if (total > 0) {
		for (i = 1; i < total+1; i++) {
			destino = eval('document.form1.' + campo + i);
			origen = eval('document.form1.' + campo + '0');
			destino.selectedIndex = origen.selectedIndex ;
		}
	}
}


<!-- Iguala celdas  ---------------------------------------------------------------------------------- 
function igualaUds(campo,total) {
	total = eval(total);
	if (total > 0) {
		for (i = 1; i < total+1; i++) {
			destino = eval('document.form1.' + campo + i);
			origen = eval('document.form1.' + campo + '0');
			destino.value = origen.value ;
		}
	}
}

<!-- Sombreado de celdas. Requiere este css para inicializar el color de celda: tr.h { background-color: #F7F7F7; }

function comprueba(casilla) {	// comprueba si está marcada la casilla
  if (casilla.checked) sombrea(casilla);
  else  desSombrea(casilla);
}

ie = document.all?1:0

function sombrea(celda){
  if (ie) { while (celda.tagName!="TR") { celda=celda.parentElement; } }
  else { while (celda.tagName!="TR") { celda=celda.parentNode; } }
  celda.className = "H";
  }

function desSombrea(celda){
  if (ie) { while (celda.tagName!="TR") { celda=celda.parentElement; } }
  else { while (celda.tagName!="TR") { celda=celda.parentNode; } }
  celda.className = "";
  } 

<!-- Activa los estilos CSS ---------------------------------------------------------------------------
function fontsizeup() {
  active = getActiveStyleSheet();
  switch (active) {
    case 'Default' : 
      setActiveStyleSheet('Large');
      break;
    case 'Large' :
      break;
    default :
      setActiveStyleSheet('Default');
      break;
  }
}

function fontsizedown() {
  active = getActiveStyleSheet();
  switch (active) {
    case 'Large' : 
      setActiveStyleSheet('Default');
      break;
    case 'Default' : 
       break;
    default :
      setActiveStyleSheet('Default');
      break;
  }
}

function setActiveStyleSheet(title) {
  var i, a, main;
  for(i=0; (a = document.getElementsByTagName("link")[i]); i++) {
    if(a.getAttribute("rel").indexOf("style") != -1 && a.getAttribute("title")) {
      a.disabled = true;
      if(a.getAttribute("title") == title) a.disabled = false;
    }
  }
}

function getActiveStyleSheet() {
  var i, a;
  for(i=0; (a = document.getElementsByTagName("link")[i]); i++) {
    if(a.getAttribute("rel").indexOf("style") != -1 && a.getAttribute("title") && !a.disabled) return a.getAttribute("title");
  }
  return null;
}

function getPreferredStyleSheet() {
  return ('Default');
}

function createCookie(name,value,days) {
  if (days) {
    var date = new Date();
    date.setTime(date.getTime()+(days*24*60*60*1000));
    var expires = "; expires="+date.toGMTString();
  }
  else expires = "";
  document.cookie = name+"="+value+expires+"; path=/";
}

function readCookie(name) {
  var nameEQ = name + "=";
  var ca = document.cookie.split(';');
  for(var i=0;i < ca.length;i++) {
    var c = ca[i];
    while (c.charAt(0)==' ') c = c.substring(1,c.length);
    if (c.indexOf(nameEQ) == 0) return c.substring(nameEQ.length,c.length);
  }
  return null;
}

function initFontScaler() {
  var cookie = readCookie("style");
  var title = cookie ? cookie : getPreferredStyleSheet();
  setActiveStyleSheet(title);
}

window.onunload = function(e) {
  var title = getActiveStyleSheet();
  createCookie("style", title, 365);
}

var cookie = readCookie("style");
var title = cookie ? cookie : getPreferredStyleSheet();
if (title == 'null') {
  title = getPreferredStyleSheet();
}

setActiveStyleSheet(title);

<!-- Otras funciones de MM ----------------------------------------------------------------------------

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];}
}

function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}

// ------------------------------------------------------------------------------------------ -->