openscad/dotSCAD
1
0
Fork 0
mirror of https://github.com/JustinSDK/dotSCAD.git synced 2025-08-05 06:17:32 +02:00
Code Issues Releases Wiki Activity

add plant

Browse Source
This commit is contained in:
Justin Lin
2020-04-16 08:36:53 +08:00
parent ed1d59dc4f
commit a8aaf56b50
1 changed files with 12 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
examples/lsystem3_collection.scad
View File

@@ -1,7 +1,7 @@
use <experimental/lsystem3.scad>; use <experimental/lsystem3.scad>;
use <hull_polyline3d.scad>; use <hull_polyline3d.scad>;
for(line = vine()) { for(line = plant()) {
hull_polyline3d( hull_polyline3d(
[line[0], line[1]], [line[0], line[1]],
thickness = 0.25, thickness = 0.25,
@@ -18,6 +18,17 @@ function tree(n = 4, angle = 22.5, leng = 1, heading = 0, start = [0, 0, 0]) =
) )
lsystem3(axiom, rules, n, angle, leng, heading, start); lsystem3(axiom, rules, n, angle, leng, heading, start);
function plant(n = 4, angle = 30, leng = 1, heading = 0, start = [0, 0, 0]) =
let(
axiom = "A",
rules = [
["A", "B[+A]\\\\\\\\[+A]\\\\\\\\[+A]\\\\\\\\BA"],
["B", "BB"],
["B", "A/B"]
]
)
lsystem3(axiom, rules, n, angle, leng, heading, start, forward_chars = "AB", rules_pr = [1, .5, 1]);
function hilbert_curve(n = 3, angle = 90, leng = 1, heading = 0, start = [0, 0, 0]) = function hilbert_curve(n = 3, angle = 90, leng = 1, heading = 0, start = [0, 0, 0]) =
let( let(
axiom = "A", axiom = "A",