wall-cable-hook: before slopy top

diff --git a/wall-cable-hook.scad b/wall-cable-hook.scad
new file mode 100644 (file)
index 0000000..06291ac
--- /dev/null
+++ b/wall-cable-hook.scad
@@ -0,0 +1,23 @@
+// -*- C -*-
+
+circle_inner_rad = 10;
+
+thick = 3;
+
+tab_sz = 15;
+
+// calculated
+
+circle_outer_rad = circle_inner_rad + thick;
+
+module Plan() {
+  difference(){
+    circle(r=circle_outer_rad);
+    circle(r=circle_inner_rad);
+    mirror([1,0]) square([50,50]);
+  }
+  translate([-circle_outer_rad, -0.1])
+    square([thick, tab_sz + circle_outer_rad]);
+}
+
+Plan();