var base;/*region en la que se realiza el efecto*/ 
var periodo;
var posBar=0;/*Posicion de la barra*/
var arrCursor=1;/*indica elemento a visualizar*/
var nElem;/*Maximo de elementos incluidos*/
var altura_c;/*Altura de la capa visualizada*/
var vseg;

function vert_linea(iseg,clasElem){
   nElem=0;
   vseg=iseg;
   base = document.getElementById("text_cambio");
   altura_c = base.offsetHeight;
   var divi = parseInt(altura_c/5);
   altura_c = divi*5;
   var nNota=document.getElementsByTagName("td");
   for(var i=0; i<nNota.length; i++){
      if(nNota[i].className.indexOf(clasElem)>-1){ 
	     nNota[i].height = altura_c-5;
		 nElem=nElem+1;
	  }
   }
   periodo = setInterval(secuencia,50);
}

function secuencia() {
   var pAlto=altura_c*(arrCursor-1);
   var pTotal=altura_c*nElem;
   posBar+=5;
   if(posBar>pTotal) {
	  posBar=0; 
      arrCursor=1; 
   }
   if(posBar>pAlto) {
	  pausa();
      periodo = setTimeout(continua, vseg*1000);
      arrCursor+=1; 
   }
   base.scrollTop=posBar;
}

function pausa(){ clearInterval(periodo); }
function continua(){ periodo = setInterval(secuencia,50); }