var cautr="Dirección y diseño de Jesús Quílez Bielsa. "
var cnavg="Microsoft Internet Explorer"
var posdiviniy=0
var cvern="4"
var lsuenamusica=false
var nscr=0
var nsct=0
var ncierra=0
var esqvis=false

window.onerror = trataerror;

function trataerror(){
return true;
}

function compruebanavegador(){
cnavegador=navigator.appName
}

function estaen(cad,ter) {
pos=-1
lng=cad.length
lnt=ter.length
for (con=0;con+lnt-1<lng;++con) {
if (cad.substring(con,con+lnt)==ter) {
pos=con
return (pos);
}
}
return (pos);
}

function cambiacadena(pal,ori,des) {
nLp=pal.length
orb=ori
nLo=orb.length
nSd=estaen(pal,orb)
nLo=orb.length
if (nSd>-1){
	pal=pal.substring(0,nSd)+des+pal.substring(nSd+nLo)
	pal=cambiacadena(pal,ori,des)
}
return (pal)
}


function abre(origen){
ncierra=0
numima=origen.substring(3,5)
setTimeout("camdiv(numima)",500)
document["ima"+numima].src = "papiro4.gif"
}

function cierra(origen){
ncierra=1
oir('pap06.au')
numima=origen.substring(3,5)
if (document.all) {
document.all["div"+numima].style.visibility="hidden"
}
else {document.layers["div"+numima].visibility="hidden"}
document["ima"+numima].src = "papiro3.gif"
}

function camdiv(actima){
if (ncierra!=1) {
oir('pap05.au')
if (document.all) {
document.all["div"+actima].style.visibility="visible"
}
else {document.layers["div"+actima].visibility="visible"}
}
}

function oir(snd){
lsuenamusica=true
document.oye.cane(snd);
}
function rep(snd){
lsuenamusica=true
document.oye.canta(snd)
}
function calla() {
if (lsuenamusica){
document.oye.tace();
lsuenamusica=false
}
}

function autor(){
nscr=++nscr
if (nsct==0) {nsct=cautr.length}
if (nscr==nsct) {nscr=1}
window.status=cautr.substring(nscr)+cautr.substring(0,nscr)
setTimeout('autor()',200)
}

function navegador(ntip) {
cnavact=navigator.appName
nveract=navigator.appVersion
if (ntip==2) {
if (cnavact!=cnavg) {
alert("Esta página está preparada para "+cnavg+".  Es posible que con su navegador no se vea bien")
}
}
else {
if (ntip==1) {
if (nveract<cvern) {
alert("Esta página está preparada para versión "+cvern+" ó superior.  Es posible que con la versión de su navegador: "+nveract+" No se vea bien")
}
}
}
}

function camina(cap,x,y) {
  if(document.all) {
	document.all[cap].style.left = x;    
	document.all[cap].style.top = y;
  } else if(document.layers) {
    document.layers[cap].moveTo(x, y);
  }
}

function posdivx(cap) {
  if(document.all) {
	x = document.all[cap].style.left ;    
  } else if(document.layers) {
    x = document.layers[cap].left;
  }
  return (parseInt(x,10))
}

function posdivy(cap) {
  if(document.all) {
	y = document.all[cap].style.top ;
  } else if(document.layers) {
    y = document.layers[cap].top;
  }
  return (parseInt(y,10))
}

function altdiv(cap) {
  if(document.all) {
	y = document.all[cap].style.height ;
  } else if(document.layers) {
    y = document.layers[cap].clip.height;
  }
  return (parseInt(y,10))
}

function ancdiv(cap) {
  if(document.all) {
	x = document.all[cap].style.width ;
  } else if(document.layers) {
    x = document.layers[cap].clip.width;
  }
  return (parseInt(x,10))
}

function hazcolordiv(cap,color) {
  if(document.all) {
	document.all[cap].style.backgroundColor = color;
  } else if(document.layers) {
    	document.layers[cap].clip.backgroundColor = color;
  }
}

function dacolordiv(cap){
  if(document.all) {
	color=document.all[cap].style.backgroundColor;
  } else if(document.layers) {
    	color=document.layers[cap].clip.backgroundColor;
  }
	return (color)
}


function hazaltdiv(cap,alt) {
  if(document.all) {
	document.all[cap].style.height = alt;
  } else if(document.layers) {
    	document.layers[cap].clip.height =alt;
  }
}

function hazancdiv(cap,anc) {
  if(document.all) {
	document.all[cap].style.width = anc;
  } else if(document.layers) {
	document.layers[cap].clip.width = anc;
  }
}


