function abre1() {
	 open('http://bionet.virtualmedia.es/')
}


function abre(referencia) {
	 open('http://bionet.virtualmedia.es/usuarios/astrologie1/numerologia/interpretacion.asp?numero=' + referencia ,'','width=430,height=480,status=no,toolbar=no,scrollbars=yes,menubar=no,screenX=100,screenY=30')
}


function makeArray() {
  var args = makeArray.arguments;
  for (var i = 0; i < args.length; i++) {
    this[i] = args[i];
  }
  this.length = args.length;
}


function fixDate(date) {
  var base = new Date(0);
  var skew = base.getTime();
  if (skew > 0)
    date.setTime(date.getTime() - skew);
}


function getString(date) {
  var months = new Array("Enero", "Febrero", "Marzo", "Abril", "Mayo", "Junio", "Julio", "Agosto", "Septiembre", "Octubre", "Noviembre", "Diciembre");
  return date.getDate() + " de " + months[date.getMonth()] + " de " + date.getFullYear();
}


function hacer(){
	numeros=new Array(47);
	num=0;
	for(j=0;j<47;j++){
  		if(num>9) num=1;
		numeros[j]=num;
		num++
  	}
}


function Validar(){
  if(document.f1.dia.value.length != 2){
  alert("Rellene el campo d�a con dos cifras");
  return false;}
  if(document.f1.mes.value.length!=2){
  alert("Rellene el campo mes con dos cifras");
  return false;}
  if(document.f1.anno.value.length!=4){
  alert("Rellene el campo a�o con cuatro cifras");
  return false;}
  if(document.f1.mes.value==4 || document.f1.mes.value==6 || document.f1.mes.value==9 || document.f1.mes.value==11){
  if(document.f1.dia.value>30 || document.f1.dia.value<1){
  alert("�Elige un valor de 1 a 30 para el dia!");
  return false;}
  }
  else if(document.f1.mes.value==2){
  if(document.f1.dia.value>29 || document.f1.dia.value<1){
  alert("�Elige un valor de 1 a 29 para el dia!");
  return false;}
  }
  else{
  if(document.f1.dia.value>31 || document.f1.dia.value<1){
  alert("�Elige un valor de 1 a 31 para el dia!");
  return false;}
  if(document.f1.mes.value>12 || document.f1.mes.value<1){
  alert("�Elige un valor de 1 a 12 para el mes!");
  return false;}
  }
Convertir();
return true;
}


function Convertir()
{
  d=document.f1.dia.value;
  m=document.f1.mes.value;
  a=document.f1.anno.value;
  tot=d+m+a;
  tot=parseInt(tot.substring(0,1))+parseInt(tot.substring(1,2))+parseInt(tot.substring(2,3))+parseInt(tot.substring(3,4))+parseInt(tot.substring(4,5))+parseInt(tot.substring(5,6))+parseInt(tot.substring(6,7))+parseInt(tot.substring(7,8));
  tot=numeros[tot];
  alert("El n�mero que corresponde a su fecha de nacimiento es: "+tot);
  open('http://bionet.virtualmedia.es/usuarios/astrologie1/numerologia/interpretacion.asp?numero='+ tot,'','width=410,height=480,status=no,toolbar=no,scrollbars=yes,menubar=no,screenX=100,screenY=30');
return true;
}

