Round_Tube_Ring_N
= Anneau en tube rond

Round_Tube_Ring_N = Anneau en tube rond

syntaxe générale :

object{ Round_Tube_Ring_N (N, Tube_R, Base_Width, Edge_R)
        texture{ ... ... }
      } // end of object ------------------------

avec N = nombre de segments en anneau,
Tube_R = rayon du tube,
Base_Width = distance des sections linéaires du tube au centre,
Edge_R = le rayon majeur des segments de la tore aux bords.

Exemple:

#include "shapes_lo.inc"
//#macro Round_Tube_Ring_N (N, Tube_R, Base_Width, Edge_R)
object{ Round_Tube_Ring_N (3, 0.05, 0.40, 0.25)
        texture { pigment{ color rgb<1,0.7,0.2>}
                  finish { ambient 0.15 diffuse 0.85
                           phong 1 reflection 0.4}
                } // end of texture
        scale <1,1,1>
        rotate <0,0,0>
        translate<0.4,1.5,0>
      } // end of object ----------------------------------

Macro en détail

Cette macro utilise la macro "Torus_Segment":

//--------------------------------- Round_Tube_Ring_N (...) macro #macro Round_Tube_Ring_N (N, Tube_R, Base_Width, Edge_R) #if (Edge_R > Base_Width) #declare Edge_R=Base_Width; #end #if (N < 3 ) #declare N = 3; #end #declare Edge_Angle = 360/N ; #declare Linear_Half_Len = (Base_Width-Edge_R)*tan(radians(Edge_Angle/2)); #declare Edge_Part = object{ Torus_Segment( Edge_R, Tube_R, Edge_Angle) rotate <-90,0,0> translate <Base_Width-Edge_R,Linear_Half_Len,0> } // end of Torus_Segment(...) ---------------------------- #if (Edge_R != Base_Width) #declare Linear_Part = cylinder { <0,-Linear_Half_Len,0>, <0,Linear_Half_Len,0>, Tube_R translate <Base_Width,0,0> } // end of cylinder ----------------------------------- #end #if (Edge_R != Base_Width) #declare One_Segment = union{ object {Linear_Part} object {Edge_Part} } #else #declare One_Segment = object {Edge_Part} #end union{ #local Nr = 0; // start #local EndNr = N; // end #while (Nr < EndNr) object{One_Segment rotate <0,0,Nr * 360/EndNr>} #local Nr = Nr + 1; // next Nr #end // --------------- end of loop } #end // --------------------- end of macro Round_Tube_Ring_N (...)

Ici, quelques variations avec cette macro :

Facetted_Spheres

Variations sur "Round_Tube_Ring_N(...)"

Descriptions et exemples pour le POV-Ray raytracer par Friedrich A. Lohmüller,
traduit en français par Henri Girard.

Cette forme est définie comme une "macro" dans mon include file "shapes_lo.inc":

Round_Tube_Ring_N
= Anneau en tube rond

Descriptions et exemples pour le POV-Ray raytracer par Friedrich A. Lohmüller, traduit en français par Henri Girard.

Cette forme est définie comme une "macro" dans mon include file "shapes_lo.inc":

Round_Tube_Ring_N= Anneau en tube rond

Descriptions et exemples pour le POV-Ray raytracer par Friedrich A. Lohmüller,
traduit en français par Henri Girard.

Round_Tube_Ring_N
= Anneau en tube rond