function inicio(num) {
  stofind = "aisms.com"; // Directorio Raíz, puede ser "dominio.com"
  baseurl = "";
  getBaseUrl();
  maxbt = 8;

  txt = new Array();  // Identificadores para botones
  nom = new Array();  // Nombre de cada sección
  lnk = new Array();  // Páginas de destino
  dim = new Array();  // Dimensiones de los botones

  txt[1] = "ini";
  txt[2] = "int";
  txt[3] = "adm";
  txt[4] = "com";
  txt[5] = "dsg";
  txt[6] = "pub";
  txt[7] = "nos";
  txt[8] = "con";

  nom[1] = "Inicio";
  nom[2] = "Internet";
  nom[3] = "Asesoría";
  nom[4] = "Computación";
  nom[5] = "Diseño Gráfico";
  nom[6] = "Publicidad";
  nom[7] = "Nosotros";
  nom[8] = "Contáctenos";

  lnk[1] = baseurl + "index.htm";
  lnk[2] = baseurl + "internet/index.htm";
  lnk[3] = baseurl + "asesoria.html";
  lnk[4] = baseurl + "computacion/index.htm";
  lnk[5] = baseurl + "diseno.html";
  lnk[6] = baseurl + "publicidad.html";
  lnk[7] = baseurl + "nosotros.html";
  lnk[8] = baseurl + "contacto.html";

  imgn = new Array();
  imgp = new Array();
  for (i=1; i<=maxbt; i++) {
    imgn[i] = new Image();
    if(i==num) {
      imgn[i].src = baseurl + "images/bta_" + txt[i] + ".gif";
    } else {
      imgn[i].src = baseurl + "images/btn_" + txt[i] + ".gif";
    }
    imgp[i] = new Image();
    imgp[i].src = baseurl + "images/btp_" + txt[i] + ".gif";
  }
}

function doSup() {
  document.writeln('<a name="arriba"></a><table border=0 cellspacing=0 cellpadding=0 width=740>');
  document.writeln('<tr><td width=363><img src="' + baseurl + 'images/_supizq.gif" width=363 height=130></td>');
  document.writeln('<td width=284><table border=0 cellspacing=0 cellpadding=0 width=284>');
  document.writeln('<tr><td width=284><img src="' + baseurl + 'images/_supcn1.gif" width=284 height=17></td></tr>');
  document.write('<tr><td width=284 background="' + baseurl + 'images/_supcn2.gif">');

  doCen();

  document.write('</td></tr></table></td>');
  document.writeln('<td width=93><img src="' + baseurl + 'images/_supder.gif" width=93 height=130></td></tr></table>');

}

function doNav(num) {
  document.writeln('<img src="' + baseurl + 'images/_mensup.gif"><br>');
  document.writeln('<table border=0 cellpadding=0 cellspacing=0 width=200>');
  document.writeln('<tr><td><img src="' + baseurl + 'images/_menizq.gif" width=40 height=220></td>');
  document.write('<td><img src="' + baseurl + 'images/bt_sup.gif" width=160 height=20><br>');

// ####### Crear barra de navegación

  for (j=1; j<=maxbt; j++) {
    document.write('<a href="' + lnk[j]+ '" onMouseOver="changeImages(' + "'" + txt[j] + "','" + imgp[j].src + "')" + '" onMouseOut="changeImages(' + "'" + txt[j] + "','" + imgn[j].src + "')" +'">');
    if(j==num) {
      document.write('<img src="' + baseurl + 'images/bta_' + txt[j] + '.gif" name=' + txt[j] + ' width=160 height=22 border=0></a><br>');
    } else {
      document.write('<img src="' + baseurl + 'images/btn_' + txt[j] + '.gif" name=' + txt[j] + ' width=160 height=22 border=0></a><br>');
    }
  } // #### for j
  document.write('<img src="' + baseurl + 'images/bt_inf.gif" width=160 height=24></td></tr>');
  document.write('</table></td>');
}


// ########## Acceso al webmail

function doCen() {
  document.writeln('<table border=0 cellspacing=0 cellpadding=0 width=284>');
  document.writeln('<tr><td><img src="' + baseurl + 'images/webmail.gif" width=60 height=113></td>');
  document.writeln('<td align=center><table border=0 cellspacing=0 cellpadding=1>');
  document.writeln('<tr><td colspan=2 align=center><font face=tahoma size=1 class=f8 color=#ffcc00><b>Sólo clientes Hospedaje Web</b><br>con panel de control <b>CPanel</b></font></td></tr>');
  document.writeln('<form name="form1"><tr><td align=right><font face=tahoma size=1 class=f8 color=#ffffff>Correo: </font></td>');
  document.writeln('<td><input type=text name=correo size=20 class=rolldn></td></tr>');
  document.writeln('<tr><td align=right><font face=tahoma size=1 class=f8 color=#ffffff>Password: </font></td>');
  document.writeln('<td><input type=password name=clave size=20 class=rolldn></td></tr></form>');
  document.writeln('<form name=login method=post target=_blank action="https://" onSubmit="return verifica();">');
  document.writeln('<tr><td colspan=2 align=center><input type=hidden name=user value=""><input type=hidden name=pass value=""><input type=submit value="Entrar" class="boton"></td>');
  document.writeln('</tr></form></table></td></tr></table>');

}

