var n_ns,n_ie
var mouse_x;
var mouse_y;



function inicio_javascript() { /* INVOCAR ANTES DE USAR CUALQUIER SENTENCIA JAVASCRIPT EN UN MODULO*/

n_ns = (document.layers)? true:false
n_ie = (document.all)? true:false

}

function estilos(w_color)
{

if (w_color == "BLANCO") {

	navegador = navigator.appName
	version = parseInt(navigator.appVersion)
	if ((navegador=="Netscape") && (version < 5))
	{
		document.write('<link rel="stylesheet" href="includes/estilos_blanco_n.css" type="text/css">');	
	}else {	
		document.write('<link rel="stylesheet" href="includes/estilos_blanco.css" type="text/css">');		
	}
}


if (w_color == "VERDE") {

	navegador = navigator.appName
	version = parseInt(navigator.appVersion)
	if ((navegador=="Netscape") && (version < 5))
	{
		document.write('<link rel="stylesheet" href="includes/estilos_verde_n.css" type="text/css">');	
	}else {	
		document.write('<link rel="stylesheet" href="includes/estilos_verde.css" type="text/css">');		
	}
}

if (w_color == "VERDE2") {

	navegador = navigator.appName
	version = parseInt(navigator.appVersion)
	if ((navegador=="Netscape") && (version < 5))
	{
		document.write('<link rel="stylesheet" href="includes/estilos_verde2_n.css" type="text/css">');	
	}else {	
		document.write('<link rel="stylesheet" href="includes/estilos_verde2.css" type="text/css">');		
	}
}

}


function estilos2()
{
		document.write('<link rel="stylesheet" href="includes/estilos_n.css" type="text/css">');	
}



function initMouse()
{	
	document.onmousedown = mouseDown
	document.onmousemove = mouseMove
	document.onmouseup = mouseUp
	if (n_ns) document.captureEvents(Event.MOUSEDOWN | Event.MOUSEMOVE | Event.MOUSEUP)
}

function mouseDown(e) {
	
}
function mouseMove(e) {
	if (n_ns) {
		mouse_x = e.pageX
		mouse_y = e.pageY
	}
	else {
		mouse_x = event.x
		mouse_y = event.y
	}

	/*if (capa_drag)
	{
		capa_drag.xpos = mouse_x
		capa_drag.left = capa_drag.xpos
		capa_drag.ypos = mouse_y
		capa_drag.top = capa_drag.ypos
	}*/
	
}
function mouseUp(e) {

}




function mailcorrecto(mail) {
	var c1,c2,c3,c4,c5,c6,cf;
	var len,i,error;
		len = mail.length;
		if (len==0) {
			return 0;
		} else {
			i=0;
			c1 = mail.charAt(i);
			cf = mail.charAt(len-1);
			i++;
			if (c1=='@' || c1=='.' || c1==' ' || cf=='@' || cf=='.' || cf==' ') {
				error=0; 
			} else {	
				while (i<len && c2!='@' && c2!=' ') {
					c2 = mail.charAt(i);
					i++;
				}
				if (c2!='@') error=0; 
				else {
					c3 = mail.charAt(i);
					i++;
					if (c3=='@' || c3=='.' || c3==' ') {
						error=0; 
					} else {
						while (i<len && c4!='.' && c4!='@' && c4!=' ') {
							c4 = mail.charAt(i);
							i++;
						}	
						if (c4!='.') error=0; 
						else {
							c5 = mail.charAt(i);
							if (c5!='.' && c5!='@' && c5!=' ') {
								while (i<len && c6!='.' && c6!='@' && c6!=' ') {
									c6 = mail.charAt(i);
									i++;
								}	
								if (c6=='@' || c6==' ') {
									error=0; 
								} else {
									error=1; 
								}
							} else error=0; 
						}
					}
				}	
			}
			return error;
		}	
}




function calcularNIF(dni) {

if (!/^\d{8}$/.test(dni)) {
  alert ("El CIF/NIF introducido no es valido.");
  return false;
}

var letras = 'TRWAGMYFPDXBNJZSQVHLCKE';

var numero = dni%23;
form1.letra.value = letras.substring(numero,numero+1);
return true;
}