var delay = 2500; //set delay between message change (in miliseconds)
var maxsteps=40; // number of steps to take to change from start color to endcolor
var stepdelay=40; // time in miliseconds of a single step
//**Note: maxsteps*stepdelay will be total time in miliseconds of fading effect
var startcolor= new Array(237, 202, 148); // start color (red, green, blue)
var endcolor=new Array(0,0,0); // end color (red, green, blue)

var fcontent=new Array();

begintag='<div style="font: 12px Arial; padding: 5px;" align="center">'; 

//set opening tag, such as font declarations

fcontent[0]="Bem-vindo à Home Page da <br><b>Sociedade das Ciências Antigas</b> !";

fcontent[1]="Inauguramos em <br><br>05 - Dez - 1996";

fcontent[2]="Última atualização em <br><br>01 - Fev - 2012";

fcontent[3]="<b>Novo Conto</b>: <br><br><a href=contos/Cardo.pdf target=_blank><u>Cardo</u></a>";

fcontent[4]="<b>Novos Poemas</b>: <br><br><a href=poemas/A_Descida_da_Torre.pdf target=_blank><u>A Descida da Torre</u></a><br><a href=poemas/Estandarte.pdf target=_blank><u>Estandarte</u></a><br><a href=poemas/AosSeusPes.pdf target=_blank><u>Aos Seus Pés</u></a>";

//fcontent[3]="<b>Novos Artigos</b>: <br><br><a href=artigos/Instr_Jejum.pdf target=_blank><u>Instruções para Jejum</u></a><br><a href=artigos/RegraRER.pdf  target=_blank><u>Regra para Uso das Lojas Retificadas</u></a><br><a href=artigos/4Principios.pdf target=_blank><u>Quatro Princípios para Unificar Mente e Corpo</u></a>";

//fcontent[4]="<b>Novo Boletim da SCA</b>: <br><br><a href=boletimSCA/BoletimSCA15-07-11.pdf target=_blank><u>Boletim Nº 15</u></a><br><a href=boletimSCA/BoletimSCA16-08-11.pdf target=_blank><u>Boletim Nº 16</u></a><br><a href=boletimSCA/BoletimSCA17-09-11.pdf target=_blank><u>Boletim Nº 17</u></a><br><a href=boletimSCA/BoletimSCA18-11-11.pdf target=_blank><u>Boletim Nº 18</u></a><br>";

//fcontent[4]="<b>Novo Artigo</b>: <br><br><a href=artigos/O-Mestre-Philippe-de-Lyon.pdf target=_blank><u>O Mestre Philippe de Lyon: Anjo Guardião do Martinismo</u></a>";

//fcontent[4]="<b>Novas Orações</b>: <br><br><a href=oracoes/Ladainha_de_Loreto_ou_Lauretana.pdf target=_blank><u>Ladainha de Loreto</u></a><br><a href=oracoes/As_Sete_Dores_de_Nossa_Senhora.pdf target=_blank><u>As Sete Dores de Nossa Senhora</u></a>";

//fcontent[3]="<b>Nova Mensagem</b>: <br><br><a href=mensagem/23Respostas_MadreTereza.pdf target=_blank><u>As 23 Respostas de Madre Tereza de Calcutá</u></a>";

//fcontent[4]="<b>Novo Livro</b>: <br><br><a href=livros/TemasdeOcultismoTradicional.zip target=_blank><u>Temas de Ocultismo Tradicional por Percival</u></a>";

//fcontent[4]="<b>Novo Boletim da SCA</b>: <br><br><a href=boletimSCA/BoletimSCA12-04-11.pdf target=_blank><u>Boletim Nº 12</u></a><br><a href=boletimSCA/BoletimSCA13-05-11.pdf target=_blank><u>Boletim Nº 13</u></a><br><a href=boletimSCA/BoletimSCA14-06-11.pdf target=_blank><u>Boletim Nº 14</u></a><br>";

//fcontent[4]="<b>Nova Biografia</b>: <br><br><a href=biografias/SantaTerezinhaDoMeninoJesus.pdf target=_blank><u>Santa Terezinha do Menino Jesus</u></a>";

//fcontent[4]="<b>Novo Poema</b>: <br><br><a href=poemas/Caminha.pdf target=_blank><u>Caminha</u></a><br><br><a href=poemas/SilencioDaCruz.pdf target=_blank><u>Silencio da Cruz</u></a>";

//fcontent[4]="<b>Novo Livro</b>: <br><br><a href=livros/MinhasMemoriasPhilippe.zip target=_blank><u>Minhas Memórias: Curas e Ensinamentos do Mestre Philippe</u></a>";

//fcontent[4]="<b>Novos Contos</b>: <br><br><a href=contos/Musica_Vida.pdf target=_blank><u>A Música da Vida</u></a><br><a href=contos/Bosque.pdf target=_blank><u>O Bosque</u></a><br><a href=contos/Aviso.pdf target=_blank><u>O Aviso</u></a>";

//fcontent[4]="<b>Nova Mensagem</b>: <br><br><a href=mensagem/Sobre_o_Pai.pdf target=_blank><u>Sobre o Pai</u></a>";

//fcontent[4]="<b>Novas Orações</b>: <br><br><a href=oracoes/OracaodaSerenidade.pdf target=_blank><u>Ora&ccedil;&atilde;o da Serenidade</u></a><br><a href=oracoes/OracaoSantoEfraim.pdf target=_blank><u>Ora&ccedil;&atilde;o de Santo Efraim</u></a><br><a href=oracoes/OracaoAflitos.pdf target=_blank><u>Ora&ccedil;&atilde;o dos Aflitos</u></a>";

