yubikey-5c-nano-loop: wip

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/yubikey-5c-nano-loop.scad b/yubikey-5c-nano-loop.scad
index 5594ec28b39091ceee7eda8c57e8c915551af399..a0e2add011225b12ac7e70b1956ece91a5d647c0 100644 (file)
--- a/yubikey-5c-nano-loop.scad
+++ b/yubikey-5c-nano-loop.scad
@@ -6,26 +6,37 @@ base = [ 8.4, 4.1 ];
 base_th = 0.7;
 base_slope = 2.0;
 
-hoop_th = 2.8;
+hoop_th = 2.4;
 hoop_inner_dia = 2.5;
 
+$fa = 3;
+$fs = 0.1;
+
 // caclulated
 
 module Base() {
   hull(){
     linextr(-base_th, -base_th + 0.01)
       square(base, center=true);
-    linextr(-base_th, 0)
+    linextr(-base_th, 0) {
       square(base - 2 * base_th * base_slope * [1,1], center=true);
+      for (m=[0,1]) {
+       mirror([m,0,0]) LoopPlan();
+      }
+    }
   }
 }
 
+module LoopPlan() {
+  translate([hoop_inner_dia/2 + hoop_th/2, 0])
+    circle(r = hoop_th/2);
+}
+
 module Loop() {
   intersection(){
     rotate([90, 0,0]){
       rotate_extrude(){
-       translate([hoop_inner_dia/2 + hoop_th/2, 0])
-         circle(r = hoop_th/2);
+       LoopPlan();
       }
     }
     linextr(-0.1, hoop_inner_dia*2)