Files
juqs-collar/shape_gate.scad
T
2022-01-09 16:08:20 -08:00

18 lines
417 B
OpenSCAD

$fn = 100;
gate_height = 50;
include<math.scad>;
include<round_poly.scad>;
module shape_gate (shape, throw, shaft_r, sharpness = 0) {
function throw_travel(throw) = gate_height * tan(throw);
hull(){
linear_extrude(0.1)
round_poly(shape, shaft_r, 0, sharpness);
translate([0,0,gate_height])
linear_extrude(0.00001)
round_poly(shape, shaft_r, throw_travel(throw), sharpness);
}
}