1 files changed, 14 insertions, 0 deletions
diff --git a/body/laser.scad b/body/laser.scad
new file mode 100644
index 0000000..2b8cab9
--- /dev/null
+++ b/body/laser.scad
@@ -0,0 +1,14 @@
+include <helpers.scad>
+
+default_laser_d = 14;
+default_laser_l = 45;
+
+// create a body of laser with diameter `d` and
+// length `l`.
+// the ray starts at the origin
+module laser_body(d = default_laser_d, l = default_laser_l)
+{
+    rotate([-90, 0, 0])
+    translate([0, 0, -l])
+    cylinder($fn = diameterToFn(d), d = d, h = l);
+}
+\ No newline at end of file