function iniMenu(currentcat) {
  sepsec = new Array();
  sephtm = new Array();
  sepimg = new Array();

  maxCat=7;

  ctrl = new Array();
  ctrl[1] = "cem";  // CEM
  ctrl[2] = "col";  // Colloidal Dynamics
  ctrl[3] = "hun";  // HunterLab
  ctrl[4] = "iqs";  // IQ Scientific
  ctrl[5] = "lov";  // Lovibond
  ctrl[6] = "sar";  // Sartorius
  ctrl[7] = "the";  // Thermo

  cats = new Array();
  cats["bec"] = "beckmancoulter.gif:beckman000.htm;Beckman Coulter";
  cats["cem"] = "cem.gif:cem000.htm;CEM";
  cats["col"] = "colloidal.gif:colloidal000.htm;Colloidal<br>&nbsp;&nbsp;&nbsp;&nbsp;Dynamics";
  cats["hun"] = "hunterlab.gif:hunter000.htm;HunterLab";
  cats["iqs"] = "iqslogo.gif:iqs000.htm;IQ Scientific";
  cats["lov"] = "lovibond.gif:lovibond000.htm;Lovibond";
  cats["sar"] = "sartorius.gif:sartorius000.htm;Sartorius";
  cats["the"] = "thermo.gif:thermo000.htm;Thermo<br>&nbsp;&nbsp;&nbsp;&nbsp;Electron Corp.";

  separa();	// Separa todos los parámetros

  if (!(currentcat > 0)) {
    for (ct=1; ct <= maxCat; ct++) {
      if (currentcat == ctrl[ct]) {
        currentcat = ct;
      }
    }
  }

  document.writeln('<table border=0 cellspaccing=3 cellpadding=1 width=100%>');

  if (currentcat > 0) {
    document.writeln('<tr><td width=100% align=center>');
    document.writeln('<a href="' + sephtm[currentcat] + '"><img src="logos/' + sepimg[currentcat] + '" border=0></a></td></tr>');
  }

  document.writeln('<tr><td width=100% align=center background="../images/fclaro.gif">');
  document.writeln('<font face=Verdana size=1 class=f8><b>Otras marcas:</b></font></td></tr>');
  document.writeln('<tr><td><font face=Verdana size=1 class=f8><b>');

  for (dmi=1; dmi<=maxCat; dmi++) {
    if (dmi == currentcat) {
      currentcat=currentcat;
    } else {
      document.writeln('» <a href="' + sephtm[dmi] + '">' + sepsec[dmi] + '</a><br>');
    }
  }

  document.writeln('</b></font></td></tr></table><img src="../images/nada.gif" width=120 height=1>');
  doCalib();
}

function separa() {
  for (sp1=1; sp1<=maxCat; sp1++) {
    cadena=eval('cats["' + ctrl[sp1] + '"]');
    syy=cadena.indexOf(":");
    sepimg[sp1] = cadena.substring(0,syy);			// Obtener imagen
    cadena = cadena.substring(syy+1,cadena.length);
    syy=cadena.indexOf(";");
    sephtm[sp1] = cadena.substring(0,syy);			// Obtener documento html
    sepsec[sp1] = cadena.substring(syy+1,cadena.length);	// Obtener Marca
  }
}

function doCalib() {
  document.writeln('<p align=center><font face=verdana size=1 class=f8><b>Visite también:</b></font><br>');
  document.writeln('<a href="../calibraciones/index.htm"><img src="../calibraciones/images/logocalibra.gif" width="100"');
  document.writeln('height="71" border=0><br>');
  document.writeln('<font face=arial size=2 class=f10><b>ISASA Calibraciones,<br>');
  document.writeln('S.A. de C.V.</b></font></a></p>');
}