diff options
| author | Christian Hodgden <chrhodgden@gmail.com> | 2024-10-13 20:59:36 -0500 |
|---|---|---|
| committer | Christian Hodgden <chrhodgden@gmail.com> | 2024-10-13 20:59:36 -0500 |
| commit | 001c3aa7035a8ef675b53c7f2a8d80148b71ae2b (patch) | |
| tree | df3c6fc8bb7e09a01bd6490175bbff5da6b1822c /candles/taper.scad | |
| parent | 5bbd3d72fb6d3d34d534a084dfa1dc345550f674 (diff) | |
Updated Candles
1. Adjusted heights. 2. Regenerated stls. 3. Renamed direcory to candles.
Diffstat (limited to 'candles/taper.scad')
| -rw-r--r-- | candles/taper.scad | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/candles/taper.scad b/candles/taper.scad new file mode 100644 index 0000000..5d8fff5 --- /dev/null +++ b/candles/taper.scad @@ -0,0 +1,28 @@ + +use <../lib/bezier.scad>; + +$fn = 100; +base_radius = 3/8; +top_radius = base_radius * 0.75; +top_height = top_radius * 2; +total_height = 7.5; +stem_height = total_height - top_height; + +cylinder(stem_height, base_radius, top_radius); + +control_points = [ + [top_radius, 0], + [0.125, top_height/4], + [0.125, top_height/2], + [0.125, top_height], + [0, top_height] +]; +// adjust curve_facets for low & odd $fn values +curve_facets = $fn/2; +head_curve = bezier_curve(control_points, $fn=curve_facets); +top_curve = concat(head_curve, [[0, 0]]); + +translate([0, 0, stem_height]) + rotate_extrude() + polygon(top_curve); + |