// Last edited on 2003-04-12 19:41:58 by stolfi

#include "colors.inc"
  background{ color rgb < 0.50, 0.55, 0.60 > }
  camera {
    location <    0, 0, 40 >
    right    < -0.6, 0, 0   >
    up       <    0, 0, 0.8 >
    sky      <    0, 1, 0   >
    look_at  <    0, 0, 0   >
  }
  light_source { 5*<-10, 20, 40> color 1.1*White }
  light_source { 5*< 10, 20, 40> color 0.7*White }

#declare cor_vermelho = 
  texture {
    pigment { color rgb < 1.00, 0.00, 0.00 > }
    finish { ambient 0.3 diffuse 0.8 specular 0.5 roughness 0.005 }
  }

#declare cor_cristal = < 1, 1, 1>;
#declare tx_cristal = 
  texture {
    finish { 
      ambient 0.25 diffuse 0.5
      reflection 0.25
      specular 1 roughness 0.001
    }pigment { color cor_cristal filter 1 }
  }

#declare anel =
torus {
    2, .3
    texture { cor_vermelho }
  }

#declare txttoroides =
  text {
    ttf "arial.ttf"
    "TOROIDES"
    0.15, 0
    texture { tx_cristal }
  }

#declare txtsenhordos =
  text {
    ttf "arial.ttf"
    "O SENHOR DOS"
    0.15, 0
    texture { tx_cristal }
  }

#if (clock < 0.5)
  #declare posicaotxt1x = 8-8*clock-6;
  #declare posicaotxt1y = 8*clock-8;
  #declare posicaotxt2x = 8*clock-8-6;
  #declare posicaotxt2y = 8-8*clock;
#else
  #declare posicaotxt1x = 8*clock-8+1.5;
  #declare posicaotxt1y = 8*clock-8;
  #declare posicaotxt2x = 8*clock-8-6.5;
  #declare posicaotxt2y = 8-8*clock;

#end

object { anel rotate <0,0,clock*500> translate <8, -8, 0> } 
object { txttoroides translate <posicaotxt1x, posicaotxt1y, 0> scale <1+clock*0.8, 1+clock*0.8, 1+clock*0.8>}
object { txtsenhordos translate <posicaotxt2x, posicaotxt2y, 0> scale <1+clock*0.8, 1+clock*0.8, 1+clock*0.8>}