function menu(){
	carga();
	InitialiseScrollableArea();
}
function IP_swapImgRestore() {  
  var i,x,a=document.IP_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function IP_findObj(n, d) {  
  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=IP_findObj(n,d.layers[i].document); return x;
}

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

function IP_preloadImages() {  
  var d=document; if(d.images){ if(!d.IP_p) d.IP_p=new Array();
    var i,j=d.IP_p.length,a=IP_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.IP_p[j]=new Image; d.IP_p[j++].src=a[i];}}
}
function OpenVentaNa(P_pagina,N_ancho,N_alto,N_barra,N_amplia) {
		window.open(P_pagina, 'dy', 'toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars='+N_barra+',width='+N_ancho+',height='+N_alto+',left=0,top=110,screenLeft=110,screenTop=110,resizable='+N_amplia+'');
}
function carga(){

	IP_preloadImages('../img/tproductos.gif','../img/tservicios.gif','../img/tdelegaciones.gif','../img/tproductosact.gif','img/tserviciosact.gif','../img/tdelegacionesact.gif','../img/logearsup.gif','../img/fondsup.jpg','../img/pix.gif','../img/binicioact.gif','../img/binicio.gif','../img/bmailact.gif','../img/bmail.gif','../img/hendcelda.gif','../img/hendcelda1.gif','../img/hendcelda3.gif','../img/endglosa.gif','../img/fondglosa.gif','../img/bglosarioact.gif','../img/bglosario.gif','../img/scrollizqact.gif','../img/scrollizq.gif','../img/scrollderact.gif','../img/scrollder.gif');
}

function verifyCompatibleBrowser(){ 
    this.ver=navigator.appVersion 
    this.dom=document.getElementById?1:0 
    this.ie5=(this.ver.indexOf("MSIE 5")>-1 && this.dom)?1:0; 
    this.ie4=(document.all && !this.dom)?1:0; 
    this.ns5=(this.dom && parseInt(this.ver) >= 5) ?1:0; 
 
    this.ns4=(document.layers && !this.dom)?1:0; 
    this.bw=(this.ie5 || this.ie4 || this.ns4 || this.ns5) 
    return this 
} 
bw=new verifyCompatibleBrowser() 
 
 
var speed=50
 
var loop, timer 
 
function ConstructObject(obj,nest){ 
    nest=(!nest) ? '':'document.'+nest+'.' 
    this.el=bw.dom?document.getElementById(obj):bw.ie4?document.all[obj]:bw.ns4?eval(nest+'document.'+obj):0; 
    this.css=bw.dom?document.getElementById(obj).style:bw.ie4?document.all[obj].style:bw.ns4?eval(nest+'document.'+obj):0; 
    this.scrollWidth=bw.ns4?this.css.document.width:this.el.offsetWidth 
    this.clipWidth=bw.ns4?this.css.clip.width:this.el.offsetWidth 
    this.left=MoveAreaLeft;this.right=MoveAreaRight; 
    this.MoveArea=MoveArea; this.x; this.y; 
    this.obj = obj + "Object" 
    eval(this.obj + "=this") 
    return this 
} 
function MoveArea(x,y){ 
    this.x=x;this.y=y 
    this.css.left=this.x 
    this.css.top=this.y 
} 
 
function MoveAreaRight(move){ 
	if(this.x>-this.scrollWidth+objmarcoB.clipWidth){ 
    this.MoveArea(this.x-move,0) 
    if(loop) setTimeout(this.obj+".right("+move+")",speed);
	} 
} 
function MoveAreaLeft(move){ 
	if(this.x<22){ 
    this.MoveArea(this.x-move,0) 
    if(loop) setTimeout(this.obj+".left("+move+")",speed);
	} 
} 
 
function PerformScroll(speed){ 
	if(initialised){ 
		loop=true; 
		if(speed>0) objltextoB.right(speed);
		else objltextoB.left(speed);
	} 
}
function CeaseScroll(){ 
    loop=false 
    if(timer) clearTimeout(timer) 
} 
var initialised; 
function InitialiseScrollableArea(){ 
    objmarcoB=new ConstructObject('LmarcoDiv')
	objltextoB=new ConstructObject('LmarcocontDiv','LmarcoDiv')
	objltextoB.MoveArea(22,0)
    objmarcoB.css.visibility='visible'
    initialised=true; 
}