earring-stand: wip 3d clips in Joins

[reprap-play.git] / earring-stand.scad

diff --git a/earring-stand.scad b/earring-stand.scad
index e3df5ac49ac68db3046ff23e5d56cbc2fce4224f..c6b813bf0bb67711db4307fe451c631aee13e5b8 100644 (file)
--- a/earring-stand.scad
+++ b/earring-stand.scad
@@ -25,6 +25,8 @@ test_base_th = 2.5;
 test_len = eclip_each_len + eclip_each_every*(test_eclips-1);
 echo("test_len",test_len);
 
+num_eclips = 5;
+
 // calculated
 
 include <utils.scad>
@@ -157,22 +159,40 @@ module Sketch(){
 thicks = [ 2, 2, 2 ];
 
 module Joins(alpha, objnum, objnum_f, objnum_m) {
+  pitch = (front_width - eclip_each_len) / (num_eclips-1);
+  
   echo("Joins",objnum, objnum_f, objnum_m);
   thm = thicks[objnum_m];
+  stride = (front_width - eclip_each_len) / (num_eclips-1);
+
   if (objnum==objnum_f) {
-    EclipLPlan(alpha);
-    EclipRPlan(alpha, thm);
+    for (i=[ 0 : 2 : num_eclips-1 ]) {
+      translate([0, i*stride, 0]) {
+       rotate([90,0,0])
+       linear_extrude(height=eclip_each_len)
+         EclipLPlan(alpha);
+      }
+    }
+    for (i=[ 1 : 2 : num_eclips-1 ]) {
+      translate([0, i*stride, 0]) {
+       rotate([90,0,0])
+       linear_extrude(height=eclip_each_len)
+         EclipRPlan(alpha, thm);
+      }
+    }
   }
-  if (objnum==objnum_m)
-    rotate(alpha)
-      EclipPPlan(thm);
+//  if (objnum==objnum_m)
+//    rotate(alpha)
+//      EclipPPlan(thm);
 }
 
+function r3(pc) = [ pc[0], 0, pc[1] ];
+
 module ObjectJoins(objnum){
   echo("Object",objnum);
-  translate(pp)                   Joins(beta, objnum, 0,1);
-  translate(pr) mirror([1,0,0])   Joins(0,    objnum, 0,2);
-  translate(pq) rotate([0,0,-90]) Joins(beta, objnum, 2,1);
+  translate(r3(pp))                   Joins(beta, objnum, 0,1);
+  translate(r3(pr)) mirror([1,0,0])   Joins(0,    objnum, 0,2);
+  translate(r3(pq)) rotate([0,-90,0]) Joins(beta, objnum, 2,1);
 }
 
 module Base(){
@@ -198,4 +218,4 @@ module Demo(){
 //TestProtr();
 //TestRAProtr();
 //Sketch();
-//Demo();
+Demo();