HexaCone/survol.pov
2025-02-19 02:49:16 +01:00

49 lines
929 B
POVRay

/*
* 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
}