function sitebusca(){

if (document.all) {
	var fb = document.forms[0];
} else {
	if (document.layers) {
		var fb = document.busqueda.document.forms[0];
	} else {
		var fb = document.forms[0];
	}
}

//var busc =fb.buscar.value
var lema =fb.LEMA.value

if (lema != "") {
//	parent.contenido.location ="/catalog.nsf?SearchDomain&Query=" + busc + "+AND+(NOT+(El+documento+no+tiene+título))+AND+NOT+(frame+AND+wfDocJerarquizado)+AND+NOT+(anexo+AND+NOT+voAnexos)"
//	fb.location ="http://buscon.rae.es/draeI/SrvltGUIBusUsual?TIPO_BUS=3&LEMA=&"+lema+"&"
//	window.open("http://buscon.rae.es/draeI/SrvltGUIBusUsual?TIPO_BUS=3&LEMA="+lema)
	window.open("http://buscon.rae.es/draeI/SrvltConsulta?TIPO_BUS=3&LEMA="+lema,"_blank","location=1,toolbar=1,menubar=1,width=750,height=550,resizable=1,status=1")
	fb.LEMA.value=""
	}else{
	alert("Introduzca el texto a buscar")
	}
}


function alargar(){
 lineas=200
 str=''
 if (navigator.appName =='Netscape')
  for(i=0;i<lineas;i++)
   str+='<br>'
 document.write(str)
 return false
}

function escribircapa(capa,str2){

 if (document.all) {
  eval(capa+'.innerHTML=str2')
 } else {
    if (document.layers) {
   eval('document.'+capa+'.document.write(str2)')
   eval('document.'+capa+'.document.close()')
   } else {
   var micapa;
   micapa = document.getElementById(capa);
   micapa.innerHTML = str2;
  }
 }


}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function opcion(nombre,link,target){
 this.nombre=nombre
 this.link=link
 this.target=target
}

function add(o){
 this.opciones[this.n_opciones]=o
 this.n_opciones+=1
}

function submenu(nombre,link,target){
 
 this.nombre=nombre
 this.link=link
 this.target=target
 this.n_opciones=0
 this.opciones=new Array()
 this.visto=-1
 
 this.add=add
 
}

function menu(){

 this.n_opciones=0
 this.opciones=new Array() 
 
 this.add=add
}

function salto(str,espacio,longitud){
 var newstr=''
 offset=0
 anterior=0
 actual=str.indexOf(' ',anterior+1)
 while (actual!=-1){
  if (actual>=longitud+offset){
   newstr+=str.substring(offset,anterior)+espacio
   offset=anterior+1
  }
  anterior=actual
  actual=str.indexOf(' ',actual+1)
   
 }
 if ((str.length-offset)>longitud)
  newstr+=str.substring(offset,anterior)+espacio+str.substring(anterior+1)
 else
  newstr+=str.substring(offset)
  
 return newstr 
}


function imprimir(m,capa){
var str2=''
 
 var blank=new Image();blank.src='/imagenes/graficos.nsf/imagenes/General*blank/$File/blank.gif'
 
 var espacio1='<img src="'+blank.src+'" width="12" height="1" border="0">'
 var espacio2='<img src="'+blank.src+'" width="24" height="1" border="0">'
 var espacio3='<img src="'+blank.src+'" width="34" height="1" border="0">' 
 for (i=0;i<m.n_opciones;i++){
  with (m.opciones[i]){
   var nombre2=(nombre.length>50)?salto(nombre,'<br>'+espacio3,50):nombre


   var click=(link=='#')?'href="javascript:abrir('+i+')"':'href="'+link+'" target="'+target+'"'

   //Línea añadida. Juan Luis. 10/11/2004
   str2 += '<table border=0 cellspacing="0" cellpadding="1"><tr>'
   str2 += '<td width="10" class="fcolmenu"></td><td width="200" class="fcolmenu">'

   //Esta es la original --> str2+=espacio1+'<a'+click+'>'+nombre2+'</a><br>'
   str2+='<a class="menu"'+click+'>'+nombre2+'</a><br>'

   //Línea añadida --> Juan Luis. 10/11/2004
   str2+='</td></tr></table>'+espacio2

   //Linea original. Se elimina str2+='<img src="'+linea.src+'" width="149" height="1"><br>'


   if (visto==1){
    for (j=0;j<n_opciones;j++){
     with (opciones[j]){
      nombre2=(nombre.length>50)?salto(nombre,'<br>'+espacio3,50):nombre
      str2+=espacio2+'<table border="0" cellspacing=0 cellpadding=1><tr><td width="20" class="fcolmenu"></td><td width="10" class="fsubmenu"></td><td class="fsubmenu" width="178" height="20"><a class="submenu" href='+link+' target='+target+'>'+nombre2+'</a></td></tr></table>'
      }
    }
    str2+=espacio2+'<br>'
   }
  }
 }
 
 
 escribircapa(capa,str2)
}

function abrir(visi){
 var m=menus
 for (i=0;i<m.n_opciones;i++)
  if (visi!=i)
   m.opciones[i].visto=-1
 m.opciones[visi].visto=(-1)*m.opciones[visi].visto
 
 
 imprimir(m,'accesos')
}


