<!--Início do Arquivo-->
<!--Arquivo com os Scripts utilizados no Site da Ethos - Estudos Limítrofes em Parapsicologia-->
<!--Criado por Fábio Luiz Crema - crema@rla01.pucpr.br - (c) 2000 - Todos os Direitos Reservados-->

function AP() {
  var i, args=AP.arguments; AP = false;
  for (i=0; i<(args.length-1); i+=2) eval(args[i]+".location='"+args[i+1]+"'");
}

function PEN() {
  var i, args=PEN.arguments; PEN = false;
  for (i=0; i<(args.length-1); i+=2) eval(args[i]+".location='"+args[i+1]+"'");
}

function pos(width,height) {
	var l = screen.width;
	var a = screen.height;
	var larg = parseInt(l);
	var alt = parseInt(a);
	var larg_a = parseInt(width);
	var alt_a = parseInt(height);
	top.window.resizeTo(larg_a,alt_a);
	px = (larg - larg_a) / 2;
	py = (alt - alt_a) / 2;
/*	px = 480 ; py = 0 ;  */
	top.window.moveTo(px,py);
/*	if ((larg==800) && (alt==600)) {top.window.moveTo(0,0);}
	if ((larg>=1024) && (alt>=768)) {top.window.moveTo(112,84);}
*/
}

function reso() {
	var l = screen.width;
	var a = screen.height;
	var larg = parseInt(l);
	var alt = parseInt(a);
	if ((larg>=800) && (alt>=600)) {
		document.write('<font size="3"><b>A</b></font> configura&ccedil;&atilde;o de seu V&iacute;deo &eacute; de <b>' + l + 'x' + a + '</b> pixels.\n<br>');
	} else {
		document.write('&Eacute; necess&aacute;rio utilizar configura&ccedil;&otilde;es de V&iacute;deo\n<br>\ncom pelo menos 800x600 pixels');
	}
}


function res() {
	var l = screen.width;
	var a = screen.height;
	var larg = parseInt(l);
	var alt = parseInt(a);
	if ((larg>=800) && (alt>=600)) {
		document.write('<strong>' + l + 'x' + a + '</strong> pixels');
	} else {
		document.write('<strong>' + l + 'x' + a + '</strong> pixels ' + '<strong><font size="1">(&Eacute; necess&aacute;rio utilizar configura&ccedil;&otilde;es de V&iacute;deo com pelo menos 800x600 pixels)</font></strong>');
	}
}

function browser() {
<!--
	var br = navigator.appName + navigator.appVersion;
	document.write('<b>' + br + '</b>');
//-->
}

function data() {
<!-- Hide from old browsers
	now = new Date();
	day = new Object();
	month = new Object();
	day[0] = "Domingo";
	day[1] = "Segunda-Feira";
	day[2] = "Terça-Feira";
	day[3] = "Quarta-Feira";
	day[4] = "Quinta-Feira";
	day[5] = "Sexta-Feira";
	day[6] = "Sábado";
	month[0] = "Janeiro";
	month[1] = "Fevereiro";
	month[2] = "Março";
	month[3] = "Abril";
	month[4] = "Maio";
	month[5] = "Junho";
	month[6] = "Julho";
	month[7] = "Agosto";
	month[8] = "Setembro";
	month[9] = "Outubro";
	month[10] = "Novembro";
	month[11] = "Dezembro";
	year = now.getYear();
	if (year < 1000) year += 1900;
	document.write(day[now.getDay()] + ', ' + now.getDate() + ' de ' + month[now.getMonth()] + ' de ' + year);
// Stop Hiding From Old Browsers -->
}

function Dstatus(msgStr) { //v2.0
  status=msgStr;
  Ds = true;
}

function Popup(theMsg) { //v2.0
  alert(theMsg);
}

function Abra(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features); }

//script para ampliação de fotos
function amplia(Foto_Id,Larg,Alt) { //v2.0
	var Larg_a = parseInt(Larg);
	var Alt_a = parseInt(Alt);
	arq = 'amplia.php?foto=' + Foto_Id;
	WindowName = 'Amp';
	Xtras  = 'resisable=no,';
	Xtras += 'menubar=status,'; 
	Xtras += 'location=no,';
	Xtras += 'status=yes,';
	Xtras += 'width=' + Larg_a + ',';
	Xtras += 'height=' + Alt_a;
	
	window.open(arq, WindowName, Xtras);
	}