function nvotex(loc) {
cnav=navigator.appName
tx=document.body.clientWidth
ty=document.body.scrollHeight
if (cnav=="Netscape") {
x=0
y=0
}
else {
x=window.event.screenX
y=window.event.screenY
}
if (x+480>tx) {x=x-480}
if (y+200>ty) {y=y-200}
opc="scrollbars=yes,width=480,height=200,top="+y+",left="+x+""
nuevo=window.open(loc,"",opc)
}

function iradoc(destino) {
nuevo=window.open(destino)
}

function nvaven(loc,anc,lar) {
if (anc==0) {anc=750}
if (lar==0) {lar=500}
opc="scrollbars=yes,width="+anc+",height="+lar+",top=20,left=20"
nuevo=window.open(loc,'',opc)
}

function abremapa(loc){
opc="scrollbars=no,width=780,height=420,top=40,left=5"
nuevo=window.open("swf/"+loc,'',opc)
}

function abrenota(loc) {
cnav=navigator.appName
cnta="d"+loc
tx=document.body.clientWidth
ty=document.body.scrollHeight
if (document.layers) {
window.captureEvents(Event.MOUSEMOVE)
x=e.pageX
y=e.pageY
}
else {
nvax=window.event.clientX+document.body.scrollLeft
nvay=window.event.clientY+document.body.scrollTop
}
ancnot=ancdiv(cnta)
altnot=altdiv(cnta)
if (nvax+ancnot>tx) {nvax=nvax-ancnot}
if (nvay+altnot>ty) {nvay=nvay-altnot}
camina(cnta,nvax,nvay)
verdiv(cnta)
}

function cierranota(cnota){
ocudiv(cnota)
}

function nvoind(loc,anc) {
//if (anc==undefined) {anc=320}
anc=320
//posiniy=fincab()+window.screenTop
posiniy=120
opc="scrollbars=yes,width="+anc+",height=500,top="+posiniy+",left=0"
nuevo=window.open(loc,'',opc)
}

function hazpag(dts,tit) {
cnav=navigator.appName
tx=screen.width
ty=screen.height
if (cnav=="Netscape") {
x=parseInt(tx/3,10)
y=parseInt(ty/3,10)
}
else {
x=window.event.screenX
y=window.event.screenY
}
if (x+400>tx) {x=x-400}
if (y+200>ty) {y=y-200}
opc="scrollbars=yes,width=400,height=200,top="+y+",left="+x+""
dts="<html><head><title>"+tit+"</title></head><body bgcolor='#CCCCFF'>"+dts+"</body><html>"
nuevo=window.open("","",opc)
nuevo.document.write(dts)
nuevo.document.close()
}

function dicphp(plbbus) {
plbbus=cambiacadena(plbbus,".","")
plbbus=cambiacadena(plbbus,",","")
plbbus=cambiacadena(plbbus,";","")
plbbus=cambiacadena(plbbus,":","")
plbbus=cambiacadena(plbbus,")","")
plbbus=cambiacadena(plbbus,"(","")
plbbus=plbbus.toLowerCase()
cnav=navigator.appName
tx=screen.width
ty=screen.height
if (cnav=="Netscape") {
x=parseInt(tx/3,10)
y=parseInt(ty/3,10)
}
else {
x=window.event.screenX
y=window.event.screenY
}
if (x+400>tx) {x=x-400}
if (y+200>ty) {y=y-200}
opc="scrollbars=yes,width=400,height=200,top="+y+",left="+x+""
dts="<html><head><title>Diccionario latino</title></head>"
dts=dts+"<body bgcolor='#CCCCFF' onload=document.datos.submit()>"
dts=dts+"<FONT face='Verdana' size=2>"
dts=dts+"Buscando el término '"+plbbus+"', espera por favor...</font>"
dts=dts+"<FORM name=datos action='../diclat/diclat.php' method=post>"
dts=dts+"<input name=tx00 type=hidden value='"+plbbus+"'></form>"
dts=dts+"</body><html>"
nuevo=window.open("","",opc)
nuevo.document.write(dts)
nuevo.document.close()
}

function esvisiblediv(cnomdiv) {
esvisible=false
if(document.all) {
if(document.all[cnomdiv].style.visibility=="visible"){esvisible=true}
} 
else if(document.layers) {
if(document.layers[cnomdiv].visibility=="visible"){esvisible=true}
}
return (esvisible)
}

function verdiv(cnomdiv) {
if(document.all) {
document.all[cnomdiv].style.visibility="visible"
} 
else if(document.layers) {
document.layers[cnomdiv].visibility="visible"
}
}

