// Das ist ein Kommentar und bewirkt nichts.

// Kamera
camera { 
      sky <0,0,1>           // Vektor, der festlegt, wo oben ist.
      right <-4/3,0,0>     // Bildverhältnis 4:3, plus Spiegelung für rechtsdrehendes System
      location <15,15,10>    // Position der Kamera
      look_at <15, 0, 0>    // Blickrichtung (erscheint im Bildmittelpunkt)
      angle 0             // Öffnungswinkel der Kamera
}

// Lichtquellen
light_source { 
 <6,-2,8>              // Position des Lichts
 color rgb <1,1,1>     // Farbe des Lichts, als rot-grün-blau Vektor (Komponenten 0 bis 1)
}
light_source { 
 <3,10,3>              // Position des Lichts
 color rgb <1,1,1>     // Farbe des Lichts, als rot-grün-blau Vektor (Komponenten 0 bis 1)
}


// Boden
//plane { 
 // z,0        // Ebene, senkrecht zu z=<0,0,1>, mit Abstand 0 zum Ursprung
 // pigment {  // Schachbrett, durchsichtig (t steht für transmit, hier 80% lichtdurchlässig
 //   checker color rgbt <1,1,1,0.8>, color rgbt <0.2,0.2,0.2,0.8>
 // }
//}


// Objekte
//#include "koordinatensystem.inc" 
#declare kettenglied = union{ 

 #declare rund = difference { // Halber torus (in x/z-Ebene, Teil mit positiver x-Koordinate
  torus {1, 0.3}
  plane {x, 0}
}  
object{rund
  pigment{color rgb <0.05,0,0.005>}
  finish { phong 0.95 reflection {2} }
} 
 object{rund
  pigment{color rgb <0.05,0,0.005>}
  rotate 180*z
  translate<-1.5,0,0>
  finish { phong 0.95 reflection {2} }
  } 
  cylinder{<0,0,-1>, <-1.5,0,-1>, 0.3
  pigment{color rgb<0.05,0,0.005>}
  finish { phong 0.95 reflection {2} }
  } 
  cylinder{<0,0,1>, <-1.5,0,1>, 0.3
  pigment{color rgb <0.05,0,0.005>} 
  finish { phong 0.95 reflection {2} }
  }    
  }
  
  #declare kg2 = union { 
  object{kettenglied}
  object{kettenglied
  translate <3.1,0,0>
  rotate 90*x  
  }}
  
  #declare i=0;         // Initialisierung
#while (i<50)         // Code zwischen while und end wiederholen, solange i<10
  object{kg2
  translate<i,0,0>}
  #declare i=i+6.2;     // Nicht vergessen: i bei jedem Schritt um 1 erhöhen.
#end             //Ende der While-Schleife


 
 // sky ----------------------------------
sky_sphere{
 pigment{ gradient <0,1,0>
          color_map{
     [0.00 color rgb<0.24,0.32,1> *0.3]
     [0.23 color rgb<0.16,0.32,0.9> *0.9]
     [0.37 color rgb<1,0.1,0> ]
     [0.52 color rgb<1,0.2,0> ]
     [0.70 color rgb<0.36,0.32,1> *0.7 ]
     [0.80 color rgb<0.14,0.32,1> *0.5 ]
     [1.00 color rgb<0.24,0.32,1> *0.3 ]
     [1.00 color rgb<0.24,0.32,1> *0.3 ]
     
                   } // end color_map
     scale 2
     rotate <-10,0,0>
     translate <3,2,0>
 } // end pigment
} // end sky_sphere ---------------------