From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 24 Feb 2024 00:56:45 +0000 (+0000)
Subject: mudguard-bracket: retainer: curve
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=3111c40c0d0abd2e07c2fa5ed9927c552380a06a;p=reprap-play.git

mudguard-bracket: retainer: curve

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

diff --git a/mudguard-bracket.scad b/mudguard-bracket.scad
index 4897b7e..f663f60 100644
--- a/mudguard-bracket.scad
+++ b/mudguard-bracket.scad
@@ -11,6 +11,7 @@ wings_main_th = 3.5;
 wings_cup_z = -34;
 retainer_z = -15; // XXXX
 retainer_adjust = 15;
+retainer_radius = 30;
 
 tubeswidth_top = 23.5;
 tubeswidth_bot = 29;
@@ -44,6 +45,7 @@ bracket_top_xsz = tubeswidth_at_z(bracket_top_z) + tube_dia * 1.5;
 wing_top_ea_x = -tubeswidth_top/2 - wings_main_th/2;
 
 retainer_ea_x = wing_top_ea_x + wings_main_th/2 + retainer_x_gap;
+retainer_z_ctr = retainer_z - retainer_radius;
 
 wing_corners = [
 //		[ -wings_dist_x/2, wings_cup_z/2 ],
@@ -170,12 +172,14 @@ module Retainer(){ ////toplevel
   linextr(0, retainer_th) {
     difference(){
       union(){
-	rectfromto([ -retainer_ea_x, retainer_z ],
+	rectfromto([ -retainer_ea_x, retainer_z_ctr ],
 		   [ +retainer_ea_x, bracket_top_z + retainer_adjust/2 ]);
 	// TODO make it round at bottom
       }
       translate([ 0, screw_hole_z ])
 	Oval( screw_dia/2, retainer_adjust );
+      translate([ 0, retainer_z_ctr ])
+	circle(r = retainer_radius);
     }
   }
 }