//DESPLAZAMIENTO DE TEXTOS EN LA BARRA DE ESTADO //Autor: Iván Nieto Pérez //Este script y otros muchos pueden //descarse on-line de forma gratuita //en El Código: www.elcodigo.net var texto, longitud, velocidad, sentido var blancos = " " var izda = false var dcha = false var izdaID = null var dchaID = null function VerScript(formulario) { ObtieneBlancos(formulario) substrfun = formulario.sentido[0].checked ? 'texto.substring(1, longitud) + texto.charAt(0)' : 'texto.charAt(longitud - 1) + texto.substring(0, longitud - 1)' var scriptDetener = 'function Detener() {\n clearTimeout(movID)\n mov = false\n}\n' var scriptIniciaTexto = 'function IniciaTexto(formulario) {\n' + ' Detener()\n' + ' texto = "' + blancdelante + formulario.texto.value + blancdetras + '"\n' + ' longitud = texto.length\n' + ' mov = true\n' + ' DesplazaTexto()\n' + '}\n' var scriptDesplazaTexto = 'function DesplazaTexto() {\n' + ' window.status = texto\n' + ' texto = ' + substrfun + '\n' + ' movID = setTimeout( "DesplazaTexto()", ' + parseInt (formulario.velocidad.value) + ')\n' + '}\n' formulario.display.value = '\n' + '\n' + '\n' + '\n' + '' document.location = "#verscript" } function IniciaTexto(formulario) { Detener() ObtieneBlancos(formulario) texto = blancdelante + formulario.texto.value + blancdetras longitud = texto.length velocidad = parseInt (formulario.velocidad.value) if (formulario.sentido[0].checked) { izda = true DesplazaTextoIzda() } else { dcha = true DesplazaTextoDcha() } } function ObtieneBlancos (formulario) { blancdelante = "" blancdetras = "" //blancos delante for (var x = 0; x < parseInt( formulario.numbldelante.value ); x++) blancdelante += blancos //blancos detras for (var x = 0; x < parseInt( formulario.numbldetras.value ); x++) blancdetras += blancos } function DesplazaTextoIzda() { window.status = texto texto = texto.substring(1, longitud) + texto.charAt(0) izdaID = setTimeout( "DesplazaTextoIzda()", velocidad) } function DesplazaTextoDcha() { window.status = texto texto = texto.charAt(longitud - 1) + texto.substring(0, longitud - 1) dchaID = setTimeout( "DesplazaTextoDcha()", velocidad) } function Detener() { if (izda) { clearTimeout(izdaID) izda = false } if (dcha) { clearTimeout(dchaID) dcha = false } }