/////////(Copyright)//////(No modificar estas 11 primeras Lineas)/////////
//     Autor: Antonio Castro Snurmacher (E-mail  )
//
//  Este fuente puede ser utilizado, distribuido, y modificado libremente
//  pero siempre se deberá respetar la propiedad intelectual de su autor.
//  El autor renuncia a todo tipo de beneficio económico y no se hace
//  responsable de los posibles perjuicios derivados del uso del mismo.
//  Toda modificación queda sujeta a las mismas condiciones de uso que el
//  original. En caso de traducción deberá conservarse el texto original
//  de esta cabecera y añadirse la traducción a continuación de ella.
//////////////////////////////////////////////////////////////////////////


//-----------------------------------------------------------------------
//       burbujas.pov  (1-Mayo-1998)
//-----------------------------------------------------------------------
//  Esta versión esta dedicada a su inclusión en la revista LinuxFocus
//-----------------------------------------------------------------------

// Se recomienda usar el siguiente comando para la utilidad 'pov'
// pov burbujas 6 9 1 4 
//              ^ ^ ^ ^ 
//              | | | | 
// Resolucion __/ | | | 
// Calidad    ____/ | | 
// Desde Clock = 1 _/ | 
// Hasta Clock = 4 ___/ 

#include "colors.inc"
#include "textures.inc"

// Por defecto max_trace_level vale 5 . Aumentado a 15 conseguimos 
// mayor nivel detalle en las imagenes recursivas generadas por reflejos 
global_settings {
#max_trace_level 15
}

// Declaramos distintos puntos de vista y solo elegiremos finalmente
// una en fución del valor de Clock
#declare img1 =
camera {
  location <0, 10000 ,0 >
  look_at <0, 0, 0>
  angle 7
}

#declare img2 =
camera {
  location <0, 250 ,0 >
  look_at <0, 0, 0>
  angle 130
}

#declare img3 =
camera {
  location <12, 3 ,12 >
  look_at <200, 3, 50>
  angle 30
}

#declare img4 =
camera {
  location <12, 3 ,12 >
  look_at <200, 3, 50>
  angle 120
}

  #switch (clock)
    #case (1)
      // This section is parsed if clock=1
       camera {img1}
    #break  
    #case (2)
      // This section is parsed if clock=2
       camera {img2}
    #break  
    #case (3)
      // This section is parsed if clock=4
       camera {img3}
    #break 
    #case (4)
      // This section is parsed if clock=5
       camera {img4}
    #break 
    #else
      #warning "Clock outside expected range\n"
  #end // End of conditional part

// Fuente de luz blanca
object {
  light_source {
  <100, 1000, 100>
  color White
  }
}

#declare textureBall = texture { Gold_Metal }

// El fichero include 'burbujas.inc' es un fichero obtenido mediante
// la salida de un programa escrito en lenguaje C.

#include "burbujas.inc"

mirror server hosted at Truenetwork, Russian Federation.