var NS4=(navigator.appName=="Netscape" && parseInt(navigator.appVersion)>=4);
var ObxCapa=(NS4)?'document':'document.all',ObxEstilo=(NS4)?'':'.style';
var ConstMostrar='visible',ConstEsconder='hidden';
var y=new Array(),yy=new Array(),t=new Array(),l=new Array(),f=new Array(),MElmSl=-1;
function Capa(NomeCapa){return document.getElementById(NomeCapa).style;}
function ContidoCapa(NomeCapa,Contido){
  document.getElementById(NomeCapa).innerHTML = Contido;
}
function Posicion0(NomeCapa){
  yy[NomeCapa]-=y[NomeCapa];t[NomeCapa]+=y[NomeCapa];y[NomeCapa]=0;Capa(NomeCapa).top=t[NomeCapa];
  document.getElementById(NomeCapa).style.clip="rect(0,"+l[NomeCapa]+","+yy[NomeCapa]+",0)";
//  if (NS4){document[NomeCapa].clip.top=0;document[NomeCapa].clip.bottom=yy[NomeCapa];}
//  else {document.all[NomeCapa].style.clip="rect(0,"+l[NomeCapa]+","+yy[NomeCapa]+",0)";}
}
function IniciarCapa(NomeCapa,py,pyy,pt,pl,pf){y[NomeCapa]=py;yy[NomeCapa]=pyy;t[NomeCapa]=pt;l[NomeCapa]=pl;f[NomeCapa]=pf;}
function Avance(NomeCapa){
  if (y[NomeCapa]<f[NomeCapa]){
	y[NomeCapa]+=2;yy[NomeCapa]+=2;t[NomeCapa]-=2;
	cp = document.getElementById(NomeCapa);
	cp.style.top=t[NomeCapa];cp.style.clip="rect("+y[NomeCapa]+","+l[NomeCapa]+","+yy[NomeCapa]+",0)";
    //if (NS4) {document[NomeCapa].top=t[NomeCapa];document[NomeCapa].clip.top=y[NomeCapa];document[NomeCapa].clip.bottom= yy[NomeCapa];}
    //else {document.all[NomeCapa].style.top=t[NomeCapa];document.all[NomeCapa].style.clip="rect("+y[NomeCapa]+","+l[NomeCapa]+","+yy[NomeCapa]+",0)";}
  }
}
function Retroceso(NomeCapa){
  if (y[NomeCapa]>0){
	y[NomeCapa]-=2;yy[NomeCapa]-=2;t[NomeCapa]+=2;
	cp.style.top=t[NomeCapa];cp.style.clip="rect("+y[NomeCapa]+","+l[NomeCapa]+","+yy[NomeCapa]+",0)";
    //if (NS4) {document[NomeCapa].top=t[NomeCapa];document[NomeCapa].clip.top=y[NomeCapa];document[NomeCapa].clip.bottom=yy[NomeCapa];}
    //else {document.all[NomeCapa].style.top=t[NomeCapa];document.all[NomeCapa].style.clip="rect("+y[NomeCapa]+","+l[NomeCapa]+","+yy[NomeCapa]+",0)";}
  }
}
var Sentido=new Array(),Temp=0;
function Temporizador(){if (Sentido["InformacionC"]==1) Avance("InformacionC");else if (Sentido["InformacionC"]==-1) Retroceso("InformacionC");Temp=setTimeout("Temporizador();",50);}
function Arriba(NomeCapa){Sentido[NomeCapa]=-1;if (!Temp) Temp=setTimeout("Temporizador();",50);}
function Abaixo(NomeCapa){Sentido[NomeCapa]=1;if (!Temp) Temp=setTimeout("Temporizador();",50);}
function Deter(NomeCapa){Sentido[NomeCapa]=0;if (Temp){clearTimeout(Temp);Temp=0;}}
