openscad/dotSCAD
1
0
Fork 0
mirror of https://github.com/JustinSDK/dotSCAD.git synced 2025-08-10 00:36:40 +02:00
Code Issues Releases Wiki Activity

use t3d to refactor

Browse Source
This commit is contained in:
Justin Lin
2019-09-29 10:20:40 +08:00
parent f8bfe807a0
commit cf70c376ac
1 changed files with 8 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
examples/turtle/tree.scad
View File

@@ -1,30 +1,31 @@
include <turtle/turtle3d.scad>;
include <line3d.scad>;
include <turtle/t3d.scad>;
module tree(t, leng, leng_scale1, leng_scale2, leng_limit,
angleZ, angleX, width) {
if(leng > leng_limit) {
t2 = turtle3d("xu_move", t, leng);
t2 = t3d(t, "xforward", leng = leng);
line3d(
turtle3d("pt", t), turtle3d("pt", t2),
t3d(t, "point"), t3d(t2, "point"),
width);
tree(
turtle3d("zu_turn", t2, angleZ),
t3d(t2, "zturn", angle = angleZ),
leng * leng_scale1, leng_scale1, leng_scale2, leng_limit,
angleZ, angleX,
width);
tree(
turtle3d("xu_turn", t2, angleX),
t3d(t2, "xturn", angle = angleX),
leng * leng_scale2, leng_scale1, leng_scale2, leng_limit,
angleZ, angleX,
width);
}
}
leng = 100;
leng = 20;
leng_limit = 1;
leng_scale1 = 0.4;
leng_scale2 = 0.9;
@@ -32,7 +33,7 @@ angleZ = 60;
angleX = 135;
width = 2;
t = turtle3d("create");
t = t3d();
tree(t, leng, leng_scale1, leng_scale2, leng_limit,
angleZ, angleX, width);