// © 2003 Hector Fernandez Pereda, por supuesto
var ur=new Array();
var tx=new Array();
var npag=14; //las primeras paginas son de teoria

ur[0]="index.html";
ur[1]="intro.html";
ur[2]="hipotesisinicialenergia.html";
ur[3]="generador_infinito_ley_fundamental_conservacion_energia.html";
ur[4]="disipadores_rozamiento.html";
ur[5]="generador_energia_electrica_estatico.html";
ur[6]="generador_energia_electrica_estatico_2.html";
ur[7]="convertidor_coler.html";
ur[8]="turbina_electrica.html";
ur[9]="generador_energia_electrica_contrarrotatorio.html";
ur[10]="generador_energia_electrica_hibrido.html";
ur[11]="construir_generador_ilimitado_sencillo.html";
ur[12]="generador_hidraulico_fuente_energia.html";
ur[13]="sistema_hidraulico_generador_energia.html";
ur[14]="otras_aplicaciones_investigaciones.html";
ur[15]="#";
ur[16]="http://usuarios.lycos.es/mycapo/foro_energia_gratis/";
ur[17]="enlaces_energia_electrica_gratis.html";
ur[18]="enlaza_energia_ilimitada.html";
ur[19]="#";

tx[0]="Inicio Energía";
tx[1]="Introducción";
tx[2]="Hipotesis Inicial";
tx[3]="1er Generador Infinito";
tx[4]="Disipadores Rozamiento";
tx[5]="Generador Estático";
tx[6]="Hector-Tesla";
tx[7]="Hans Coler";
tx[8]="Turbina Eléctrica";
tx[9]="Gen.Contrarrotatorio";
tx[10]="Generador Híbrido";
tx[11]="Construye tu Generador";
tx[12]="Generador Hidráulico 1";
tx[13]="Generador Hidráulico 2";
tx[14]="Otras aplicaciones";
tx[15]="-----------------------------------";
tx[16]="Foro Energía";
tx[17]="Enlaces Energía";
tx[18]="Enlázanos";
tx[19]="";

var pactual=buscapag();

function buscapag() {
var re=/\57/;
var p1 = new Array();
var xpag = new String('');
var i;
p1=document.location.href.split(re);
xpag=p1[p1.length-1]
for (i=0;i<=ur.length-1;i++)
{
  if (xpag==ur[ i])
  {
  return i;
  }
}
return 0; //si no lo encuentra
}