function imprimir2(m,capa){

 var str2=''
 
 var blank=new Image();blank.src='/imagenes/graficos.nsf/imagenes/General*blank/$File/blank.gif'
 
 var espacio1='<img src="'+blank.src+'" width="12" height="1" border="0">'
 var espacio2='<img src="'+blank.src+'" width="24" height="1" border="0">'
 var espacio3='<img src="'+blank.src+'" width="34" height="1" border="0">' 
 for (i=0;i<m.n_opciones;i++){
  with (m.opciones[i]){
   var nombre2=(nombre.length>50)?salto(nombre,'&nbsp;', 50):nombre


   var click=(link=='#')?'href="javascript:abrir2('+i+')"':'href="'+link+'" target="'+target+'"'

   //Línea añadida. Juan Luis. 10/11/2004
   str2 += '<table border=0 cellspacing="0" cellpadding="1"><tr>'
   str2 += '<td width="10" class="fcolmenu"></td><td width="200" class="fcolmenu">'

   //Esta es la original --> str2+=espacio1+'<a'+click+'>'+nombre2+'</a><br>'
   str2+='<a class="menu"'+click+'>'+nombre2+'</a><br>'

   //Línea añadida --> Juan Luis. 10/11/2004
   str2+='</td></tr></table>'+espacio2

   //Linea original. Se elimina str2+='<img src="'+linea.src+'" width="149" height="1"><br>'


   if (visto==1){
    for (j=0;j<n_opciones;j++){
     with (opciones[j]){
      nombre2=(nombre.length>50)?salto(nombre,'&nbsp;',50):nombre
	  vlink=link.length-1
	  txt=link.substring(0,vlink)
	  txt1=txt+'&i='+i+'"'
      str2+=espacio2+'<table border="0" cellspacing=0 cellpadding=1><tr><td width="20" class="fcolmenu"></td><td width="10" class="fsubmenu"></td><td class="fsubmenu" width="178" height="20"><a class="submenu" href='+txt1+' target='+target+'>'+nombre2+'</a></td></tr></table>'
      }
    }
    str2+=espacio2+'<br>'
   }
  }
 }
 
 
 escribircapa(capa,str2)
}

function abrir2(visi){
 var m=menusTaxo
 for (i=0;i<m.n_opciones;i++)
  if (visi!=i)
   m.opciones[i].visto=-1
 m.opciones[visi].visto=(-1)*m.opciones[visi].visto
 
 
 imprimir2(m,'tax')
}




function fecha()
{
    var Hoy = new Date();
    var strdiasemana = new Array("Domingo","Lunes","Martes","Mi&eacute;rcoles","Jueves","Viernes","S&aacute;bado");
    var strmes = new Array("enero","febrero","marzo","abril","mayo","junio","julio","agosto","septiembre","octubre","noviembre","diciembre");
    var strfecha = strdiasemana[Hoy.getDay()] + ", " + Hoy.getDate() + " " + strmes[Hoy.getMonth()] + " del " + Hoy.getFullYear();
    return(strfecha);
}

var movement
var l1 =   152; // left of ticker in pixel, or 0 to position relative
var tt1 =   3; // top of ticker in pixel, or 0 to position relative
var w1 = 475 // width of ticker in pixel
var ie = document.all ? true : false;
var first = true;
var l2 = l1 + w1;
var l3 = l1 - l2;
var l = l2;
var longtexto = 1400; //longitud en pixels del texto que se quiere mostrar en el ticker

function tickinit() {
if (ie) {
 if (l1 == 0 && tt1 == 0) {
  pos = document.all['tickpos'];
  l1 = getLeft(pos);
  tt1 = getTop(pos);
 }
 ticktext.style.posTop = tt1;
 }
 else {
 if (l1 == 0 && tt1 == 0) {
  pos = document.anchors['tickpos'];
  l1 = pos.x;
  tt1 = pos.y;
 }
 if (document.ticktext) {
  document.ticktext.pageY = tt1;
 } else {
  document.getElementById("ticktext").pageY = tt1;
 }
}
l2 = l1 + w1;
l3 = l1 - l2;
l = l2;
movement=setInterval('tick()', 10);
}

function tickStop(timeid){
clearInterval(timeid);
}

function getLeft(ll) {
if (ll.offsetParent)
return (ll.offsetLeft + getLeft(ll.offsetParent));
else 
return (ll.offsetLeft);
}

function getTop(ll) {
if (ll.offsetParent)
return (ll.offsetTop + getTop(ll.offsetParent));
else
return (ll.offsetTop);
}

function tick() {

 l = l - 0.5;
 
 //if (l < l3) l = l2;
 //cambio del día 23/11/2004, para que salga más texto en el ticker de la página inicial
 if (l < (0 -longtexto)) l = l2;
 cl = l1 - l;
 cr = l2 - l;
 if (ie) {
  ticktext.style.posLeft = l;
  ticktext.style.posTop = tt1;
  ticktext.style.clip = "rect(auto "+cr+"px auto "+cl+"px)";
  if (first) ticktext.style.visibility = "visible";
 }
 else {
  if (document.ticktext) {
   document.ticktext.pageX = l;
   document.ticktext.clip.left = cl;
   document.ticktext.clip.right = cr;
  } else {
   document.getElementById("ticktext").style.left = l;
   document.getElementById("ticktext").style.posTop = tt1;
   document.getElementById("ticktext").style.clip = "rect(auto " + cr + "px auto " + cl + "px)";
  }
 if (document.ticktext) {
  if (first) document.ticktext.visibility = "show";
  } else {
  if (first) document.getElementById("ticktext").visibility = "show";
  }
 }
first = false;
}