HexaCone/essai.pov

/*
 *	H E X A C O N E   -   E S S A I
 *   nouveau projet du Thu Dec  5 11:37:05 AM UTC 2024
 */

#version 3.7;

#include  "globals.inc"


#declare  NormClock = clock / 360.0;
#include  "contexte.inc"
#include  "elements.inc"
#include  "hexabenz.inc"

// =======================================================

#macro Bubble ()
sphere {
	0, 0.10
	#if   ( rand(Rng1) < 0.333 )
	  texture { Ruby_Glass }
	#elseif ( rand(Rng1) < 0.666 )
	tus  texture { Orange_Glass }
	#else
	  texture { Gold_Nugget scale 0.56 }
	#end
	}
#end

#macro Un_Machin ()
union	{
	#for (Y, -8, 8, 2)
	    object { Bubble() translate y*Y*0.1 }
	#end
	}
#end

#declare Les_Machins = object
{
union	{
	#for (Xp, -10, 10)
		#if ( rand(Rng1) < 0.5 )
		  object { HexaCone_radar_A translate x*Xp*0.6 }
		#else
		  object { Un_Machin () translate x*Xp*0.6 }
		#end
		
	#end
	}
}

object { Les_Machins }

// object { Repere }

// =======================================================

light_source { <-8, 7, -9>, rgb <0.81, 0.65, NormClock> }
light_source { < 11, 7,  4>, rgb <1-NormClock, 0.28, 0.80> }

camera	{
	location	<-10.7+4*NormClock, 2.81, 8.09>
	look_at		<0.0, 0.0, 0>
	angle		44
	}