Fractal tree: Using sliders
Step 1: Create segment and branches
α = Slider(pi/2, 3 pi/2, 0.01, 1, 200, false, true, false, false)
β = Slider(pi/2, pi, 0.01, 1, 200, false, true, false, false)
s1 = Slider(0, 1, 0.01, 1, 200, false, true, false, false)
s2 = Slider(0, 1, 0.01, 1, 200, false, true, false, false)
A = (0, 0)
B = (0, 2)
f = Segment(A, B)
C = Dilate(Rotate(Point(f, 0), α,Point(f, 1)), s1, Point(f, 1))
D = Dilate(Rotate(Point(f, 0), β, Point(f, 1)), s2, Point(f, 1))
ListOutPut = {Segment(B, C), Segment(B, D)}
Step 2: Create tool
All the details are available here:
https://www.geogebra.org/m/wjyyydzk
Step 3: Iterate
IterationList(Flatten(Zip(Grow(α, β, s1, s2, s), s, level)), level, {{f}}, 8)