// Last edited on DATE TIME by USER
// Processed by remove-cam-lights

background{ color rgb < 0.75, 0.80, 0.85 > }

#declare raio = 2.000;

#declare tinta_A =
  texture {
    pigment { color rgb < 0.10, 0.80, 1.00 > }
    finish { diffuse 0.8 specular 0.2 roughness 0.005 ambient 0.1 }
  }

#declare tinta_B =
  texture {
    pigment { color rgb < 1.00, 0.80, 0.10 > }
    finish { diffuse 0.8 specular 0.2 roughness 0.005 ambient 0.1 }
  }

#declare tinta_C =
  texture {
    pigment { color rgb < 0.50, 0.60, 0.30 > }
    finish { diffuse 0.8 specular 0.2 roughness 0.005 ambient 0.1 }
  }

#declare tinta_D =
  texture {
    pigment { color rgb < 0.70, 0.40, 0.10 > }
    finish { diffuse 0.8 specular 0.2 roughness 0.005 ambient 0.1 }
  }

  #declare eixox =
cylinder {
<-50,0,0>,
<50,0,0>,
0.1
  pigment {color rgb <1,1,1>}
  }

#declare eixoy =
cylinder {
<0,-50,0>,
<0,50,0>,
0.1
pigment {color rgb <1,1,1>}
  }

#declare eixoz =
cylinder {
<0,0,-50>,
<0,0,50>,
0.1
pigment {color rgb <1,1,1>}
  }

#declare eixos =
union {
object {eixox}
object {eixoy}
object {eixoz}
}

#declare bola =
  sphere {
    < -1.9, -0.1, 0 >, 0.1
    texture { tinta_B }

  }

#declare bola2 =
  sphere {
    < 1.00, 3.00, 2.00 >, 1.50
    texture { tinta_D }
  }

# declare my_cone =
 cone{
   < -1.9, 0.00 , 0.00 >, 0.00
   < 2.00, 1.00 , 3.00 >, 2.00
    texture { tinta_C}
 }

#declare furo =
  cylinder {
    < -1.00, -2.00, -2.00 >,
    < +1.00, +2.00, +2.00 >,
    1.50
    texture { tinta_B }
  }

#declare quadrado =
  box {
    <-2, 0, -0.5>,
    < 0, 1, 0>
    texture {
      tinta_A
      scale 4

    }

  }

  #declare quadrado2 =
  box {
    <0.1, 0, -0.5>,
    < 0.3, 1, 0>
    texture {
      tinta_A
      scale 4

    }

  }

  #declare janelas1 =
  union{
    #declare i = 0;
    #declare j = 0.2;
    #while(i<6)
    #declare janela =
    box {
    <-2+j, 0.6, -2.1>,
    < -2+j+0.2, 0.8, 2.1>
    texture {
      tinta_B
      scale 4
    }
    }
  object{ janela }
  #declare i = i+1;
  #declare j = j + 0.3;
  #end
  }

  #declare rodas1 =
  union{
    #declare i = 0;
    #declare j = 0;
    #while(i<10)
    #declare roda =
  sphere {
    < -1.9 + j, -0.1, 0 >, 0.1
    texture { tinta_B }
  }

  #declare roda2 =
  sphere {
    < -1.9 + j, -0.1, -0.5 >, 0.1
    texture { tinta_B }
  }

  object {roda }
  object {roda2 }
  #declare i = i+ 1;
  #declare j = j+ 0.2;
  #end
  #declare roda3 =
  sphere {
    < -1.9 + j + 0.1, -0.1, -0.5 >, 0.1
    texture { tinta_B }
  }

  #declare roda4 =
  sphere {
    < -1.9 + j + 0.1, -0.1, -0.5 >, 0.1
    texture { tinta_B }
  }
  object {roda3 }
  object {roda4 }
  }

#declare conexao =
  box {
    <0, 0.5, -0.5>,
    < 0.1, 0.7, 0>
    texture {
      tinta_A
      scale 4

    }
    }

 #declare trem =
difference{
union {

    object { quadrado }
    object { quadrado2 }
    object { conexao }

    object { rodas1 }

 }
 object { janelas1 }
translate <0,0,11>
}

 # declare trem2 =
 object {  trem rotate 20*y }
 # declare trem3 =
 object {  trem  rotate 20*y }
 # declare trem4 =
 object {  trem3 rotate 20*y }
 # declare trem5 =
 object {  trem4 rotate 20*y }

# declare locomotiva =
union {
#declare bloco  =
box {
    <7.0, 0, -0.5>,
    < 9.5, 2, 0>
    texture {
      tinta_A
      scale 4
    }
}

 # declare cilindro =
 cone{
  <8.3, 2, -0.25> , 0.1
  < 8.3, 2.5, -0.25>, 0.3
    texture {
      tinta_C
      scale 4
    }

}

object {bloco}
object {cilindro}
object {rodas1 translate <9.2,0,0>}

}

#declare trilho  =
box{
<0,0,0>
<0.2,0.2,0.7>
texture {
      tinta_D
      scale 4

    }
translate <0,-0.3,10.5>
}

#declare pinterior =
torus {
    10.5,0.1
    texture {
      tinta_D
      scale 4

    }
   }
#declare pexterior =
torus {
    11.2,0.1
    texture {
      tinta_D
      scale 4

    }
}
#declare pista =
union{
object {pinterior}
object {pexterior}
}

difference {
  union {

   object { trem   }
   object { trem2   }
   object { trem3   }
   object { trem4   }
   object { trem5   }

   object { pista translate <0,-0.2,0> }
   #declare i = 0;
   #while(i<18)
   object {trilho rotate y * (20*i)}
   #declare i = i +1;
   #end

   #if(clock<0.2)
    rotate y*(clock*clock*360)
   #else
   #if(clock < 0.8)
    rotate y*(-360*0.2*0.2 + 2*360*0.2*clock)
   #else
       rotate y*(360 - 360*(1-clock)*(1-clock))
   #end
   #end

  }
}

#include "camlight.inc"
camlight(<0,0,0>,<5.0,20.00,5.00>,1.00,y,1.0)