Holodisk/tape.scad
2020-12-31 14:15:57 +01:00

28 lines
831 B
OpenSCAD
Executable File

// dependency: https://github.com/revarbat/BOSL
use <BOSL/transforms.scad>
use <holodisk_spec.scad>
module tape(start, end, height = get_holodisk_tape_height(), thickness = get_holodisk_tape_thickness()) {
color("RosyBrown")
up(thickness) hull() {
translate(start) sphere(thickness);
translate(end) sphere(thickness);
up(height - thickness) {
translate(start) sphere(thickness);
translate(end) sphere(thickness);
}
}
}
module tape_spool(r_in, r_out, height = get_holodisk_tape_height(), thickness = get_holodisk_tape_thickness()) {
color("RosyBrown")
up(thickness) minkowski() {
difference() {
cylinder(h=height - thickness, r=r_out);
cylinder(h=height - thickness, r=r_in);
}
sphere(thickness);
}
}