Added source code

2025-09-02 20:02:46 +02:00 · 2019-06-08 22:10:47 +01:00
parent d80facf2ca
commit 34a9b0e87b
246 changed files with 18858 additions and 0 deletions
--- a/utils/hanging_hole.scad
+++ b/utils/hanging_hole.scad
@@ -0,0 +1,64 @@
+//
+// NopSCADlib Copyright Chris Palmer 2018
+// nop.head@gmail.com
+// hydraraptor.blogspot.com
+//
+// This file is part of NopSCADlib.
+//
+// NopSCADlib is free software: you can redistribute it and/or modify it under the terms of the
+// GNU General Public License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// NopSCADlib is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
+// without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+// See the GNU General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License along with NopSCADlib.
+// If not, see <https://www.gnu.org/licenses/>.
+//
+
+//
+//! Method to print holes in mid air. See <https://hydraraptor.blogspot.com/2014/03/buried-nuts-and-hanging-holes.html>
+//
+include <../core.scad>
+
+module hanging_hole(z, ir, h = 100, h2 = 100) { //! Hole radius ```ir``` hanging at the specified ```z``` value above a void who's shape is given by a 2D child
+    module polyhole(r, h, n = 8) {
+        if(h > 0)
+            rotate(180 / n) {
+                poly_cylinder(r = r, h = layer_height, sides = n);
+
+                translate_z(layer_height)
+                    if(2 * n <= sides(r))
+                        polyhole(r - eps, h - layer_height, n * 2);
+                    else
+                        poly_cylinder(r - eps, h - layer_height);
+            }
+    }
+    assert(z % layer_height == 0, str(z));
+    infill_angle = z % (2 * layer_height) ? -45 : 45;
+    below = min(z + eps, h2);
+    big = 1000;
+
+    render(convexity = 3) translate_z(z)
+        union() {
+            translate_z(2 * layer_height)
+                polyhole(ir - eps, h - 2 * layer_height);
+
+            difference() {
+                translate_z(-below)
+                    linear_extrude(height = below + 2 * layer_height)
+                        children();
+
+                rotate(infill_angle)
+                    for(side = [-1, 1]) {
+                        translate([side * (ir + big), 0, big + layer_height])
+                            cube(2 * big, center = true);
+
+                        translate([0, side * (ir + big), big])
+                            cube(2 * big, center = true);
+
+                    }
+            }
+        }
+}