From 5465c94e2078d76c09729aac9f5f2446ff7f3eb4 Mon Sep 17 00:00:00 2001
From: finga <finga@onders.org>
Date: Sat, 11 Jan 2025 22:07:49 +0100
Subject: [PATCH] Improve sled

Add shaft holes and make more space between sled and tape.
---
 pen_plotter.scad | 20 +++++++++++++++++---
 1 file changed, 17 insertions(+), 3 deletions(-)

diff --git a/pen_plotter.scad b/pen_plotter.scad
index 881f6be..7782a9a 100644
--- a/pen_plotter.scad
+++ b/pen_plotter.scad
@@ -44,9 +44,23 @@ module linear_shafts() {
     cylinder(110, 3.5, 3.5);
 }
 
-module sled() {
-  translate([150, 130, 100])
-    cube([30, 20, 50]);
+module sled(width = 20) {
+  translate([150, 130, 100]) {
+    difference() {
+      cube([30, width, 50]);
+      union() {
+	translate([-30, width, -40])
+	  rotate([90, 0, 0])
+	  cylinder(width, 60, 60);
+	translate([10, width, 40])
+	  rotate([90, 0, 0])
+	  cylinder(width, 4, 4);
+	translate([20, width, 10])
+	  rotate([90, 0, 0])
+	  cylinder(width, 4, 4);
+      }
+    }
+  }
 }
 
 color([0,0,0]) floor();