zonas=new Array("Alcalá de Guadaira","Alcores, Los","Dos Hermanas","Aljarafe","Bajo Guadalquivir",
	"Campiña","Corredor de la Plata","Ecija","Serranía Suroeste","Sevilla","Sierra Norte",
	"Sierra Sur","Vega Alta","Vega Media");
num_array=zonas.length;
/*Se duplican los arrays de lugares para tener la opción de "Cualquiera" en la búsqueda
de destinos. Sería conveniente mejorar y depurar el código.
una posible solución sería la de utilizar copias de arrays en la que se añade
el elemento "Cualquiera". Por ejemplo
dest_cual=new Array(num_array);
	for(i=0;i<num_array;i++){
		dest_cual[i]=new Array();
		dest_cual[i]=lugares[i];
	}
function inserta(){
	for(i=0;i<num_array;i++){
		dest_cual[i].splice(0,0,"Cualquiera");
	}
}
Actualmente está opción no funciona porque al modificar el nuevo array se modifica el 
array original del cual es una copia ???
*/
lugares=new Array(num_array);
for(i=0;i<num_array;i++){
		lugares[i]=new Array();
}	
destinos=new Array(num_array);
for(i=0;i<num_array;i++){
		destinos[i]=new Array();
}
//------------------------------------------------------------------
barrios=new Array();
barrios[9]=new Array();
lugares[0]=new Array("Alcalá de Guadaira","P.I. Cuchipanoa","P.I. Hacienda Dolores",
	"P.I. Cabeza Hermosa","P.I. Fridex","P.I. La Red Sur","P.I. La Red Norte",
	"P.I. Cementera-V. la Liebre","P.I. Alcalá 10","P.I. El Cruce","P.I. Polysol",
	"P.I. San Nicolás","P.I. El Caparral");
lugares[1]=new Array("Carmona","Mairena del Alcor","El Viso del Alcor",
	"Urb. entre Aeropuerto y Carmona");
lugares[2]=new Array("Dos Hermanas","Adriano","Montequinto","Fuente del Rey","Marisma y Puntales",
	"Zona de Quintos","P.I. Carretera de la Isla","P.I. La Palmera","P.I. Fuente del Rey",
	"P.I. Autovía Sevilla-Cádiz","P.I. Orippo","P.I. Cadesa y Marias Baja","P.I. Las Casillas",
	"P.I. La Polvora","P.I. Extrarradio");
lugares[3]=new Array("Albaida del Aljarafe","Almensilla","Aznalcázar","Benacazón",
	"Bollullos de la Mitación","Bormujos","Camas","Carrión de los Céspedes","Castilleja de Guzmán",
	"Castilleja de la Cuesta","Castilleja del Campo","Coria del Río","Espartinas",
	"Gelves","Gines","Huévar del Aljarafe","Isla Mayor","Mairena del Aljarafe","Olivares",
	"Palomares del Río","Pilas","Puebla del Río","Salteras","San Juan de Aznalfarache",
	"Sanlúcar la Mayor","Santiponce","Tomares","Umbrete","Valencina de la Concepción",
	"Villamanrique de la Condesa","Villanueva del Ariscal","P.I. Industrial Almargen",
	"P.I. Parque Aljarafe","P.I. El Manchón","P.I. PISA","Zona ind. Camas-Santiponce");
lugares[4]=new Array("Las Cabezas de San Juan","El Coronil","El Cuervo de Sevilla","Lebrija",
	"Los Molares","Los Palacios y Villafranca","Utrera");
lugares[5]=new Array("Arahal","Lantejuela","Marchena","Paradas","La Puebla de Cazalla");
lugares[6]=new Array("Aznalcóllar","Castilb. de los Arroyos","El Castillo de las Guardas",
	"El Garrobo","Gerena","El Madroño","El Ronquillo");
lugares[7]=new Array("La Campana","Cañada del Rosal","Écija","Fuentes de Andalucía","La Luisiana");
lugares[8]=new Array("Algámitas","Coripe","Montellano","Morón de la Frontera","Pruna",
	"El Saucejo","Villanueva de San Juan");
lugares[9]=new Array("Casco Antiguo","Cartuja","Macarena","Macarena Norte","San Pablo-Sta. Justa",
	"Nervión","Cerro-Amate","Este","Sur","Palmera-Bellavista","Triana","Los Remedios-Tablada");
