From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Tue, 26 Dec 2023 12:55:52 +0000 (+0000)
Subject: chimney-cable-retainer: maybe
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=commitdiff_plain;h=39bea34f60eee23c8e1ed9bb50bda7483f2b3785

chimney-cable-retainer: maybe

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

diff --git a/chimney-cable-retainer.scad b/chimney-cable-retainer.scad
index 0d70ba1..2f783d0 100644
--- a/chimney-cable-retainer.scad
+++ b/chimney-cable-retainer.scad
@@ -30,7 +30,18 @@ module CoreElevation(){
 	     [ general_th, above_h ]);
   translate([ inrear_d, -above_h ])
     rectfromto([ 0,0 ],
-	       [ -bar_th, -bar_th ]);
+	       [ -bar_th, bar_th ]);
+}
+
+module BarMountElevation(){
+  hull(){
+    rotate(-sit_angle)
+      rectfromto([ 0, 0 ],
+		 [ inrear_d, general_th ]);
+    translate([ 0, -below_h ])
+      rectfromto([ 0,0 ],
+		 [ inrear_d, bar_th ]);
+  }
 }
 
 module Retainer(){ ////toplevel
@@ -39,6 +50,12 @@ module Retainer(){ ////toplevel
       linextr_x_yz(0, total_x)
 	mirror([1,0])
 	CoreElevation();
+
+      for (x = [0, 0.5, 1] * (total_x - general_th))
+	translate([ x, 0,0 ])
+	linextr_x_yz(0, general_th)
+	mirror([1,0])
+	BarMountElevation();
     }
 
     for (x = [cable_x, total_x - cable_x])