HexaCone/essai.pov
2025-02-10 04:16:53 +01:00

65 lines
1.3 KiB
POVRay

/*
* 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"
#include "contexte.inc"
#include "gadgets.inc"
#include "elements.inc"
#include "hexabenz.inc"
// =======================================================
#macro GGG_Un_Cone ()
merge {
#local RA = R_basecone;
cone { 0, RA, y*0.89, 0.000001 }
sphere { 0, RA }
}
#end
#macro GGG_Cones ()
union {
#for (foo, 0, 360, 60)
#local E = 0.50;
#local Tx = 1.333 * E * sin(radians(foo));
#local Tz = E * cos(radians(foo));
object {
GGG_Un_Cone ()
#if ( rand(Rng1) < 0.5001 )
texture { T_Wood32 rotate 17 scale 1.50 }
#else
texture { T_Wood23 scale 2.50 }
#end
// rotate -z*foo
translate <Tx, 0, Tz>
}
#end // end for
}
#end
object { GGG_Cones () translate y*0.5 }
// =======================================================
object { OpenBox translate y*1.2 }
object { Le_Decor }
// object { Repere translate y*2 }
// =======================================================
#local CamX = -2.7 + (3.8*Cos_010(NormClock));
#local CamY = 1.81 + (4*sqrt(NormClock));
#local CamZ = 1.7 + (3.8*Cos_010(NormClock));
camera {
// fisheye
location <CamX, CamY, 9.99>
look_at <0, 0.5, 0>
angle 32 + 4*Cos_01(NormClock)
}