function ocudiv(cnomdiv) {
if(document.all) {
document.all[cnomdiv].style.visibility="hidden"
} 
else if(document.layers) {
document.layers[cnomdiv].visibility="hidden"
}
}

function clrdiv(cnumero,ccolor) {
cnomdiv="div0"+cnumero
alert(cnomdiv)
if(document.all) {
document.all[cnomdiv].style.bgcolor=ccolor
} 
else if(document.layers) {
document.layers[cnomdiv].bgcolor=ccolor
}
}


function veresq(){
if (esqvis)
	{
	esqvis=false
	ocudiv('esquema')
	}
else {
	esqvis=true
	mantendiv('esquema')
	verdiv('esquema')
	}
}

function mantendiv(cnomdiv) {
if (posdiviniy==0) {posdiviniy=posdivy(cnomdiv)}
camina(cnomdiv,posdivx(cnomdiv),document.body.scrollTop+(posdiviniy-10))
}

function mantencab(cnomdiv) {
nscrol=document.body.scrollTop
camina(cnomdiv,0,nscrol)
camina("cab01",0,nscrol)
}

function minimicab() {
if (esvisiblediv("cab01")) {ocudiv("cab01");verdiv("cab00")}
else {ocudiv("cab00");verdiv("cab01")}
}


function fincab(cnomdiv) {
posfincab=posdivy('cab00')+altdiv('cab00')+12
return (posfincab)
}

function remarca(ndivrem) {
if (document.all) {ntotal=document.all.length}
nter=0;ctip=""
if (document.all) {
	for (nele=0;nele<ntotal;++nele) {
	cele=document.all[nele].id
	ctip=cele.substring(0,3)
	if (ctip=="div") {++nter}
	}
}
else {nter=document.layers.length}
for (nele=0;nele<nter;++nele) {
	if (nele==ndivrem) { clrdiv(nele,"blue")}
	else {clrdiv(nele,"white")}
}
}

function actmnu(numeromenu) {
menuactual="mnu"+numeromenu
if (esvisiblediv(menuactual)) {ocudiv(menuactual)}
else {
//camina(menuactual,posdivx(menuactual),posdivy('cab00')+altdiv('cab00'))
camina(menuactual,posdivx(menuactual),altdiv('cab00')+5)
verdiv(menuactual)}
}

function pulbtn(numeroboton,posx) {
nombremenu="menu"+numeroboton
nuevaimagen="bt"+numeroboton+"sel.gif"
document.images["bt"+numeroboton].src=nuevaimagen
if (posx != 0) {
//showMenu(eval(nombremenu),posx,fincab())
if (numeroboton=="id") {showMenu(eval(nombremenu),posx,alturamenub)}
else {showMenu(eval(nombremenu),posx,alturamenu)}
}
}

function solbtn(numeroboton) {
nuevaimagen="bt"+numeroboton+"nor.gif"
document.images["bt"+numeroboton].src=nuevaimagen
}

function cierra(){
window.close()
}

function arriba(){
var larriba=true
var alturadocumento=document.body.scrollHeight
	scrollactual=posdivy("mov")
	document.body.doScroll("pageUp")
	scrollfinal=posdivy("mov")
	proximoscroll=scrollactual-scrollfinal
	if (scrollfinal-proximoscroll<=0){larriba=false}
	if (proximoscroll==0){larriba=false}
	if (!larriba){document.images["icoarriba"].src="nada.gif" 
	document.images["icoabajo"].src="icoaba.gif"
	}
}

function abajo(){
var labajo=true
	alturadocumento=document.body.scrollHeight
	scrollactual=posdivy("mov")
	document.body.doScroll("pageDown")
	scrollfinal=posdivy("mov")
	proximoscroll=scrollfinal-scrollactual
	if (proximoscroll==0){labajo=false}
	if (scrollfinal+proximoscroll>alturadocumento){labajo=false}
	if (!labajo){document.images["icoabajo"].src="nada.gif" 
	document.images["icoarriba"].src="icoarr.gif"
	}
}

function descargadoc(){
diract=window.location.href
dirdoc=cambiacadena(diract,".html",".doc")
dirdoc=cambiacadena(diract,".htm",".doc")
window.location=dirdoc
}

function daazar(valormax) {
  var ahora = new Date()
  var nazar = ahora.getTime() * ahora.getSeconds() * Math.random()
  return Math.round(nazar % valormax)
}

function verdvs(cnomdiv) {
if(document.all) {
	document.all[cnomdiv].style.visibility="visible"
} 
else if(document.layers) {
	document.layers[cnomdiv].visibility="visible"
}
}


//<a name="1" href="#1" onclick="nvotex('tx01.html')">
//<img src="icpa03.gif"></a>