//fcontent[4]="<b>Novo Livro</b>: <br><br><a href=livros/LivrodeMemoriasPhilippe.zip target=_blank><u>Livro de Memórias do Mestre Philippe de Lyon</u></a>";

//fcontent[4]="<b>Novo Boletim da SCA</b>: <br><br><a href=boletimSCA/BoletimSCA05-08-10.pdf target=_blank><u>Boletim nº 5</u></a><br><br><a href=boletimSCA/BoletimSCA06-09-10.pdf target=_blank><u>Boletim nº 6</u></a>";

//fcontent[3]="<b>Nova Biografia</b>: <br><br><a href=biografias/ApolonioTiana.pdf target=_blank><u>Apolônio de Tiana</u></a>";

//fcontent[4]="<b>Novos Poemas</b>: <br><br><a href=poemas/ATi.pdf target=_blank><u>A Ti</u></a><br><br><a href=poemas/AoMestre.pdf target=_blank><u>Ao Mestre</u></a><br></a>";

//fcontent[4]="<b>Nova Oração</b>: <br><br><a href=oracoes/OracaoPresencaDivina.pdf target=_blank><u>Ora&ccedil;&atilde;o para a Presen&ccedil;a Divina</u></a>";

//fcontent[4]="<b>Novos Livros</b>: <br><br><a href=livros/MissaeSeusMisterios.zip target=_blank><u>A Missa e Seus Mistérios</u></a><br><br><a href=livros/ProfMistCabDivina.zip target=_blank><u>Profundos Mistérios da Cabala Divina</u></a>";

//fcontent[4]="<b>Novos Contos</b>: <br><br><a href=contos/ACegueira.pdf target=_blank><u>A Cegueira</u></a><br><br><a href=contos/EspelhoAlma.pdf target=_blank><u>O Espelho da Alma</u></a>";

//fcontent[5]="<b>Novo Poema</b>: <br><br><a href=poemas/AProcura.pdf target=_blank><u>A Procura</u></a>";

//fcontent[4]="<b>Novas Mensagens</b>: <br><br><a href=mensagem/mensagem.htm><u>O Silêncio Interior<br><br> O Autoconhecimento</u></a>";

//fcontent[4]="<b>Novas Orações</b>: <br><br><a href=oracoes/NasTuasMaos.pdf target=_blank><u>Nas Tuas Mãos</u></a><br><a href=oracoes/LouvoresaDeus.pdf target=_blank><u>Louvores a Deus</u></a><br><a href=oracoes/TeuNomedePai.pdf target=_blank><u>Teu Nome de Pai</u></a><br><a href=oracoes/UsadeMisericordiacomoMundo.pdf target=_blank><u>Usa de Misericórdia com o Mundo</u></a>";

fcontent[5]="Participe do <br><br><a href=gruporar/gruporar.htm><b>Grupo de Orações</b></a>";

fcontent[6]="e colabore com o <br><br><a href=caridade/caridade.htm><b>Programa de Caridade</b></a> !";

closetag='</div>';

var fwidth='200px'; //set scroller width
var fheight='100px'; //set scroller height

var fadelinks=1;  //should links inside scroller content also fade like text? 0 for no, 1 for yes.

///No need to edit below this line/////////////////


var ie4=document.all&&!document.getElementById;
var DOM2=document.getElementById;
var faderdelay=0;
var index=0;

//function to change content
function changecontent(){
  if (index>=fcontent.length)
    index=0
  if (DOM2){
    document.getElementById("fscroller").style.color="rgb("+startcolor[0]+", "+startcolor[1]+", "+startcolor[2]+")"
    document.getElementById("fscroller").innerHTML=begintag+fcontent[index]+closetag
    if (fadelinks)
      linkcolorchange(1);
    colorfade(1, 15);
  }
  else if (ie4)
    document.all.fscroller.innerHTML=begintag+fcontent[index]+closetag;
	index++
}

function linkcolorchange(step){
  var obj=document.getElementById("fscroller").getElementsByTagName("A");
  if (obj.length>0){
    for (i=0;i<obj.length;i++)
      obj[i].style.color=getstepcolor(step);
  }
}


var fadecounter;
function colorfade(step) {
  if(step<=maxsteps) {	
    document.getElementById("fscroller").style.color=getstepcolor(step);
    if (fadelinks)
      linkcolorchange(step);
    step++;
    fadecounter=setTimeout("colorfade("+step+")",stepdelay);
  }else{
    clearTimeout(fadecounter);
    document.getElementById("fscroller").style.color="rgb("+endcolor[0]+", "+endcolor[1]+", "+endcolor[2]+")";
    setTimeout("changecontent()", delay);
	
  }   
}


function getstepcolor(step) {
  var diff
  var newcolor=new Array(3);
  for(var i=0;i<3;i++) {
    diff = (startcolor[i]-endcolor[i]);
    if(diff > 0) {
      newcolor[i] = startcolor[i]-(Math.round((diff/maxsteps))*step);
    } else {
      newcolor[i] = startcolor[i]+(Math.round((Math.abs(diff)/maxsteps))*step);
    }
  }
  return ("rgb(" + newcolor[0] + ", " + newcolor[1] + ", " + newcolor[2] + ")");
}

if (ie4||DOM2)
  document.write('<div id="fscroller" style="border:0px solid black;width:'+fwidth+';height:'+fheight+'"></div>');

if (window.addEventListener)
window.addEventListener("load", changecontent, false)
else if (window.attachEvent)
window.attachEvent("onload", changecontent)
else if (document.getElementById)
window.onload=changecontent
