// Persistence of Vision Ray Tracer Scene Description File
// File: Melkpak.pov
// Vers: 3.1
// Desc: An 1.5 liter carton of Dutch milk from the dairy-company Coberco 
// Date: 5-feb-1999 
// Auth: Wouter 'Bugs74' Dijk 

// ==== Standard POV-Ray Includes ====
#include "colors.inc"	// Standard Color definitions
#include "textures.inc"	// Standard Texture definitions

light_source {<10.0 , 20.0 , -40.0> color White}
light_source {<-10.0 , 20.0 , -40.0> color White}

camera {location  <0.0 , 0.0 ,-25.0> look_at   <0.0 , 0.0 , 0.0>}

#declare Voorkant =
box { < 0.0 , 0.0 , 0.0 > < 7.0 , 21.5 , 0.01 >
      pigment {
        image_map {
                png "voorkantonder.png"
                interpolate 2
                once
                  }
                scale <7,21.5,1>  
              }
              translate x*-3.5
    }              

#declare Achterkant =
box { < 0.0 , 0.0 , 0.0 > < 7.0 , 21.5 , 0.01 >
      pigment {
        image_map {
                png "achterkantonder.png"
                interpolate 2
                once
                  }
                scale <7,21.5,1>  
              }
              translate x*-3.5
    }

#declare Zijkant =
box { < 0.0 , 0.0 , 0.0 > < 9.0 , 21.5 , 0.01 >
      pigment {
        image_map {
                png "zijkantonder.png"
                interpolate 2
                once
                  }
                scale <9,21.5,1>  
              }
              translate x*-4.5
    }              

#declare Infokant =
box { < 0.0 , 0.0 , 0.0 > < 9.0 , 21.5 , 0.01 >
      pigment {
        image_map {
                png "infokantonder.png"
                interpolate 2
                once
                  }
                scale <9,21.5,1>  
              }
              translate x*-4.5
    }
                                                  
#declare Onderkant =
box { < 0.0 , 0.0 , 0.0 > < 9.0 , 7.0 , 0.01 >
      pigment {
        image_map {
                png "onderkant.png"
                interpolate 2
                once
                  }
                scale <9,7,1>  
              }
              translate x*-4.5
              translate y*-3.5
              rotate x*-90 
    }                                                  

#declare Bovenkant = 
union {
union {
        box { < -4.5 , 0.0 , 0.0 > < 4.5 , 4.0 , -0.01 > }
        box { < -4.5 , -0.01 , 0.0 > < 4.5 , 2.0 , -0.01 > rotate x*60 translate y*4.0 }
        rotate x*-60
        translate z*3.5
        pigment {
        image_map {
                png "zijkantboven.png"
                interpolate 2
                once
                  }
                scale <9,2.5,1>  
                rotate y*180
                translate x*4.5
              }
              rotate y*180
      }
      
union {
        box { < -4.5 , 0.0 , 0.0 > < 4.5 , 4.0 , 0.01 > }
        box { < -4.5 , 0.01 , 0.0 > < 4.5 , 2.0 , 0.01 > rotate x*60 translate y*4.0 }
        rotate x*-60
        translate z*3.5
        pigment {
        image_map {
                png "infokantboven.png"
                interpolate 2
                once
                  }
                scale <9,2.5,1>  
                translate x*-4.5
              }
              
      }
      
union {
triangle { < -3.4 , 0.0 ,-4.5 > < 3.4 , 0.0 ,-4.5 > < 0.0 , 2.0 ,-1.0 > }
triangle { < -3.4 , 0.0 ,-4.5 > < 0.0 , 2.0 ,-1.0 > < 0.0 , 2.0 ,-4.5 > }
triangle { <  3.4 , 0.0 ,-4.5 > < 0.0 , 2.0 ,-1.0 > < 0.0 , 2.0 ,-4.5 > }
pigment {
        image_map {
                png "voorkantboven.png"
                interpolate 2
                once
                  }
                scale <7,2.0,1>  
                translate x*-3.5
               } 
               rotate y*90
}

union {
triangle { < -3.4 , 0.0 , 4.5 > < 3.4 , 0.0 , 4.5 > < 0.0 , 2.0 , 1.0 > }
triangle { < -3.4 , 0.0 , 4.5 > < 0.0 , 2.0 , 1.0 > < 0.0 , 2.0 , 4.5 > }
triangle { <  3.4 , 0.0 , 4.5 > < 0.0 , 2.0 , 1.0 > < 0.0 , 2.0 , 4.5 > }
pigment {
        image_map {
                png "achterkantboven.png"
                interpolate 2
                once
                  }
                scale <7,2.0,1>  
                translate x*-3.5
                rotate y*180
               }
               rotate y*90 
}
      
}

#declare Melkpak=
union {
object { Onderkant }
object { Infokant rotate y*180 translate z*3.5}
object { Zijkant translate z*-3.5 }
object { Voorkant rotate y*90 translate x*-4.5 }
object { Achterkant rotate y*-90 translate x*4.5 }
object { Bovenkant translate y*21.5}
translate y*-10.75
}


object { Melkpak rotate y * 60 rotate z * - 45 rotate x * -20 }