lugares[10]=new Array("Alanís","Almadén de la Plata","Cazalla de la Sierra","Constantina",
	"Guadalcanal","Las Navas de la Concepción","El Pedroso","La Puebla de los Infantes",
	"El Real de la Jara","San Nicolás del Puerto");
lugares[11]=new Array("Aguadulce","Badolatosa","Casariche","Los Corrales","Estepa","Gilena",
	"Herrera","Lora de Estepa","Marinaleda","Martín de la Jara","Osuna","Pedrera",
	"La Roda de Andalucía","El Rubio");
lugares[12]=new Array("Alcolea del Río","Lora del Río","Peñaflor","Villanueva del Río y Minas");
lugares[13]=new Array("Alcalá del Río","La Algaba","Brenes","Burguillos","Cantillana",
	"Guillena","La Rinconada","Tocina","Villaverde del Río","Parque Empresarial Aeronáutico",
	"P.I. Cañamo III","P.I. Los Espartales","P.I. Majarabique");
destinos[0]=new Array("Cualquiera","Alcalá de Guadaira","P.I. Cuchipanoa","P.I. Hacienda Dolores",
	"P.I. Cabeza Hermosa","P.I. Fridex","P.I. La Red Sur","P.I. La Red Norte",
	"P.I. Cementera-V. la Liebre","P.I. Alcalá 10","P.I. El Cruce","P.I. Polysol",
	"P.I. San Nicolás","P.I. El Caparral");
destinos[1]=new Array("Cualquiera","Carmona","Mairena del Alcor","El Viso del Alcor",
	"Urb. entre Aeropuerto y Carmona");
destinos[2]=new Array("Cualquiera","Dos Hermanas","Adriano","Montequinto","Fuente del Rey","Marisma y Puntales",
	"Zona de Quintos","P.I. Carretera de la Isla","P.I. La Palmera","P.I. Fuente del Rey",
	"P.I. Autovía Sevilla-Cádiz","P.I. Orippo","P.I. Cadesa y Marias Baja","P.I. Las Casillas",
	"P.I. La Polvora","P.I. Extrarradio");
destinos[3]=new Array("Cualquiera","Albaida del Aljarafe","Almensilla","Aznalcázar","Benacazón",
	"Bollullos de la Mitación","Bormujos","Camas","Carrión de los Céspedes","Castilleja de Guzmán",
	"Castilleja de la Cuesta","Castilleja del Campo","Coria del Río","Espartinas",
	"Gelves","Gines","Huévar del Aljarafe","Isla Mayor","Mairena del Aljarafe","Olivares",
	"Palomares del Río","Pilas","Puebla del Río","Salteras","San Juan de Aznalfarache",
	"Sanlúcar la Mayor","Santiponce","Tomares","Umbrete","Valencina de la Concepción",
	"Villamanrique de la Condesa","Villanueva del Ariscal","P.I. Industrial Almargen",
	"P.I. Parque Aljarafe","P.I. El Manchón","P.I. PISA","Zona ind. Camas-Santiponce");
destinos[4]=new Array("Cualquiera","Las Cabezas de San Juan","El Coronil","El Cuervo de Sevilla","Lebrija",
	"Los Molares","Los Palacios y Villafranca","Utrera");
destinos[5]=new Array("Cualquiera","Arahal","Lantejuela","Marchena","Paradas","La Puebla de Cazalla");
destinos[6]=new Array("Cualquiera","Aznalcóllar","Castilb. de los Arroyos","El Castillo de las Guardas",
	"El Garrobo","Gerena","El Madroño","El Ronquillo");
destinos[7]=new Array("Cualquiera","La Campana","Cañada del Rosal","Écija","Fuentes de Andalucía","La Luisiana");
destinos[8]=new Array("Cualquiera","Algámitas","Coripe","Montellano","Morón de la Frontera","Pruna",
	"El Saucejo","Villanueva de San Juan");
destinos[9]=new Array("Cualquiera","Casco Antiguo","Cartuja","Macarena","Macarena Norte","San Pablo-Sta. Justa",
	"Nervión","Cerro-Amate","Este","Sur","Palmera-Bellavista","Triana","Los Remedios-Tablada");
