window.defaultStatus = "Bienvenido al Hadrianeum"
Date.prototype.getFullYear = getFullYear
var lmod = new Date(document.lastModified)
var canterior=""
var nletrascita=0
var nletraactual=1
var ccitaactual=""
var yr
var rd
var tm
var zt
rd = lmod.toString();
yr = lmod.getFullYear();
tm = lmod.toLocaleString();
zt = lmod.toGMTString();

window.onresize=situamensajes

function vercita(elemento){
if (canterior==""){canterior=elemento.innerHTML}
texto=document.getElementById("fraseespanol")
elemento.innerHTML=texto.innerHTML
setTimeout("volverallatin()",6000)
}

function volverallatin(){
texto=document.getElementById("cita")
texto.innerHTML=canterior
}

function inicita(){
texto=document.getElementById("fraselatin")
ccitaactual=texto.innerHTML
nletrascita=ccitaactual.length
setTimeout("siguecita()",500)
}

function siguecita(){
if (nletraactual<=nletrascita){
texto=document.getElementById("cita")
cnuevo=ccitaactual.substring(0,nletraactual)
texto.innerHTML=cnuevo
++nletraactual
setTimeout("siguecita()",100)
}
}

function situamensajes(){
nposximagen=busposx("escenario")
nposyimagen=busposy("escenario")
nposdiv1x=nposximagen+50
nposdiv1y=nposyimagen+200
nposdiv0x=nposximagen+10
nposdiv0y=nposyimagen+270
camina("div01",nposdiv1x,nposdiv1y)
camina("div00",nposdiv0x,nposdiv0y)
}

function getFullYear() {
        var n = this.getYear();
        //if (n <= 75) { n += 100}
        //n += 1000;
        return n;
}

function hazentrada(){
situamensajes()
inicita()
tampag()
ponhora()
}

function grerom(){
var fcha = new Date()
ngre=fr00.txaa.value
nrom=aburbe(ngre)
fr00.txau.value=nrom
fr00.txac.value=hazroar(nrom)
fr00.txar.value=hazarro(ngre)
ndia=fr00.slda.value
nmes=fr00.slma.selectedIndex-1
ndias=ldias[nmes]
nnonas=lnonas[nmes]
nidus=lidus[nmes]
nhor=parseInt(fr00.txha.value,"10")
nmin=parseInt(fr00.txma.value,"10")
nmin=(nhor*60)+nmin
nhor=horaromana(nmes,nmin)
cfchrom=hazkalendas(ndia,nmes,ndias,nnonas,nidus)
fr00.slpr.value=cpridie
fr00.sldr.value=cdiem
fr00.slkr.value=ckalendas
fr00.slmr.value=cmensis.substring(0,3)+"."
fr00.slhr.value=lhoras[nhor]
verhora()
}
function romgre(){
ngre=hazroar(fr00.txar.value)
nrom=aburbe(ngre)
fr00.txau.value=nrom
fr00.txac.value=hazroar(nrom)
nmesrom=fr00.slmr.selectedIndex-1
nhorrom=fr00.slhr.selectedIndex
nminutos=horaactual(nmesrom,nhorrom)
nhor=parseInt((nminutos/60),"10")
nmin=nminutos-(nhor*60)
fr00.txha.value=nhor
fr00.txma.value=nmin
cdiarom=fr00.sldr.value
cprirom=fr00.slpr.value
ckalrom=fr00.slkr.value
ndia=dadia(cprirom,cdiarom,ckalrom,nmesrom)
fr00.slda.value=ndia
fr00.slma.selectedIndex=nmensis+1
nano=fr00.txar.value
nano=hazroar(nano)
fr00.txaa.value=nano
}
function urbgre(){
nmesrom=fr00.slmr.selectedIndex-1
nhorrom=fr00.slhr.selectedIndex
nminutos=horaactual(nmesrom,nhorrom)
nhor=parseInt((nminutos/60),"10")
nmin=nminutos-(nhor*60)
fr00.txha.value=nhor
fr00.txma.value=nmin
cdiarom=fr00.sldr.value
cprirom=fr00.slpr.value
ckalrom=fr00.slkr.value
ndia=dadia(cprirom,cdiarom,ckalrom,nmesrom)
fr00.slda.value=ndia
fr00.slma.selectedIndex=nmensis+1
nano=fr00.txau.value
nano=hazroar(nano)
fr00.txar.value=hazarro(nano+753)
fr00.txaa.value=nano+753
fr00.txac.value=nano+753
}
function ponhora(){
window.resizeTo(800,600)
oir("hadrianus.au")
var acthora=""
var fcha = new Date()
var nano= fcha.getFullYear()
var nmes= fcha.getMonth()
var ndia= fcha.getDate()
var nhor= fcha.getHours()
var nmin= fcha.getMinutes()
ndias=ldias[nmes]
nnonas=lnonas[nmes]
nidus=lidus[nmes]
nmin=(nhor*60)+nmin
nhor=horaromana(nmes,nmin)
nrom=aburbe(nano)
cfchrom=hazkalendas(ndia,nmes,ndias,nnonas,nidus)
if(estaen(lhoras[nhor],"VIGILIA")>-1){
   ctipo="v"
   cnomtip="VIGILIA"
   nhor=nhor-12
   }
else {
     ctipo="h"
     cnomtip="HORA"
     }
chora="ANNO "+nrom+" AB URBE CONDITA "+cpridie+" "+cdiem+" "+ckalendas+" "+cmensis.substring(0,3)+". "+cnomtip+" "+lhoras[nhor]
cfoto="images/fondoruinas90_"+ctipo+nhor+".jpg"
document.images["escenario"].src=cfoto
document.getElementById("letrero").innerHTML="<font face='Verdana' size=2 color='#ccccff'><B>"+chora+"</B><BR>Act. viernes, 26 de agosto de 2005</FONT>"
}
function verhora(){
chora=fr00.slhr.value.toLowerCase()
if (chora!=""){
	if (estaen(chora,"vigilia")>-1){
		chora=cambiacadena(chora," vigilia","")
		if (chora=="prima"){document.bgColor = "#937b44"}
		if (chora=="secunda"){document.bgColor = "#ad9254"}
		if (chora=="tertia"){document.bgColor = "#c1a460"}
		if (chora=="quarta"){document.bgColor = "#ceb271"}
		carc="images/v_"+chora+".jpg"
	}
	else {
		carc="images/h_"+chora+".jpg"
		document.bgColor = "#fde5a5"
	}
}
else {
	carc="images/solarium1.jpg"
	document.bgColor = "#fde5a5"
}
//document.images["reloj"].src=carc
}