From 69cfec379927f6c230bdec9be2ab32586139ac4e Mon Sep 17 00:00:00 2001
From: Erich Eckner <git@eckner.net>
Date: Sun, 16 Apr 2023 17:35:09 +0200
Subject: Optokopplerhalterung.scad angefangen

---
 Optokopplerhalterung.scad | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)
 create mode 100644 Optokopplerhalterung.scad

diff --git a/Optokopplerhalterung.scad b/Optokopplerhalterung.scad
new file mode 100644
index 0000000..50bbbb2
--- /dev/null
+++ b/Optokopplerhalterung.scad
@@ -0,0 +1,26 @@
+Leiterplattendicke = 1;
+Bodenfreiheit = 3;
+Kopffreiheit = 25;
+Breite = 100;
+Hoehe = 30;
+Dicke = 1.5;
+Nuttiefe = 1;
+
+module Rahmen(x,y,z,d) {
+  difference() {
+    cube([x,y,z]);
+    for (f=[[-1,1,1],[1,-1,1],[1,1,-1]])
+      translate([f[0]*d,f[1]*d,f[2]*d])
+        cube([x-f[0]*2*d,y-f[1]*2*d,z-f[2]*2*d]);
+  }
+};
+
+translate([0,Bodenfreiheit,0])
+  difference() {
+    cube([Breite + 2*Dicke, 2*Dicke + Leiterplattendicke, Hoehe + Dicke]);
+    translate([Dicke,Dicke,Dicke])
+      cube([Breite, Leiterplattendicke, Hoehe + Dicke]);
+    translate([Dicke+Nuttiefe,-Dicke,Dicke+Nuttiefe])
+      cube([Breite-2*Nuttiefe, Leiterplattendicke + 4*Dicke, Hoehe + Dicke]);
+  }
+Rahmen(Breite+2*Dicke,Kopffreiheit+Bodenfreiheit+Leiterplattendicke,Hoehe+Dicke,Dicke);
-- 
cgit v1.2.3-54-g00ecf