// povray 3.6   // Präzession eines Schwungrads // // Am Schwungrad lassen sich die Auswirkungen der Präzession aufzeigen. Ein Kippen // der Rotationsachse vom Schwungrad ruft senkrecht zur Achse stehende Kräfte hervor.  // Zentrales Element bildet ein Schwungrad. Damit die vielen Vektoren erkennbar sind, // wird das als transparentes Objekt abgebilet. Ein Kippen führt zu entsprechenden Kräften // auf mit rotierende Masseelemente.  // Globale Definitionen  #declare Ansicht = 1;  // Achsen // x -> links nach rechts // y -> von unten nach oben // z -> tiefe  // Kameraposition #if (Ansicht = 1)   #declare Kameraposition = <10, 15, -28>; #end #if (Ansicht = 2)   #declare Kameraposition = <0, 0, -33>; #end // #declare Kameraposition = <0.1, 0.1, -28>;  #declare Vektor_Teilung = 1; // * Vektor_Durchmesser #declare Vektor_Durchmesser = 0.1; // * Vektor_Schrift #declare Vektor_Schrift = "Schrift/DejaVuSans.ttf"  #declare Winkel_Vektor_Radius = 2.5;  global_settings {    adc_bailout 0.00392157    assumed_gamma 1.5    noise_generator 2    charset utf8     }   light_source {    Kameraposition    rgb <1.5, 1.5, 1.5>    shadowless }  camera {    //perspective    orthographic angle  45    location Kameraposition    sky <0, 1, 0>    direction <0, 0, 1>    right x*image_width/image_height    up <0, 1, 0>    look_at <0, 0, 0> }  /* camera { // X    perspective    location <45, 0, 0>    sky <0, 1, 0>    direction <0, 0, 1>    right <1, 0, 0>    up <0, 1, 0>    look_at <0, 5, 0> }  camera { // Z    perspective    location <0, 0, -45>    sky <0, 1, 0>    direction <0, 0, 1>    right <1, 0, 0>    up <0, 1, 0>    look_at <0, 5, 0> } */  #include "../baukasten/baukasten.pov"  #include "colors.inc"   // ******* // * // * MAIN // * // *******   // Koordinaten-Achsen // Schwungrad // Drehimpuls  // Clock geht von 0. bis 1. // Animation bis zur Neigung von 30° und 6 Umdrehungen // BUG: Plättungseffekt???  #declare x_offset = 0; // -2; #declare y_offset = -1;   #declare Neigungswinkel = 20; // in Grad  // // Schwungrad mit Massepunkten //  object {   Schwungrad_mit_Massen(Neigungswinkel)   translate x * x_offset   translate y * y_offset }   // // Koordinatenachsen //  object {   Vektor(<x_offset+6,y_offset,0>, <3,0,0>, "y", "", Gray50) // povray x-Achse } object {   ZylinderStattVektor(<x_offset-6,y_offset,0>, <-2,0,0>, Gray50) // povray x-Achse }   object {   Vektor(<x_offset,y_offset+6,0>, <0,3,0>, "z", "", Gray50) // povray y-Achse } object {   ZylinderStattVektor(<x_offset,y_offset-6,0>, <0,-2,0>, Gray50) // povray y-Achse }  object {   Vektor_Invert(<x_offset,y_offset,-6>, <0,0,-3>, "x", "", Gray50) // povray z-Achse } object {   ZylinderStattVektor(<x_offset,y_offset,+6>, <0,0,2>, Gray50) // povray z-Achse }  // // Hintergrund //  sphere {   <0,0,0>,1 hollow   texture {     pigment{gradient <0,1,0>       color_map{ //        [-1.0 color White] //        [-0.7 color rgb<0.1,0.25,0.75>]         [0 color White]         [1.0 color rgb<0.1,0.25,0.75>] //        [1.0 color White] //        [2.0 color rgb<0.1,0.25,0.75>] //        [1.0 color rgb<0.1,0.25,0.75>]       }       scale 2 translate y*-1     } // end pigment     finish {ambient 1 diffuse 0}   } // end of texture //  rotate x * 45 //  rotate y * 45   scale 40   translate y * y_offset } // end of sphere -----------------------  // EOF