//script para ampliação de fotos - sem banco de dados
function amplia_sbd(Foto_Id,Larg,Alt) { //v2.0
	var Larg_a = parseInt(Larg);
	var Alt_a = parseInt(Alt);
	arq = 'amplia_sbd.php?foto=' + Foto_Id;
	WindowName = 'Amp';
	Xtras  = 'resisable=no,';
	Xtras += 'menubar=status,'; 
	Xtras += 'location=no,';
	Xtras += 'status=yes,';
	Xtras += 'scrollbars=yes,';
	Xtras += 'width=' + Larg_a + ',';
	Xtras += 'height=' + Alt_a;
	
	window.open(arq, WindowName, Xtras);
	}


function Tam(X,Y) { //v2.0
  window.resizeTo(X,Y);
  window.menubar=0; }

function Fecha() { //v2.0
  window.close();
}

function Highlight(Object) {
  Object.className = "hover" }

function Normal(Object) {
  Object.className = "link" }

function imprime() {

  top.principal.page.focus();

  top.principal.page.window.print();
}


<!-- Início do Script de Verificação dos Campos -->
<!--
function ChecaCampo() {
	var f = 0;
	if (document.forms[0].name = "AnoP") {
		var f = 1;
	}
	var num 	= document.forms[f].elements.length;
	var ok 		= true;
/*	document.forms[f].nome_real.value = document.forms[f].Nome.value;
	document.forms[f].email.value = document.forms[f].EMail.value;
*/
	for (var i=0; i<num; i++) {
		if ((document.forms[f].elements[i].value == null || document.forms[f].elements[i].value == "") && (typeof document.forms[f].elements[i] != 'submit' || typeof document.forms[f].elements[i] != 'reset')) {
			ok = false;
			alert("O Campo " + document.forms[f].elements[i].name + " está em Branco!.\nFavor conferir e completá-lo!\nObrigado!");
			break;
		}
	}
	return ok;
}
//-->
<!-- Fim do Script de Verificação dos Campos -->

<!--Início do arquivo ultimate.js-->

// Main function
function Ultimate(Utype,Umsgs,Ucursor,Uwidth,Uheight,Ubgcolor,Ubackground,Uspeed,Udelay,Ufirst,Ustyle,Uttxt,Id_Msg) {
		
	document.writeln('<span id="Ubox" style="position:relative;width:'+Uwidth+';height:'+Uheight+';overflow:hiden;background-color:'+Ubgcolor+' ;background-image:url('+Ubackground+')">')
	document.writeln('<div style="position:absolute;width:'+Uwidth+';height:'+Uheight+';clip:rect(0 '+Uwidth+' '+Uheight+' 0);left:0;top:0";>')
	
	if (Utype==0) {
//		document.writeln('<div id="Utxt" class="'+Ustyle+'" style="position:absolute;width:'+Uwidth+';left:0;top:'+Uheight+';">')
		document.writeln('<div id="'+Uttxt+'" class="'+Ustyle+'" style="position:absolute;width:'+Uwidth+';left:0;top:'+Uheight+';">')
		document.write(Umsgs[Ufirst]);
//		Uscroll(Utxt,Umsgs,Uheight,Uspeed,Udelay,Ufirst);
		Uscroll(Uttxt,Umsgs,Uheight,Uspeed,Udelay,Ufirst,Uttxt);
	}
	if (Utype==1) {
		document.writeln('<div id="Utxt"  style="position:absolute;width:'+Uwidth+';left:'+Uwidth+';top:0;">')
		document.write(Umsgs[Ufirst]);
		Uside(Utxt,Umsgs,Uwidth,Uspeed,Udelay,Ufirst);
	}
	if (Utype==2) {
		document.writeln('<div id="Utxt"  style="position:absolute;width:'+Uwidth+';left:'+(Uwidth*-1)+';top:0;">')
		document.write(Umsgs[Ufirst]);
		Ureverseside(Utxt,Umsgs,Uwidth,Uspeed,Udelay,Ufirst,false);
	}
	if (Utype==3) {
		document.writeln('<div id="Utxt"  style="position:absolute;width:'+Uwidth+';left:0;top:0;overflow:hiden;background-color:'+Ubgcolor+' ;">')
		document.write(Umsgs[Ufirst]);
		document.writeln('</div>')
		document.writeln('<div id="Umask"  style="position:absolute;width:'+Uwidth+';left:0;top:0;overflow:hiden;background-color:'+Ubgcolor+' ;">')
		document.write(Ucursor);
		Utouch(Utxt,Umask,Umsgs,Ucursor,Uwidth,Uspeed,Udelay,Ufirst,1,false);
	}
	document.writeln('</div>')
	document.writeln('</div>')
	document.writeln('</span>')
}

