/************************************************************************** * C S I C - CONSEJO SUPERIOR DE INVESTIGACIONES CIENTIFICAS. * * Vicepresidencia de Organizacion y Relaciones Institucionales. (VORI) * * Area de Cultura Cientifica * * Adminitracion y Coordinacion de los Webs del CSIC. * * C/ Serrano, 117 (28008) - MADRID - ESPAÑA * * Tel.: +34 91 585 5200 * * http://www.csic.es - webmaster # csic.es * * * * Coordinador.: Juan Martínez Pacheco * * Administrador y coordinador de los Webs del CSIC. * * juanmp # orgc.csic.es * * +34 91 565 5200 * ************************************************[05-mayo-2003]************/ /* ******************************************[ lenguaNavegador() ]*********** * DETECCIÓN DEL IDIOMA DEL NAVEGADOR QUE UTILIZA EL USUARIO / VISITANTE. * ************************************************************************** * NOTA: Hay que diferenciar entre el "Lengiuaje del navegador" y las * * "Preferencias de Idiomas".: Es muy importante saber que al * * tratarse de un programa o guión de Javascripts, lo que aquí se * * detecta es el idioma o lengua del navegador que el usuario tiene * * instalado, y NO el de las “preferencias de idiomas” que el * * usuario tenga configuraras dentro de él. * ************************************************************************** ************************************************************************** * Este guión de Javascript detecta e identifica el idioma del navegador * * que utiliza el usuario en el momento en que visita nuestro sitio Web. * * Todos los idiomas mas universales, significativos, conocidos, o * * simplemente todos aquellos que aunque correspondan a una comunidad de * * tamaño insignificante tengan una personalidad o un dinamismo que les * * haya permitido darse a conocer con una identidad propia, han sido * * registrados y codificados. * * * * Cada uno de ellos han sido catalogado y codificado según la norma * * ISO-639. Esta norma clasifica y codifica a todos los idiomas con 2 y * * 3 caracteres. ( http://www.w3.org/WAI/ER/IG/ert/iso639.htm ). * * Aquí se usa la de dos caractéres. / "es" - español, * * "ca" - catalan, * * "gl" - gallego, * * "eu" - vasco, * * "en" - ingles * * Autor.: Juan Martínez Pacheco * *******************************************************[08-2003 ]*********/ function lenguaNavegador() { lengua = "es"; // Español como lengua por defecto. if (navigator.userAgent.indexOf("Opera")!=-1) { lengua=navigator.language; } else { if (navigator.appName == "Netscape") { lengua=navigator.language; } else { lengua=navigator.browserLanguage; } } lenguaf = lengua.substring(0,2); return lenguaf; } /******************************************************************************* * Devuelve el lema del CSIC en español, catalan, (gallego, vasco) e ingles * * segun el codigo de lengua dado como argumento de entrada: * * Autor.: Juan Martínez Pacheco * ********************************************************[09-2004]**************/ function lemacsic(lengua) { lema= 'Es tiempo de investigación, es tiempo de vida, ....es tiempo CSIC '; if (lengua == "ca") lema= 'Es temps d'investigació, es temps de vida, ...es temps CSIC '; if (lengua == "en") lema= 'It\'s time for research, time for life... it\'s time for the CSIC '; return lema; } /******************************************************************************* * Muestra en español, catalán, (gallego, vasco) e inglés el mensaje de alerta * * de las direcciones de correo en texto insertas en las paginas web para * * evitar el spam. * * -- Adecuacion del texto para el CSIC (09-2004) -- * * Autor.: Juan Martínez Pacheco * ********************************************************[09-2001]**************/ function alertantiespam(lengua) { var alertesp = ""; alertesp = 'Para evitar el recibo de correo no deseado (SPAM) no se indican '; alertesp += 'explícitamente en modo texto direcciones de correo electrónico '; alertesp += 'en las páginas Web del CSIC. Si desea contactar, transcriba la '; alertesp += 'dirección de correo que se indica en la imagen sobre la que ha '; alertesp += 'pulsado para mostrar este mensaje. GRACIAS. '; var alertcat = ""; alertcat = 'Per a evitar el rebut de correu no desitjat (SPAM) no s\'indiquen '; alertcat += 'explícitament en manera text adreces de correu electrònic en les '; alertcat += 'pàgines Web del CSIC. Si desitja contactar, transcrigui l\'adreça '; alertcat += 'de correu que s\'indica en la imatge sobre la qual ha premut per '; alertcat += 'a mostrar aquest missatge. GRÀCIES. '; var alerteng = ""; alerteng = 'In order to avoid the receipt of wished mail (SPAM) they explicitly '; alerteng += 'do not indicate in way text directions of electronic mail in the '; alerteng += 'CSIC webpages. If it wishes to contact, transcribes the mail '; alerteng += 'direction that is indicated in the image on which it has pressed '; alerteng += 'to show this message. THANKS. '; var msgsal = alertesp; if (lengua == "ca") msgsal = alertcat; if (lengua == "en") msgsal = alerteng; alert(msgsal); } /******************************************************************************* * Devuelve en español la fecha del dia en formato: * * "Miercoles, 99 Septiembre 2000" * * Autor.: Juan Martínez Pacheco * ********************************************************[03-08-2000]***********/ function fechaEsp() { var actual=new Date() var diasem; switch(actual.getDay()){ case 0:diasem="Domingo";break; case 1:diasem="Lunes";break; case 2:diasem="Martes";break; case 3:diasem="Miércoles";break; case 4:diasem="Jueves";break; case 5:diasem="Viernes";break; case 6:diasem="Sábado";break; } var numdia = actual.getDate(); var nombmes; switch(actual.getMonth()){ case 0:nombmes="Enero";break; case 1:nombmes="Febrero";break; case 2:nombmes="Marzo";break; case 3:nombmes="Abril";break; case 4:nombmes="Mayo";break; case 5:nombmes="Junio";break; case 6:nombmes="Julio";break; case 7:nombmes="Agosto";break; case 8:nombmes="Septiembre";break; case 9:nombmes="Octubre";break; case 10:nombmes="Noviembre";break; case 11:nombmes="Diciembre";break; } var ano4 = actual.getFullYear(); var salida = diasem + ", " + numdia + " " + nombmes + " " + ano4; return salida; } /******************************************************************************* * Devuelve en español, catalan gallego vasco o en inglés, la fecha del dia en * * formato: "diasemana, 99 Mes Año" - ("Miercoles, 99 Septiembre 2000" ). * * La lengua se de como argumento de entrada (dlengua), y por defecto se usa * * el ingles. * * * * Autor.: Juan Martínez Pacheco * ********************************************************[03-08-1998]**********/ function fechaLengua(dlengua) { var dactual = new Date(); var dnumdia = dactual.getDate(); var ddiasem; var dnombmes; // --Ingles por defecto. if (!(dlengua == "es" || dlengua == "ca" || dlengua == "gl" || dlengua == "eu" || dlengua == "en" )) dlengua = "en"; // ----- ESPAÑOL --------------------------------- if (dlengua == "es") { switch(dactual.getDay()){ case 0:ddiasem="Domingo";break; case 1:ddiasem="Lunes";break; case 2:ddiasem="Martes";break; case 3:ddiasem="Miércoles";break; case 4:ddiasem="Jueves";break; case 5:ddiasem="Viernes";break; case 6:ddiasem="Sábado";break; } switch(dactual.getMonth()){ case 0:dnombmes="Enero";break; case 1:dnombmes="Febrero";break; case 2:dnombmes="Marzo";break; case 3:dnombmes="Abril";break; case 4:dnombmes="Mayo";break; case 5:dnombmes="Junio";break; case 6:dnombmes="Julio";break; case 7:dnombmes="Agosto";break; case 8:dnombmes="Septiembre";break; case 9:dnombmes="Octubre";break; case 10:dnombmes="Noviembre";break; case 11:dnombmes="Diciembre";break; } } // ----- CATALAN --------------------------------- if (dlengua == "ca") { switch(dactual.getDay()){ case 0:ddiasem="Diumenge";break; case 1:ddiasem="Dilluns";break; case 2:ddiasem="Dimarts";break; case 3:ddiasem="Dimecres";break; case 4:ddiasem="Dijous";break; case 5:ddiasem="Divendres";break; case 6:ddiasem="Dissabte";break; } switch(dactual.getMonth()){ case 0:dnombmes="Gener";break; case 1:dnombmes="Febrer";break; case 2:dnombmes="Març";break; case 3:dnombmes="Abril";break; case 4:dnombmes="Maig";break; case 5:dnombmes="Juny";break; case 6:dnombmes="Juliol";break; case 7:dnombmes="Agost";break; case 8:dnombmes="Setembre";break; case 9:dnombmes="Octubre";break; case 10:dnombmes="Novembre";break; case 11:dnombmes="Desembre";break; } } // ----- GALLEGO --------------------------------- if (dlengua == "gl") { switch(dactual.getDay()){ case 0:ddiasem="Domingo";break; case 1:ddiasem="Luns";break; case 2:ddiasem="Martes";break; case 3:ddiasem="Mércoles";break; case 4:ddiasem="Xoves";break; case 5:ddiasem="Vendres";break; case 6:ddiasem="Sábado";break; } switch(dactual.getMonth()){ case 0:dnombmes="Xaneiro";break; case 1:dnombmes="Febreiro";break; case 2:dnombmes="Marzal";break; case 3:dnombmes="Abril";break; case 4:dnombmes="Maio";break; case 5:dnombmes="San Xoan";break; case 6:dnombmes="Xullo";break; case 7:dnombmes="Agosto";break; case 8:dnombmes="Setembro";break; case 9:dnombmes="Octubro";break; case 10:dnombmes="Santos";break; case 11:dnombmes="Nadal";break; } } // ----- VASCUENCE --------------------------------- if (dlengua == "eu") { switch(dactual.getDay()){ case 0:ddiasem="Igandea";break; case 1:ddiasem="Astelehena";break; case 2:ddiasem="Asteartea";break; case 3:ddiasem="Asteazkena";break; case 4:ddiasem="Osteguna";break; case 5:ddiasem="Ostirala";break; case 6:ddiasem="Larunbata";break; } switch(dactual.getMonth()){ case 0:dnombmes="Urtarrila";break; case 1:dnombmes="Otsaila";break; case 2:dnombmes="Martxoa";break; case 3:dnombmes="Apirila";break; case 4:dnombmes="Maiatza";break; case 5:dnombmes="Ekaina";break; case 6:dnombmes="Uztaila";break; case 7:dnombmes="Ubuztua";break; case 8:dnombmes="Iraila";break; case 9:dnombmes="Urria";break; case 10:dnombmes="Azaroa";break; case 11:dnombmes="Abendua";break; } } // ----- INGLES --------------------------------- if (dlengua == "en") { switch(dactual.getDay()){ case 0:ddiasem="Sunday";break; case 1:ddiasem="Monday";break; case 2:ddiasem="Tuesday";break; case 3:ddiasem="Wednesday";break; case 4:ddiasem="Thursday";break; case 5:ddiasem="Friday";break; case 6:ddiasem="Saturday";break; } switch(dactual.getMonth()){ case 0:dnombmes="January";break; case 1:dnombmes="Febraury";break; case 2:dnombmes="March";break; case 3:dnombmes="April";break; case 4:dnombmes="May";break; case 5:dnombmes="June";break; case 6:dnombmes="July";break; case 7:dnombmes="August";break; case 8:dnombmes="September";break; case 9:dnombmes="October";break; case 10:dnombmes="November";break; case 11:dnombmes="December";break; } } var dano4 = dactual.getFullYear(); var dsalida = ddiasem + ", " + dnumdia + " " + dnombmes + " " + dano4; return dsalida; } /****************************************************************************** * DESLIZAMIENTO DE TEXTO DE DERECHA A IZQUIERDA * * PAGINA INDEX * * Autor.: Juan Martínez Pacheco * ********************************************************[16-08-2004]**********/ saltos_index=2.5; posver_index=0-10; posizq_index=100; function deslizaTextoIndex() { if (posizq_index>20) { posizq_index-=saltos_index; document.getElementById("textodeslizado").style.left=posizq_index+"px"; document.getElementById("textodeslizado").style.top=posver_index+"px"; setTimeout("deslizaTextoIndex()",10); } } isaltos_index=7; iposver_index=65; iposizq_index=400; function deslizaTextoIndexP() { if (iposizq_index>20) { iposizq_index-=isaltos_index; document.getElementById("textodeslizado").style.left=iposizq_index+"px"; document.getElementById("textodeslizado").style.top=iposver_index+"px"; setTimeout("deslizaTextoIndexP()",10); } } /****************************************************************************** * DESLIZAMIENTO DE TEXTO DE DERECHA A IZQUIERDA * * PAGINAS DE CONTENIDO (ENCABEZADO SIMPLE) * * Autor.: Juan Martínez Pacheco * ********************************************************[16-08-2004]**********/ saltos_pagnormal=5; posver_pagnormal=65; posizq_pagnormal=400; function deslizaTextoPagNormal() { if (posizq_pagnormal>20) { posizq_pagnormal-=saltos_pagnormal; document.getElementById("textodeslizado").style.left=posizq_pagnormal+"px"; document.getElementById("textodeslizado").style.top=posver_pagnormal+"px"; setTimeout("deslizaTextoPagNormal()",10); } } /****************************************************************************** * Persiana de Aviso * * Autor.: Juan Martínez Pacheco * ********************************************************[16-08-2002]**********/ var scrollancho=120 //ancho del scroll var scrollalto=100 //alto del scroll var velocidad=2 //velocidad var scrollmsg='' //Texto de salida. //scrollmsg='Estando MARIA Castaña montada en Bicicleta ' scrollmsg= '

' scrollmsg+= 'Emisión en directo de la entrega de PREMIOS ' scrollmsg+= ' CSIC 2005 A LA DIVULGACIÓN CIENTÍFICA.
 
' scrollmsg+= 'Asisten científicos, artistas y deportistas de reconocido prestigió, ' scrollmsg+= 'que han colaboraron en la difusión popular de la actividad científica desarrollada por el ' scrollmsg+= 'CSIC y al conocimiento de los resultados ' scrollmsg+= 'obtenidos en este año.
 
 

' function persianaTxt() { if (document.all) return if (document.getElementById) { document.getElementById("slider").style.visibility="show" ns6marquee(document.getElementById('slider')) } else if(document.layers) { document.slider1.visibility="show" ns4marquee(document.slider1.document.slider2) } } function ns4marquee(whichlayer) { ns4layer=eval(whichlayer) ns4layer.document.write(scrollmsg) ns4layer.document.close() sizeup=ns4layer.document.height ns4layer.top-=sizeup ns4slide() } function ns4slide() { if (ns4layer.top>=sizeup*(-1)) { ns4layer.top-=velocidad setTimeout("ns4slide()",100) } else { ns4layer.top=scrollalto ns4slide() } } function ns6marquee(whichdiv) { ns6div=eval(whichdiv) ns6div.innerHTML=scrollmsg ns6div.style.top=scrollalto sizeup=scrollalto ns6slide() } function ns6slide() { if (parseInt(ns6div.style.top)>=sizeup*(-1)) { ns6div.style.top=parseInt(ns6div.style.top)-velocidad setTimeout("ns6slide()",100) } else { ns6div.style.top=scrollalto ns6slide() } } function abrir_conmodal(pagina) { //var fichero = "help/" + pagina ; var fichero = pagina ; //window.open("help/ventana-hija.html", window.open(fichero, "dlog", "height=300,width=120,resizable=no,scrollbars=yes,status=no,toolbar=no,location=no,dependent=yes,modal=yes"); } /****************************************************************************** * DESLIZAMIENTO VERTICAL DEL CONTENIDO DE UNA VENTANA. * * Autor.: Juan Martínez Pacheco * ********************************************************[10-03-2004]**********/ function mueveCentralCSIC(dir, spd, loop) { loop = true; direction = "up"; speed = 10; scrolltimer = null; if (document.layers) { var page = eval(document.capaCentral); } else { if (document.getElementById) { var page= eval("document.getElementById('capaCentral').style"); } else { if (document.all) { var page = eval(document.all.capaCentral.style); } } } var altura = (parseInt(page.height) * -1); //document.writeln('-----ALTURA = [' + altura + '] *********'); direction = dir; speed = parseInt(spd); var y_pos = parseInt(page.top); if (loop == true) { //if (direction == "dn" && y_pos > -300) { if (direction == "dn" && y_pos > altura) { page.top = (y_pos - (speed)); } else { if (direction == "up" && y_pos < 10) { page.top = (y_pos + (speed)); } else { if (direction == "top") { page.top = 10; } } } scrolltimer = setTimeout("mueveCentralCSIC(direction,speed)", 1); } } function paraCentralCSIC() { loop = false; clearTimeout(scrolltimer); } /* *************************************************************************/ function AlertaMensaje(msg) { alert(msg); } // Fin -->