Ein Schaukelstuhl in Action
Auf den ersten Blick scheint ein Schaukelstuhl etwa wie ein schwingendes Pendel zu funktionieren.
Aber bei näherem Hinsehen erkennen wir das dies eher wie ein rollendes Rad funktioniert, das vorwärts und rückwärts rollt und dies im Rythmus eines schwingenden Pendels.

Hier wird zur Vereinfachung der Schaukelstuhl auf eine einzelne Kufe als Makro-Objekt reduziert.
Zu einem vollständigen Schaukelstuhl-Objekt siehe die Szenendatei unten!

#macro Rocker0( Rocking_Angle ) //--------------------------------- #local D = 0.00001; // just a little bit! #local R_R = 1.20; // Kufen-Radius #local R_rotate = 25; // Kufen-Winkel +/- #local D_feet = 0.055; //--------------------------------------- #local Skid = // Kufe intersection{ box{<-R_R,-R_R-D,-D_feet/2-2*D>, <0,R_R+D,D_feet/2+2*D> rotate<0,0,-R_rotate> inverse } box{<-R_R,-R_R-D,-D_feet/2-2*D>, <0,R_R+D,D_feet/2+2*D> rotate<0,0,-R_rotate> inverse scale<-1,1,1> } cylinder{<0,0,-D_feet/2>, <0,0,D_feet/2>, R_R} cylinder{<0,0,-D_feet/2-D>, <0,0,D_feet/2+D>, R_R-D_feet inverse } } // end intersection Skid //--------------------------------------- object{ Skid // Kufe rotate< 0,0,Rocking_Angle> translate< 0, R_R, 0> // move by the // according part of the circumference: translate <-(2*pi*R_R)*(Rocking_Angle/360),0,0> } // end of Skid #end // end of macro Rocker0() ----------

#declare Time =  clock + 0.00;
//---------------------------------------
object{
  Rocker0( 12* sin(Time*2*pi) )
    texture{
      pigment{ color rgb<0.2,0.12,0.08>}
      finish { phong 1 reflection 0}
    } // end of texture
    rotate<0,0,0>
    translate<0,0,0>
} // end of Rocker0 ---------------------

Szenendateien für obiges Kufen-Demo in POV-Ray:
"Rocker0.ini" and "Rocker0.pov"