Unterteile soweit fertig

1 files changed, 41 insertions, 32 deletions

diff --git a/Duschvorhangshaken.scad b/Duschvorhangshaken.scad
index ba6920e..bab8c5c 100644
--- a/Duschvorhangshaken.scad
+++ b/Duschvorhangshaken.scad
@@ -1,44 +1,53 @@
+dAchse = 3;
+dAchseAuszen = 6;
+Huckel = 0.1;
 d = 5;
-ri = 3;
 l1 = 10;
-l2 = 30;
-l3 = 15;
-sb = 0.25;
-sl = 10;
-sd = 1;
-amplitude = 0.5;
-lambda = d/3*2;
+l2 = 20;
+alpha = 75;
+epsilon = 0.025;
 
-step = lambda/20;
+Teil = 0;
+Geschlecht = 1;
 $fn = 100;
 
-translate([-d-ri,0,0])
-  cube([d, l1, d]);
-translate([ri,0,0])
-  cube([d, l2, d]);
-translate([-ri-d,l2-l3,0])
+if(Teil == 0) {
   difference() {
     union() {
-      translate([ri+d-l3+sl,l3-sl,0])
-        cube([2*l3-2*sl,sl,d]);
-      translate([d+ri, l3-sl, 0])
-        cylinder(r = l3-sl, h = d);
-    }
-    for(j=[-1:step:d+1]) {
-      hull(){
-        for(i=[0:1]) {
-          translate([amplitude*sin((j+i*step)*360/lambda)+ri+d-sb/2,l3,j+i*step])
-            cube([sb,1,1/1000]);
-          translate([amplitude*sin(-(j+i*step)*360/lambda)+ri+d,l3-sl,j+i*step])
-            cylinder(r = sd/2, h = 1/1000);
+      translate([-d,-l1,0])
+        cube([d,d,d]);
+      translate([-d,-l1,-d])
+        cube([d,l1,d]);
+      rotate([0,0,-alpha])
+        union() {
+          translate([-d,0,-d])
+            cube([d,l2,d]);
+          translate([-d/2,l2,-d]) {
+            cylinder(h = 2*d, r = dAchse/2 - epsilon);
+            translate([0,0,2*d])
+              sphere(r = dAchse/2 + Huckel);
+          }
         }
+      intersection(){
+        translate([-d,0,-d])
+          cube([d,d,d]);
+        translate([0,0,-d])
+          cylinder(r = d, h = d);
+      }
+      translate([0,0,-d])
+        cylinder(r = dAchseAuszen/2, h = d);
+      if(Geschlecht == 0) {
+        translate([0,0,-d])
+          cylinder(h = 2*d, r = dAchse/2 - epsilon);
+        translate([0,0,d])
+          sphere(r = dAchse/2 + Huckel);
       }
     }
+    if(Geschlecht == 1) {
+      translate([0,0,-d-1])
+        cylinder(h = 2*d+2, r = dAchse/2 + epsilon);
+      translate([0,0,-d])
+        sphere(r = dAchse/2 + Huckel);
+    }
   }
-difference() {
-  cylinder(h = d, r = ri + d);
-  translate([0,0,-1])
-    cylinder(h = d+2, r = ri);
-  translate([-ri, 0, -1])
-    cube([2*ri, ri+d+1, d+2]);
 }
\ No newline at end of file