function verifica() {
  errortx="";
  dominio="";
  with (document.form1) {
    correo1=correo.value;
    clave1=clave.value;
  }
  arroba=correo1.indexOf('@');
  if (arroba<2 || correo1.length==0) {
    errortx="» Cuenta de correo inválida\n";
  } else {
    document.login.user.value=correo1;
    dominio=correo1.substring(arroba+1,correo1.length);
    if (dominio.indexOf('.')<2) {
      errortx="» Cuenta de correo inválida";
    }
  } // endif arroba<2
  if (clave1.length==0) {
      errortx= errortx + "» El password no puede quedar en blanco\n";
  }
  document.login.pass.value=clave1;
  if (errortx.length>0) {
    alert(errortx);
    return false;
  }
  document.login.action="https://www." + dominio + ":2096/login/";
  return true;
}

function verifica2() {
  errortx="";
  dominio1="";
  with (document.fpanel) {
    correo1=usr2.value;
    dominio1=dom2.value;
    clave1=pas2.value;
  }
  if (correo1.length==0) {
    errortx="» El usuario no puede quedar en blanco\n";
  }
  if (dominio1.indexOf('.')<2) {
    errortx= errortx + "» Dominio inválido\n";
  }
  if (clave1.length==0) {
      errortx= errortx + "» El password no puede quedar en blanco\n";
  }
  if (errortx.length>0) {
    alert(errortx);
    return false;
  }
  document.login2.user.value=correo1;
  document.login2.pass.value=clave1;
  document.login2.action="https://www." + dominio1 + ":2083/login/";
  return true;
}

function doMenu(num) {
  document.writeln('<font face=tahoma size=1 class="f8"><b>');
  for (i=1; i<=maxbt; i++) {
    if(i==4) {
      vartmp=0;
      // no hacer nada
    } else {
      if(i==num) {
        document.writeln('«<a href=' + lnk[i] + '><font color=#555555>' + nom[i] + '</font></a>»');
      } else {
        document.writeln('[<a href=' + lnk[i] + '>' + nom[i] + '</a>]');
      }
    }
  }
  document.writeln('</b></font>');
}

function doAnt() {
  document.writeln('<table border=0 cellspacing=0 cellpadding=5 width=100%>');
  document.writeln('<tr><td><font face=tahoma size=1 class=f8><b>[<a href="javascript:history.back();">Página anterior</a>]<b></font></td>');
  document.writeln('<td align=right><font face=tahoma size=1 class=f8><b>[<a href="#arriba">Subir</a>]<b></font></td></tr></table>');
}

function changeImages() {
  if (document.images) {
    document[changeImages.arguments[0]].src = changeImages.arguments[1];
  }
}

function getBaseUrl() {
  igual=1;
  docpath=document.location.pathname;
  x=docpath.indexOf(stofind);
  for (i=0; i< stofind.length; i++) {
    if (docpath.substring(x+i,x+i+1) == stofind.substring(i,i+1)) { x=x;
    } else { igual=0; }
  }
  if (igual == 0) {
    baseurl="http://www.aisms.com/";
    return;
  }
  docname=docpath.substring(x+stofind.length,document.location.pathname.length);
  stofind="/";
  x=docname.indexOf(stofind);
  if (x<0) { 
     stofind="\\";
     x=docname.indexOf(stofind);
  }
  docname=docname.substring(x+1, docname.length);
  baseurl="";
  x=docname.indexOf(stofind);
  while (x >= 0) {
    x=docname.indexOf(stofind);
    if( x>=0) {
      docname=docname.substring(x+1, docname.length);
      baseurl= baseurl + "../";
    }
  }
//  alert(baseurl + ' ' + docname);
}


function doBusca() {
  document.writeln('<table border=0 cellspacing=0 cellpadding=0>');
  document.writeln('<form method=post action="/cgi-bin/search/search.cgi">');
  document.writeln('<tr><td width=10><img src="' + baseurl + 'images/_busizq.gif" width=10 height=27></td>');
  document.writeln('<td background="' + baseurl + 'images/_buscen.gif"><table border=0 cellspacing=0 cellpadding=0>');
  document.writeln('<tr><td><font face=tahoma size=1 color=#000088 class=f8><b>Buscar</b></font></td>');
  document.writeln('<td><img src="' + baseurl + 'images/nada.gif" width=5 height=5></td>');
  document.writeln('<td><SELECT NAME="Match" class="rolldn"><OPTION VALUE="0">Cualquier</option>');
  document.writeln('<OPTION VALUE="1">Todas</option></SELECT></td>');
  document.writeln('<td><img src="' + baseurl + 'images/nada.gif" width=10 height=5></td>');
  document.writeln('<td><font face=tahoma size=1 color=#000088 class=f8><b>palabra(s)</b></font></td>');
  document.writeln('<td><img src="' + baseurl + 'images/nada.gif" width=5 height=5></td>');
  document.writeln('<td><input type=hidden name=Realm value=aisms><input type=text name=terms size=20 class="rolldn"></td>');
  document.writeln('<td><img src="' + baseurl + 'images/nada.gif" width=10 height=5></td>');
  document.writeln('<td><input type=submit name=submit value=Buscar class="boton"></td></tr></table></td>');
  document.writeln('<td width=10><img src="' + baseurl + 'images/_busder.gif" width=10 height=27></td></tr></form></table>');
}

function banner() {
  fecha  = new Date();
  dosmil = new Date("1-1-2000");
  calc  = Math.round(fecha.getTime()/1060);
  calc1 = Math.round(dosmil.getTime()/1060);
  calc  = calc - calc1;
  trans = calc;
  document.write('<a href="http://www.aisms.com/cgi-bin/ads/ads.cgi?redirect=yes&ssi=no"><img ');
  document.write('src="http://www.aisms.com/cgi-bin/ads/ads.cgi?ssi=no&trid=' + trans +'" width=468 height=60 border=1></a>');
}