// Moves
 function Uscroll(IDdiv,Umsgs,Uheight,Uspeed,Udelay,Ufirst,Uttxti){
//	ttxt=eval(IDdiv);
	ttxt=eval(IDdiv);
	Ustep=eval(Ufirst);
	if (ttxt.style.pixelTop>0&&ttxt.style.pixelTop<=5){
	ttxt.style.pixelTop=0;
	setTimeout("Uscroll(ttxt,Umsgs,Uheight,Uspeed,Udelay,Ustep)",Udelay);
	return
	}
	else {
		if (ttxt.style.pixelTop>=ttxt.offsetHeight*-1){
		ttxt.style.pixelTop-=5
		setTimeout("Uscroll(ttxt,Umsgs,Uheight,Uspeed,Udelay,Ustep)",Uspeed);
		return
		}
		else {
		ttxt.style.pixelTop=Uheight;
		if (Ustep>=Umsgs.length-1)
			Ustep=0
			else		
			Ustep++;
		ttxt.innerHTML=Umsgs[Ustep];
		Uscroll(ttxt,Umsgs,Uheight,Uspeed,Udelay,Ustep);
		}
	}
}

function Uside(IDdiv,Umsgs,Uwidth,Uspeed,Udelay,Ufirst){
	ttxt=eval(IDdiv);
	Ustep=eval(Ufirst);
	if (ttxt.style.pixelLeft>0&&ttxt.style.pixelLeft<=5){
	ttxt.style.pixelLeft=0;
	setTimeout("Uside(ttxt,Umsgs,Uwidth,Uspeed,Udelay,Ustep)",Udelay);
	return
	}
	else {
		if (ttxt.style.pixelLeft>=ttxt.offsetWidth*-1){
		ttxt.style.pixelLeft-=5
		setTimeout("Uside(ttxt,Umsgs,Uwidth,Uspeed,Udelay,Ustep)",Uspeed);
		return
		}
		else {
		ttxt.style.pixelLeft=Uwidth;
		if (Ustep>=Umsgs.length-1)
			Ustep=0
			else		
			Ustep++;
		ttxt.innerHTML=Umsgs[Ustep];
		Uside(ttxt,Umsgs,Uwidth,Uspeed,Udelay,Ustep);
		}
	}
}

function Ureverseside(IDdiv,Umsgs,Uwidth,Uspeed,Udelay,Ufirst,stop){
	ttxt=eval(IDdiv);
	Ustep=eval(Ufirst);
	if (ttxt.style.pixelLeft>0&&ttxt.style.pixelLeft<=5&&(!stop)) {
	setTimeout("Ureverseside(ttxt,Umsgs,Uwidth,Uspeed,Udelay,Ustep,true)",Udelay);
	return
	}
	else {
		if (ttxt.style.pixelLeft<ttxt.offsetWidth){
		ttxt.style.pixelLeft+=5;
		setTimeout("Ureverseside(ttxt,Umsgs,Uwidth,Uspeed,Udelay,Ustep)",Uspeed);
		return
		}
		else {
		ttxt.style.pixelLeft=Uwidth*-1;
		if (Ustep>=Umsgs.length-1)
			Ustep=0
			else		
			Ustep++;
		ttxt.innerHTML=Umsgs[Ustep];
		Ureverseside(ttxt,Umsgs,Uwidth,Uspeed,Udelay,Ustep);
		}
	}
}

function Utouch(IDdiv,IDmask,Umsgs,Ucursor,Uwidth,Uspeed,Udelay,Ufirst,Ufirstsens,stop){
	ttxt=eval(IDdiv);
	tmask=eval(IDmask);
	Ustep=eval(Ufirst);
	Usens=eval(Ufirstsens);
	if (tmask.style.pixelLeft>Uwidth){
	tmask.style.pixelLeft=Uwidth;
	setTimeout("Utouch(ttxt,tmask,Umsgs,Ucursor,Uwidth,Uspeed,Udelay,Ustep,-1)",Udelay);
	return
	}
	else if (tmask.style.pixelLeft>=-5&&tmask.style.pixelLeft<0&&(!stop)){
	tmask.style.pixelLeft=-5;
	if (Ustep>=Umsgs.length-1)
			Ustep=0
			else		
			Ustep++;
	ttxt.innerHTML=Umsgs[Ustep];
	setTimeout("Utouch(ttxt,tmask,Umsgs,Ucursor,Uwidth,Uspeed,Udelay,Ustep,1,true)",Udelay);
	return
	}
	else {
		tmask.style.pixelLeft+=(5*Usens);
		setTimeout("Utouch(ttxt,tmask,Umsgs,Ucursor,Uwidth,Uspeed,Udelay,Ustep,Usens)",Uspeed);
		return
	}
}
<!-- Fim do arquivo ultimate.js-->


<!-- Início Script Padrão Dreamweaver

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];}
}




<!--Fim do Arquivo-->


//-->