// Trabalho 7 - 30/06/2001
// Last edited on 2001-07-31 15:18:57 by stolfi

#include "colors.inc"

background{ color rgb < 1.00, 0.10, 0.10 > }

light_source {
  < -5.00, 30.00, 5.00 >
  color rgb 1.2*< 1.00, 1.00, 1.00 >
} 

#declare ctr = < 4.00, -1.50, 0.00 >;

camera {
  location  ctr + 0.5*<  -8.00,  15.00,  8.00 >
  right     <  -1.20,   0.00,  0.00 >
  up        <   0.00,   0.00,  0.90 >
  sky       <   0.00,   1.00,  0.00 >
  look_at   ctr
}

#declare tinta_Ouro = texture {
    pigment { BrightGold }
    finish { ambient 0.1 diffuse 0.4 reflection 0.5*BrightGold metallic }
  }

#declare tinta_Vidro = texture {
    pigment { BrightGold transmit 0.9 }
    finish { ambient 0.1 diffuse 0.9 reflection 0.25 }
  }

#declare A1 = < 8.00, 0.00, 0.00>;
#declare A2 = < 7.00, 1.00, 0.00>;
#declare A3 = < 5.00, 1.20, 0.00>;
#declare A4 = < 3.00, 2.00, 0.00>;

#declare A5 = < 8.50, 0.00, 1.00>;
#declare A6 = < 7.00, 0.80, 1.00>;
#declare A7 = < 5.00, 1.00, 1.00>;
#declare A8 = < 3.00, 1.90, 1.00>;
 
#declare A9  = < 8.00, 0.00, 2.00>;
#declare A10 = < 7.00, 0.40, 2.00>;
#declare A11 = < 5.00, 0.70, 2.00>;
#declare A12 = < 3.00, 1.00, 2.00>;

#declare A13 = < 6.00, 0.00, 3.00>;
#declare A14 = < 5.00, 0.00, 3.00>;
#declare A15 = < 4.00, 0.00, 3.00>;
#declare A16 = < 3.00, 0.00, 3.00>;

#declare frente =
 bicubic_patch {
    type 1
    flatness 0.001
    u_steps 5
    v_steps 5
    A1,A2,A3,A4
    A5,A6,A7,A8
    A9,A10,A11,A12
    A13,A14,A15,A16 
    texture { tinta_Ouro }
  }

#declare B1  = < 3.00, 0.00, -1.00>;
#declare B2  = < 2.00, 1.80, -1.00>;
#declare B3  = < 1.00, 1.00, -1.00>;
#declare B4  = < 0.00, 0.00, -1.00>;

#declare B5  = < 3.00, 1.90, 1.00>;
#declare B6  = < 2.00, 1.70, 1.00>;
#declare B7  = < 1.00, 0.80, 1.00>;
#declare B8  = < 0.00, 0.00, 1.00>;

#declare B9  = < 3.00, 1.00, 2.00>;
#declare B10 = < 2.00, 0.70, 2.00>;
#declare B11 = < 1.00, 0.20, 2.00>;
#declare B12 = < 0.00, 0.00, 2.00>; 

#declare B13 = < 3.00, 0.00, 3.00>;
#declare B14 = < 5.00, 0.00, 3.00>;
#declare B15 = < 4.00, 0.00, 3.00>;
#declare B16 = < 3.00, 0.00, 3.00>; 

#declare traseira =
 bicubic_patch{
    type 1
    flatness 0.001
    u_steps 5
    v_steps 5
    B1,B2,B3,B4
    B5,B6,B7,B8
    B9,B10,B11,B12
    B13,B14,B15,B16
    texture { tinta_Ouro }
 }           

#declare carro=
union{
 object {frente}
 object {traseira}
  }

object {carro}
object {carro scale <1, 1, -1> texture { tinta_Vidro} }

// added by stolfi:

plane {y,0
 translate <0,-30,0>
 texture { pigment { checker color Red, color Orange } scale 5 }
}
plane {-y,0
 translate <0,30,0>
 texture { pigment { checker color Yellow, color Orange } scale 5 }
 scale 1000
}