destinos[10]=new Array("Cualquiera","Alanís","Almadén de la Plata","Cazalla de la Sierra","Constantina",
	"Guadalcanal","Las Navas de la Concepción","El Pedroso","La Puebla de los Infantes",
	"El Real de la Jara","San Nicolás del Puerto");
destinos[11]=new Array("Cualquiera","Aguadulce","Badolatosa","Casariche","Los Corrales","Estepa","Gilena",
	"Herrera","Lora de Estepa","Marinaleda","Martín de la Jara","Osuna","Pedrera",
	"La Roda de Andalucía","El Rubio");
destinos[12]=new Array("Cualquiera","Alcolea del Río","Lora del Río","Peñaflor","Villanueva del Río y Minas");
destinos[13]=new Array("Cualquiera","Alcalá del Río","La Algaba","Brenes","Burguillos","Cantillana",
	"Guillena","La Rinconada","Tocina","Villaverde del Río","Parque Empresarial Aeronáutico",
	"P.I. Cañamo III","P.I. Los Espartales","P.I. Majarabique");
barrios[9][0]=new Array("Arenal","San Bartolomé","Museo","Santa Cruz","Alfalfa","Encarnación-Regina",
	"Feria","San Gil","San Julián","San Lorenzo","San Vicente","Santa Catalina");
barrios[9][1]=new Array("Centro Investigaciones Científicas","Edificio Cartuja","Edificio Torretriana",
	"Escuela Superior Ingenieros","Facultad Ciencias Comunicación","Fundación ONCE",
	"Gerencia Urbanismo","Pabellón Italia","Pabéllón México","Pabellón Marruecos","Palenque");
barrios[9][2]=new Array("Univ. Sev. Campus Macarena","Doctor Berraquer, G. Renfe, Policlínico",
	"El Cerezo","El Rocio","El Torrejón","Macarena 3 Huertas, Macarena 5","Hermandades, La Carrasca",
	"La Palmilla, Doctor Marañón","La Paz, Las Golondrinas","Las Avenidas","Polígono Norte",
	"Begoña, Santa Catalina","Campos De Soria","Los Principes, La Fontanilla","Pino Flores",
	"Santas Justa Y Rufina, Parque Miraflores","Villegas","Cisneo Alto, Santa Maria De Gracia",
	"Cruz Roja, Capuchinos","El Carmen","La Barzola","Leon XIII, Los Naranjos","Pio XII",
	"Retiro Obrero","Santa María De Ordas, San Nicolas");
barrios[9][3]=new Array("Bda. Pino Montano","Consolación","El Gordillo","Las Almenas","La Bachillera",
	"San Jerónimo","Las Naciones, Pq. Atlántico, Las Dalías","Los Arcos","Los Carteros",
	"Aeropuerto Viejo","San Diego","San Matías","Valdezorras","P.I. Calonge","P.I. Store",
	"P.I. San Jerónimo");
barrios[9][4]=new Array("Arbol Gordo","Fontanal, M. Auxiliadora, Ctra. Carmona",
	"La Corza","Las Huertas","San Carlos, Tartessos","San José Obrero","Zodiaco",
	"Huerta De Santa Teresa","San Pablo A Y B","San Pablo C","San Pablo D Y E","Santa Clara",
	"P.I. Ctra. Amarilla");
barrios[9][5]=new Array("Univ. Sev. Campus R. y Cajal","San Roque","La Calzada","La Buhaira",
	"La Florida","Huerta Del Pilar","San Bernardo","Ciudad Jardín","Nervión");
barrios[9][6]=new Array("Amate","Juan XXIII","Los Pájaros","Rochelambert",
	"S. Aurelia, Cantábr., Atlánt., La Romería","Palmete","El Cerro","La Plata","P.I. Amate");
barrios[9][7]=new Array("Pal. Congresos, Urbadiez, Entrepuentes","Parque Alcosa, Jardines Del Edén",
	"Colores, Entreparques","Torreblanca","P.I. El Pino","P.I. Aeropuerto","P.I. La Chaparrilla");
