// Last edited on 2004-03-13 20:14:00 by stolfi
// Estou sem criatividade.

#include "colors.inc"

background { color Cyan }

#declare ctr = < 75.00, 0.00, 50.00 >;
#declare camDir = < 0.00, -200.00, 25.00 >;

camera {
  location   ctr + 1.00*camDir
  right      -1.33*x
  up         1.00*y
  sky        z
  look_at    ctr
}

light_source { <30, -150, 80> color White}

#declare efe = 
  text {
    ttf "arial.ttf"
    "F"
    0.15, 0
    texture {
      pigment { color Yellow }
    }
    scale <50,50,50>
  }

#declare um = 
  text {
    ttf "arial.ttf"
    "1"
    0.15, 0
    texture {
      pigment { color Blue }
    }
    scale <50,50,50>
  }

#declare zero = 
  text {
    ttf "arial.ttf"
    "0"
    0.15, 0
    texture {
      pigment { color Red }
    }
    scale <50,50,50>
  }

#declare ome = 
  text {
    ttf "arial.ttf"
    "ome"
    0.15, 0
    texture {
      pigment { color Green }
    }
    scale <50,50,50>
  }

#declare chao = 
  plane { <0, 0, 1>, -1
    pigment {
      checker color Black, color White
    }
  }

#declare pista = 
  prism {
    linear_sweep
    linear_spline
    0, 
    10, 
    5, 
    <-300,0>, <300,0>, <300,30>, <0,30>, <-300,0>
    rotate 90*x
    pigment { Blue }
  }


#if (clock <= 0.25)
  object { efe translate <200*clock,50,0> rotate <360*clock,0,0> }
  object { um translate <200*clock+30,50,0> rotate <360*clock,0,0> }
#else
  #if (clock < 0.5)
    object { efe translate <50,50,0> rotate <90,0,0> }
    object { um translate <80,50,0> rotate <90,0,0> }
  #else
    #if (clock < 1) 
       object { um translate <200*clock,50,0> rotate <90,0,0> } 
    #end
    object { efe translate <50-40*clock,50,0> rotate <90,0,0> }
    object { ome translate <-40+80*clock,50,0> rotate <90,0,0> }
    object { zero translate <150,50,-200+200*clock> rotate <90,0,0> }
  #end
#end

object { chao }
object { pista }