4.2.10 Script fractalzoom

Utilisation : Les liens ne sont pas apparents. Pour obtenir des informations sur un mot clé, cliquez-le dans le script !

Le fichier d'initialisation :

; Persistence Of Vision raytracer version 3.5 sample file.

Antialias = Off

Antialias_Threshold = 0.2
Antialias_Depth = 3

Input_File_Name = fractalzoom.pov

Initial_Frame = 1
Final_Frame = 100
Initial_Clock = 0
Final_Clock = 1

Cyclic_Animation = off
Pause_when_Done = off

Le script :

// Persistence of Vision Raytracer Version 3.5 Scene Description File
// File: fractalzoom.pov
// Author: Parts by Rune S. Johansen and Greg M. Johnson,
// combined in one file by Chris Huff.
// Description: Demonstrates the use of fractal patterns,
// by zooming in or out of a fractal texture.
// Render as an animation, and change the value of Choice to
// choose which scene you want to render:
// 0 = render both in one animation
// 1 = Fractal zoom by Rune
// 2 = Fractal zoom by Greg
//*******************************************
#include "colors.inc"
#declare Choice = 0;

#if (Choice = 0)
	#if (clock < 0.5)
		#declare Clock = clock*2;
		#declare Choice = 1;
	#else
		#declare Clock = clock*2 - 1;
		#declare Choice = 2;
	#end
#else
	#declare Clock = clock;
#end

#switch (Choice)
	#case(1)
		// Rune S. Johansen
		// This animation
		// zooms into the Mandelbrot fractal by a factor of 500000:1.
		// It is done by scaling up the pigment exponentially.
		camera {location -z*4 look_at 0}
		plane {-z, 0
			pigment {mandel 10000
				color_map {
					[0/4, color <0.0, 0.0, 0.0>]
					[1/4, color <0.5, 0.0, 0.5>]
					[2/4, color <1.0, 0.0, 0.0>]
					[3/4, color <1.0, 1.0, 0.0>]
					[4/4, color <1.0, 1.0, 1.0>]
				}
				// Find an interesting point to zoom into:
				translate <
					0.7499738161281454000,
					-0.0086354745579594171
				>
				// Scale up pigment exponentially:
				scale pow(10, 4+5*Clock)
			}
			finish {ambient 1 diffuse 0}
		}
	#break
	#case(2)
		// Greg M. Johnson
		#declare Place = <-0.07480991501111, 0.97102335799465,-10>;
		camera {
			location Place
			look_at Place + 10*z
			angle 0.0000000000002*pow(10, Clock*14.2)
		}
		plane {-z, 0
			pigment {mandel 10000
				color_map {
					[0/60 Black]
					[0.0625/60 SeaGreen]
					[0.125/60 Orange]
					[0.25/60 Blue]
					[0.375/60 Yellow]
					[0.45/60 Brown]
					[0.5/60 Green]
					[1/60 Orange]
					[1.5/60 Magenta]
					[1.75/60 Gray50]
					[2/60 Red]
					[3.5/60 Blue]
					[3.7/60 Orange]
					[3.875/60 Yellow]
					[3.95/60 Blue]
					[3.975/60 Coral]
					[4/60 Black]
					[5/60 Yellow]
					[6/60 Red]
					[5/30 Blue]
					[7/30 Green/3]
					[9/30 Orange]
					[28/30 Blue]
					[30/30 Black]
				}
			}
			finish {ambient 1 diffuse 0}
		}
	#break
#end

Et voici ce que nous obtenons (cliquez sur une des images pour télécharger l'animation complète) :

fractalzoom1.zip - 4908 Ko

et
fractalzoom2.zip - 5841 Ko

Retour Retour