HexaCone/survol.pov

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

#version 3.7;

#include  "globals.inc"

#include  "contexte.inc"
#include  "elements.inc"
#include  "hexabenz.inc"
#include  "hexawood.inc"

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

/*
 *	on fait passer un hexatruc
 */
#declare A = <-SzSol,   16,   9>;
#declare B = < SzSol+4, 18,  11>;
#declare P = Interpolate(A, B, NormClock);
object { HexaCone () rotate y*((12*NormClock)+80) translate P }


#include  "dynamic.inc"



object { Le_Decor }

// object { Repere translate y*2 }

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

#declare  Debut  = <-3, 57,  47>	;
#declare  Fin    = < 2, 53,  7>	;
#declare  Pos    = Cos_01(NormClock);
#declare  PosCam = Interpolate(Debut, Fin, Pos);

#declare LatCam = PosCam + <-1, -20, -(NormClock+9)>;

camera	{
	location	PosCam
	look_at		LatCam
	angle		54
	}