barrios[9][8]=new Array("Univ. Sev. Campus Central","Universidad Pablo de Olavide",
	"Prado - Parque María Luisa","Huerta De La Salud","El Porvenir","Tabladilla, La Estrella",
	"Bami","Giralda Sur","El Plantinar","Felipe II, Los Diez Mandamientos",
	"Tiro De Linea, Santa Genoveva","El Juncal, Hispalis","La Oliva","Avd. De La Paz",
	"Las Letanías","Polígono Sur","P.I. Su Eminencia y El refugio","P.I. Navisa","P.I. Hytasa",
	"P.I Pineda");
barrios[9][9]=new Array("Univ. Sev. Campus R. Mercedes","Sector Sur, La Palmera, R. Mercedes",
	"Heliopolis","Pedro Salvador, Las Palmeritas","El Cano, Bermejales","Bda. De Pineda","Bellavista");
barrios[9][10]=new Array("Barrio León","El Tardón, El Carmen","Triana Casco Antiguo","Triana Este","Triana Oeste");
barrios[9][11]=new Array("Los Remedios","Tablada");

//Muestra o no los selects de los barrios si la zona es Sevilla, tanto para origen como destino
function inicio_barrio(){
	if(document.formulario.z_origen[document.formulario.z_origen.selectedIndex].value==9){
		xDisplay('capabarrios1','block')
	}else{
		xDisplay('capabarrios1','none')
	}
	if(document.formulario.z_destino[document.formulario.z_destino.selectedIndex].value==9){
		xDisplay('capabarrios2','block')
	}else{
		xDisplay('capabarrios2','none')
	}
}
//Inicializa los valores de los arrays
function inicio(){
	valores_zona();
	valores_origen();
	valores_destino();
}
function valores_zona(){
	document.formulario.z_origen.length=num_array
	document.formulario.z_destino.length=num_array
  //para cada destino del array, la introduzco en el select
  for(i=0;i<num_array;i++){
    document.formulario.z_origen.options[i].value=i
    document.formulario.z_origen.options[i].text=zonas[i]
    document.formulario.z_destino.options[i].value=i
    document.formulario.z_destino.options[i].text=zonas[i]
  }
}
function valores_origen(){
  var num_array=lugares[0].length
	document.formulario.l_origen.length=num_array
  //para cada destino del array, la introduzco en el select
  for(i=0;i<num_array;i++){
    document.formulario.l_origen.options[i].value=i
    document.formulario.l_origen.options[i].text=lugares[0][i]
  }
}
function valores_destino(){
	var num_array=destinos[0].length
	document.formulario.l_destino.length=num_array
	for(i=0;i<num_array;i++){
    document.formulario.l_destino.options[i].value=i
    document.formulario.l_destino.options[i].text=destinos[0][i]
  }
}
/*Cambia el valor de selects asociados para los arrays de lugares de origen */
function cambia_zona1(){
//tomo el valor del select de la zona elegida
  var zona
  zona = document.formulario.z_origen[document.formulario.z_origen.selectedIndex].value
  //lugares=eval("lugares_" + zona) Instrucción utilizada anteriormente
  //calculo el numero de lugares
  num_lugares = lugares[zona].length
  //marco el número de lugares en el select
  document.formulario.l_origen.length = num_lugares
  //para cada lugar del array, la introduzco en el select
  for(i=0;i<num_lugares;i++){
    document.formulario.l_origen.options[i].value=i
    document.formulario.l_origen.options[i].text=lugares[zona][i]
    document.formulario.l_origen.options[0].selected = true
	}
	//cambia_barrios1()
	if (zona==9){
		xDisplay('capabarrios1','block')
 	}
	else{
		xDisplay('capabarrios1','none')
 	}
}
function cambia_barrios1(){
//tomo el valor del select del lugar elegido
  var lugar
  lugar = document.formulario.l_origen[document.formulario.l_origen.selectedIndex].value
  num_barrios = barrios[9][lugar].length
  //marco el número de lugares en el select
  document.formulario.b_origen.length = num_barrios
  //para cada barrio del array, lo introduzco en el select
  for(i=0;i<num_barrios;i++){
    document.formulario.b_origen.options[i].value=i
    document.formulario.b_origen.options[i].text=barrios[9][lugar][i]
    document.formulario.b_origen.options[0].selected = true
	}
}
function cambia_barrios2(){
//tomo el valor del select del lugar elegido
  var lugar
  lugar = document.formulario.l_destino[document.formulario.l_destino.selectedIndex].value
  num_barrios = barrios[9][lugar].length
  //marco el número de lugares en el select
  document.formulario.b_destino.length = num_barrios
  //para cada barrio del array, lo introduzco en el select
  for(i=0;i<num_barrios;i++){
    document.formulario.b_destino.options[i].value=i
    document.formulario.b_destino.options[i].text=barrios[9][lugar][i]
    document.formulario.b_destino.options[0].selected = true
	}
}
/*Cambia el valor de selects asociados para los arrays de lugares destinos */
function cambia_zona2(){
//tomo el valor del select de la zona elegida
  var zona
  zona = document.formulario.z_destino[document.formulario.z_destino.selectedIndex].value
  //calculo el numero de lugares
  num_lugares = lugares[zona].length
  //marco el número de lugares en el select
  document.formulario.l_destino.length = num_lugares
  //para cada lugar del array, la introduzco en el select
  for(i=0;i<num_lugares;i++){
    document.formulario.l_destino.options[i].value=i
    document.formulario.l_destino.options[i].text=lugares[zona][i]
    document.formulario.l_destino.options[0].selected = true
	}
	cambia_barrios2()
	if (zona==9){
		xDisplay('capabarrios2','block')
 	}else{
		xDisplay('capabarrios2','none')
 	}
}
/*Cambia el valor de selects asociados para los arrays de lugares destinos que incluyen la
opción de "Cualquiera" */
function cambia_zona2_cual(){
//tomo el valor del select de la zona elegida
  var zona
  zona = document.formulario.z_destino[document.formulario.z_destino.selectedIndex].value
  //lugares=eval("lugares_" + zona)
  //calculo el numero de lugares
  num_lugares = destinos[zona].length
  //marco el número de lugares en el select
  document.formulario.l_destino.length = num_lugares
  //para cada lugar del array, la introduzco en el select
  for(i=0;i<num_lugares;i++){
    document.formulario.l_destino.options[i].value=i
    document.formulario.l_destino.options[i].text=destinos[zona][i]
    document.formulario.l_destino.options[0].selected = true
	}
}
/*function expandir_formulario(){
 if (document.formulario.expandir.checked){
	xDisplay('capabarrios','block')
 }else{
	xDisplay('capabarrios','none')
 }

}*/
//Permite que el uso de funciones con capas no vea alterada por el tipo de navegador usado
var xVersion='3.15.2',xNN4,xOp7,xOp5or6,xIE4Up,xIE4,xIE5,xMac,xUA=navigator.userAgent.toLowerCase();
if (window.opera){
  xOp7=(xUA.indexOf('opera 7')!=-1 || xUA.indexOf('opera/7')!=-1);
  if (!xOp7) xOp5or6=(xUA.indexOf('opera 5')!=-1 || xUA.indexOf('opera/5')!=-1 || xUA.indexOf('opera 6')!=-1 || xUA.indexOf('opera/6')!=-1);
}
else if (document.all && xUA.indexOf('msie')!=-1) {
  xIE4Up=parseInt(navigator.appVersion)>=4;
  xIE4=xUA.indexOf('msie 4')!=-1;
  xIE5=xUA.indexOf('msie 5')!=-1;
}
else if (document.layers) {xNN4=true;}
xMac=xUA.indexOf('mac')!=-1;
//Funciones para el manejo de capas y la posición de las mismas
function xGetElementById(e) {
  if(typeof(e)!='string') return e;
  if(document.getElementById) e=document.getElementById(e);
  else if(document.all) e=document.all[e];
  else e=null;
  return e;
}
function xDef(){
	for(var i=0; i<arguments.length; ++i){
		if(typeof(arguments[i])=='undefined') return false;
	}
	return true;
}
function xDisplay(e,s){
	if(!(e=xGetElementById(e))) return null;
		if(e.style && xDef(e.style.display)){
			if (xStr(s)) e.style.display = s;
			return e.style.display;
		}
	return null;
}
function xStr(s){
	for(var i=0; i<arguments.length; ++i){
		if(typeof(arguments[i])!='string') return false;
	}
	return true;
}
function xNum(n) {
  for(var i=0; i<arguments.length; ++i){if(typeof(arguments[i])!='number') return false;}
  return true;
}
function xClip(e,iTop,iRight,iBottom,iLeft) {
  if(!(e=xGetElementById(e))) return;
  if(e.style) {
    if (xNum(iLeft)) e.style.clip='rect('+iTop+'px '+iRight+'px '+iBottom+'px '+iLeft+'px)';
    else e.style.clip='rect(0 '+parseInt(e.style.width)+'px '+parseInt(e.style.height)+'px 0)';
  }
}
var clip_bottom = 0
var clip_right = 0
/*Función para mostrar una capa paulatinamente en sentido vertical de arriba a abajo*/
function cortina(alto,ancho,capa){
	clip_bottom += 1
	xClip (capa, 0, ancho, clip_bottom, 0)
	if(clip_bottom<alto-1)setTimeout("cortina("+alto+","+ancho+",'"+capa+"')",20)
}
/*Función para mostrar una capa paulatinamente en sentido horizontal de izquierda a derecha*/
function cortina2(ancho,capa){
	clip_right += 1
	xClip (capa, 0, clip_right, 30, 0)
	if(clip_right<ancho-1)setTimeout("cortina2("+ancho+",'"+capa+"')",10)
}
/*Valida la dirección de correo. Comprueba que no exista espacios en blanco,
que sólo haya una @, que ésta no esté ni en la primera ni en la última ni en la 
penúltima posición y que el último y penúltimo carácter este comprendido entre a y z*/
function valida_correo(){
	var a,b,cont
	cont=0
	b=0
	a=document.formulario.usuario.value
	for(i=0;i<a.length;i++){
		if(a.charAt(i)==" ")b=1
		if(a.charAt(i)=="@")cont++
		if((a.charAt(i)=="@") && (i==a.length-1||i==a.length-2 || i==0))b=1
	}
	if((a.charCodeAt(a.length-1)<97||a.charCodeAt(a.length-1)>122)||
		(a.charCodeAt(a.length-2)<97||a.charCodeAt(a.length-2)>122))b=1
	if(cont!=1)b=1
	if (b==1){
    alert("Dirección de correo incorrecta")
    document.formulario.usuario.focus()
    return false
   }
   else return true
}
//Valida contraseña con 8 caracteres
function valida_clave(){
	if (document.formulario.clave.value.length!=8){
      alert("Contraseña con 8 caracteres")
      document.formulario.clave.focus()
      document.formulario.clave.select()
      return false
  }
  else return true
}
//Valida que el valor en los dos campos de clave coincidan 
function valida_clave2(){
	if (document.formulario.clave.value != document.formulario.clave2.value){
    alert("Las contraseñas introducidas no coinciden")
    document.formulario.clave.focus()
    document.formulario.clave.select()
    document.formulario.clave2.value=""
    return false
 	}
  else return true
}
//Valida formulario de página index.php
function validar1(){
	if (!(valida_correo()))return false
	if (!(valida_clave()))return false
	return true
}
//Valida formulario de página alta.php
function validar2(){
	if (!(valida_correo()))return false
	if (!(valida_clave()))return false
	if (!(valida_clave2()))return false
	return true
}
//Valida formulario de página modificar_clave.php
function validar3(){
	if (!(valida_clave()))return false
	if (!(valida_clave2()))return false
	return true
}
//Ventana para confirmar si se quiere borrar los datos
function confirmar(){
  if(confirm("¿Está seguro de borrar sus datos?")){
		return true
  }
  else{
    return false
  }
}
/*Abre una nueva ventana con el script mensaje.php que incluye con el metodo GET
el campo "contador" del usuario pasado como parámetro*/
function mensaje(usuario_con){
	var cadena="./mensaje.php?usuario_con="+usuario_con
	ventana=window.open(cadena,"v1","width=300,height=250")
}
/*Abre una nueva ventana con el script modificar_clave.php*/
function mod_clave(sesion){
	var cadena="./modificar_clave.php?"+sesion
	ventana=window.open(cadena,"v2","width=300,height=200")
}
//Abre una ventana con el script instrucciones.php
function aviso(marco,valor,menu){
	var cadena="./"+valor
	ventana=window.open(cadena,marco,"width=350,height=300,scrollbars=yes,resizable=yes,menubar="+menu)
}
function sugerencia(sesion){
	var cadena="./sugerencia.php?"+sesion
	ventana=window.open(cadena,"v4","width=300,height=250")
}

