From 51221876fe3d6ed98b2fb81d3defd2a6092d537e Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Tue, 2 May 2023 15:43:59 +0100
Subject: [PATCH] yubikey-5c-nano-loop: wip

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 yubikey-5c-nano-loop.scad | 41 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)
 create mode 100644 yubikey-5c-nano-loop.scad

diff --git a/yubikey-5c-nano-loop.scad b/yubikey-5c-nano-loop.scad
new file mode 100644
index 0000000..5594ec2
--- /dev/null
+++ b/yubikey-5c-nano-loop.scad
@@ -0,0 +1,41 @@
+// -*- C -*-
+
+include <utils.scad>
+
+base = [ 8.4, 4.1 ];
+base_th = 0.7;
+base_slope = 2.0;
+
+hoop_th = 2.8;
+hoop_inner_dia = 2.5;
+
+// caclulated
+
+module Base() {
+  hull(){
+    linextr(-base_th, -base_th + 0.01)
+      square(base, center=true);
+    linextr(-base_th, 0)
+      square(base - 2 * base_th * base_slope * [1,1], center=true);
+  }
+}
+
+module Loop() {
+  intersection(){
+    rotate([90, 0,0]){
+      rotate_extrude(){
+	translate([hoop_inner_dia/2 + hoop_th/2, 0])
+	  circle(r = hoop_th/2);
+      }
+    }
+    linextr(-0.1, hoop_inner_dia*2)
+      square(hoop_inner_dia*4, center=true);
+  }
+}
+
+module Whole() {
+  Base();
+  Loop();
+}
+
+Whole();
-- 
2.30.2