Search Wiki:
Code I have changed
Code I find Intresting

Hey I saw the tree fractal from the tutorial and I changed it a bit. hope you enjoy
angle = 30
delta = 10
distance = 60
Turtle.Speed = 100
DrawTree()

Sub DrawTree
If (distance > 0) Then
Turtle.Move(distance)
Turtle.Turn(angle)

Stack.PushValue("distance", distance)
distance = distance - delta
DrawTree()
Turtle.Turn(-angle * 2)
DrawTree()
Turtle.Turn(angle)
distance = Stack.PopValue("distance")

Turtle.Move(-distance)
EndIf
EndSub


Last edited Jun 30 at 10:14 PM  by jinxdbs, version 6
Updating...
Page view tracker