From d94c0212e9ba3237d5c107f7a95a78935c4f3b87 Mon Sep 17 00:00:00 2001
From: mattmcw <matt@sixteenmillimeter.com>
Date: Sat, 13 Jan 2024 19:54:26 -0500
Subject: [PATCH] Adjust sprocket bevel

---
 sprocketed_roller.scad | 17 +++++++++--------
 1 file changed, 9 insertions(+), 8 deletions(-)

diff --git a/sprocketed_roller.scad b/sprocketed_roller.scad
index eb671d4..0ba8daa 100644
--- a/sprocketed_roller.scad
+++ b/sprocketed_roller.scad
@@ -1,43 +1,44 @@
 include <./common/common.scad>;
 
+FN = 100;
+$fn = FN;
+
 SprocketBaseD = 19.05; //8 frames
 SprocketBaseH = 2.7;
 
-
 SprocketH = 10;
 SprocketW = 0.79;
 SprocketL = 1.3;
 
+SprocketAngle = 7;
+SprocketAngleZ = 1.5;
+
 InnerD = 13.98;
 InnerH = 10.6;
 
 TopBaseD = 18.47;
 TopBaseH = 2.96;
 
-
 LipD = 18.84;
 LipH = 0.33;
 
-
 TopD = 21.66;
 TopH = 1.4;
 
-
 HollowD = 4.7;
 HollowBaseD = 12.01;
 HollowBaseH = 6.09;
 
-$fn = 100;
-
 module sprocket (pos = [0, 0, 0], rot = [0, 0, 0], bevel = false) {
     //cube([SprocketL, SprocketW, SprocketH], center = true);
+    $fn = 50;
     translate (pos) rotate(rot) {
         difference () {
             translate([0, 0, 0]) scale([1, 1, 2.25]) rotate([90, 0, 90]) cylinder(r = SprocketW/2, h = SprocketL, center = true);
             translate([0, 0, -1]) cube([2, 2, 2], center = true);
             if (bevel) {
-                translate([1.5, 0, 0]) rotate([0, -5, 0]) cube([2, 2, 3], center = true);
-                translate([-1.5, 0, 0]) rotate([0, 5, 0]) cube([2, 2, 3], center = true);
+                translate([SprocketAngleZ, 0, 0]) rotate([0, -SprocketAngle, 0]) cube([2, 2, 3], center = true);
+                translate([-SprocketAngleZ, 0, 0]) rotate([0, SprocketAngle, 0]) cube([2, 2, 3], center = true);
             }
         }
     }