sw=0;
var standardbrowser=!document.all&&!document.getElementById

if (standardbrowser)
document.write('<form name="tick"><input type="text" name="tock" size="4"></form>')




function popimg(url,nom,ancho, alto){
	izquierda = (screen.width) ? (screen.width-ancho)/2 : 100
	arriba = (screen.height) ? (screen.height-alto)/2 : 100
	opciones = 'toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=no,resizable=0,width=' + ancho + ',height=' + alto + ',left=' + izquierda + ',top=' + arriba + ''
	window.open(url, nom, opciones)
}


  function sobre(name){
	eval("trans=document.images['"+name+"_1'].src");
	eval("document.images['"+name+"_1'].src=document.images['"+name+"_2'].src");
	eval("document.images['"+name+"_2'].src=trans");
  }




function ventana(x,y,z){

  n=y.lastIndexOf(" ");

  y=y.substring(n+1,y.length);

  window.open(x,y,z);

}





function muestra(capa){
  document.getElementById(capa).style.visibility='visible';
  formul.palabra.focus();
}


function oculta(capa){
  document.getElementById(capa).style.visibility='hidden';
}



function cbuscar(){ 
   if(document.forms.formul.palabra.value.length<4){
    alert('La palabra buscada tiene que tener más de 3 caracteres');
   }else{
    document.forms.formul.submit();	
   }
} 








function comp(){
	
	if((document.forms.fcambio.usant.value=="")||(document.forms.fcambio.pswant.value=="")||(document.forms.fcambio.pswnew.value=="")||
		(document.forms.fcambio.pswnew2.value=="")||(document.forms.fcambio.usnew.value=="")){

		alert("Todos los campos son obligatorios");
		return false;

	}else{

		if(document.forms.fcambio.pswnew.value==document.forms.fcambio.pswnew2.value){

			document.forms.fcambio.submit();

		}else{

			alert("Las nuevas claves introducidas no son iguales.");
			return false;

		}
	
	}
}









function centrada(){
	
	if((document.forms.frmentrada.nome.value=="")||(document.forms.frmentrada.passe.value=="")){

		alert("Introduzca el nombre y la contraseña de acceso.");
		return false;

	}else{

		document.forms.frmentrada.submit();
	
	
	}


}





function actualizar(url)
{
window.location=url;
}



function validarCIF(texto){ 
 var pares = 0; 
 var impares = 0; 
 var suma; 
 var ultima; 
 var unumero; 
 var uletra = new Array("J", "A", "B", "C", "D", "E", "F", "G", "H", "I"); 
 var xxx; 
    
 texto = texto.toUpperCase(); 
     
 var regular =/^[ABCDEFGHKLMNPQS]\d\d\d\d\d\d\d[0-9,A-J]$/g; 
 if (!regular.exec(texto)) return false; 
              
 ultima = texto.substr(8,1); 

 for (var cont = 1 ; cont < 7 ; cont ++){ 
 xxx = (2 * parseInt(texto.substr(cont++,1))).toString() + "0"; 
 impares += parseInt(xxx.substr(0,1)) + parseInt(xxx.substr(1,1)); 
 pares += parseInt(texto.substr(cont,1)); 
 } 
 xxx = (2 * parseInt(texto.substr(cont,1))).toString() + "0"; 
 impares += parseInt(xxx.substr(0,1)) + parseInt(xxx.substr(1,1)); 

 suma = (pares + impares).toString(); 
 unumero = parseInt(suma.substr(suma.length - 1, 1)); 
 unumero = (10 - unumero).toString(); 
 if(unumero == 10) unumero = 0; 
          
 if ((ultima == unumero) || (ultima == uletra[unumero])) 
  return true; 
 else 
  return false; 
}



function esNIFCorrecto(nif){
 letras = 'TRWAGMYFPDXBNJZSQVHLCKE'
 txtError = "";
 ok = true;
 
 dni=nif.substring(0,nif.length);
 dni=parseInt(dni);
 letra=nif.charAt(nif.length-1);
 letra=letra.toUpperCase()
 numero = dni % 23;
 letraCorrecta=letras.substring(numero,numero+1)
 
 if (dni > 99999999){ 
  txtError += "El DNI tiene a lo sumo 8 cifras\n";
  ok = false;
 } else if(letra!=letraCorrecta) {
  txtError += "La letra correcta del NIF para "
  txtError += "ese DNI es " + letraCorrecta + "\n";
  ok = false;
 }   

 if (ok) {
  return true;
 }else{
  alert(txtError);
  return false;
 }
}


function validarCP(cp){ 
 if(cp>0&&cp<99999){
  return true;
 }else{
  alert("El codigo postal introducido debe ser un número de 5 cifras");
 }
}


function validarMAIL(texto){ 
 var mailres = true;             
 var cadena = "abcdefghijklmnñopqrstuvwxyzABCDEFGHIJKLMNÑOPQRSTUVWXYZ1234567890@._-"; 
     
 var arroba = texto.indexOf("@",0); 
 if ((texto.lastIndexOf("@")) != arroba) arroba = -1; 
     
 var punto = texto.lastIndexOf("."); 
                 
 for (var contador = 0 ; contador < texto.length ; contador++){ 
  if (cadena.indexOf(texto.substr(contador, 1),0) == -1){ 
   mailres = false; 
   break; 
  } 
 } 

 if ((arroba > 1) && (arroba + 1 < punto) && (punto + 1 < (texto.length)) && (mailres == true) && (texto.indexOf("..",0) == -1)){
  mailres = true; 
 }else{
  alert("El emial introducido está mal escrito");
  mailres = false; 
 }
         
 return mailres; 
} 



function comprueba_pedido(){
 //comprobamos NIF
 nif=document.forms.cesta.frm_nif.value;
 primer=nif.charAt(0);
 primer=primer+1-1;
 if(primer<0 || primer>9){
  swnif=esNIFCorrecto(nif);
 }else{
  swnif=validarCIF(nif);
 }

 if(swnif==true){
  //comprobamos CP
  swcp=validarCP(document.forms.cesta.frm_cp.value);

  if(swcp==true){
   //comprobamos EMAIL
   swmail=validarMAIL(document.forms.cesta.frm_email.value);
   if(swmail==true){
   
    if(document.forms.cesta.frm_nombre.value==''||document.forms.cesta.frm_apellidos.value==''||document.forms.cesta.frm_empresa.value==''||document.forms.cesta.frm_direccion.value==''||document.forms.cesta.frm_poblacion.value==''||document.forms.cesta.frm_provincia.value==''||document.forms.cesta.frm_pais.value==''||document.forms.cesta.frm_telefono.value==''){
      alert("TODOS los campos son obligatorios");
    }else{
      document.forms.cesta.submit();
    }
   }
  }
 }else{
  alert("El NIF no es correcto");
 }
 
 
 



 

}