algorithmic modeling for Rhino
Tags:
Dim lines As New List(Of Line)
For i As Int32 = 0 To 8
Dim list0 As List(Of Point3d) = tree.Branch(0,0,i)
Dim list1 As List(Of Point3d) = tree.Branch(0,1,i)
Dim point0 As Point3d = list0(0)
Dim point1 As Point3d = list1(3)
lines.Add(New Line(point0, point1))
Next
--
David Rutten
david@mcneel.com
Poprad, Slovakia
Welcome to
Grasshopper
Added by Parametric House 0 Comments 0 Likes
Added by Parametric House 0 Comments 0 Likes
Added by Parametric House 0 Comments 0 Likes
Added by Parametric House 0 Comments 0 Likes
© 2024 Created by Scott Davidson. Powered by