From aefc72cf804c1ad4f9ff154d758f86053a033dd4 Mon Sep 17 00:00:00 2001
From: Jochen Vothknecht <jochen3120@gmail.com>
Date: Thu, 18 Aug 2022 06:47:29 +0200
Subject: [PATCH] Other belt side
---
scad/gears/polygroove.scad | 15 ++++++++++++++-
1 file changed, 14 insertions(+), 1 deletion(-)
diff --git a/scad/gears/polygroove.scad b/scad/gears/polygroove.scad
index 783ac4b..ac7a9dc 100644
--- a/scad/gears/polygroove.scad
+++ b/scad/gears/polygroove.scad
@@ -121,13 +121,26 @@ module PolygrooveBeltInner(diameter, angle=360, teeth=5, grooveWidth=3, grooveDe
translate([grooveDepth/2 + diameter/2, 0, 0])
mirror([1, 0, 0])
PolygrooveBeltProfile(teeth=teeth, grooveWidth=grooveWidth, grooveDepth=grooveDepth, flattenTeeth=flattenTeeth);
+}
+
+module PolygrooveBeltOuter(diameter, angle=360, teeth=5, grooveWidth=3, grooveDepth=3, flattenTeeth=0.3) {
+ assert(diameter > grooveDepth/2, "TODO: msg!");
+ rotate_extrude(angle=angle)
+ translate([-grooveDepth/2 + diameter/2, 0, 0])
+ PolygrooveBeltProfile(teeth=teeth, grooveWidth=grooveWidth, grooveDepth=grooveDepth, flattenTeeth=flattenTeeth);
}
-PolygrooveBeltInner(diameter=70, angle=97, teeth=5, grooveWidth=3, grooveDepth=3, flattenTeeth=0.3, $fn=100);
+PolygrooveBeltInner(diameter=70, angle=90, teeth=5, grooveWidth=3, grooveDepth=3, flattenTeeth=0.3, $fn=100);
+
+
+translate([70, 0, 0])
+ rotate([0, 0, 180])
+ PolygrooveBeltOuter(diameter=70, angle=90, teeth=5, grooveWidth=3, grooveDepth=3, flattenTeeth=0.3, $fn=100);
+
// ⬇ Example code below ⬇
--
GitLab