12 RadiusM=Hoehe*(Teiler-1)/Teiler/Teiler;
14 // Randverzierungen als Kindelemente übergeben
15 module randverzierung(n = 12) {
17 rotate([0,0,i*(360/n)])
18 translate([Radius1+0.1,0,0.5])
29 color("red") cylinder(Hoehe,Radius1,Radius2);
32 color("blue") cylinder(1,Radius1,Radius1);
36 translate([0,0,Hoehe/3])
37 color("orange")cylinder(Hoehe,Radius1,Radius2);
40 color("green") cylinder(Hoehe-1,Radius1-1,Radius2);
45 translate ([0,0,Radius1-1])
46 cylinder(1,RadiusM,RadiusM);
48 // Randverzierungen: nach Wunsch einkommentieren, oder ganz ohne
51 //randverzierung(n=4) {
53 // cylinder(r1=0.5, r2=0, h=0.5, center=true);
59 cube([1,0.5,0.5], center=true);
63 //randverzierung(n=9) {
64 // cube([0.5,2,0.5], center=true);
68 //randverzierung(n=11) {
70 // cylinder(r1=0.5, r2=0, h=0.4, center=true, $fn=4);
74 //randverzierung(n=12) {
76 // cube([1,0.3,0.5], center=true);
77 // cube([0.3,1,0.5], center=true);