algorithmic modeling for Rhino
Im trying to make list of vertical planes for intersection with brep, i was looking at rhino common but i get always errors , my aim is to make tool for slabs of brep but im stuck at creating of planes ( need to easly planes of xy cooridnates on specyfic z points ) I will be very thankfull for any help.
my code
Dim pt As Point3d
Dim plane As New Rhino.Geometry.Plane
For i = 0 To Num - 1 Step 1
pt.x = x
pt.y = y
pt.z = z + (i * Factor)
plane = Rhino.Geometry.Plane(pt, Vector3d.zAxis)
planes.Add(plane)
points.Add(pt)
Next
A = points
B = planes
Tags:
Maaasz ;]
Jak potrzebujesz w innych płaszczyznach przekroje robić to zmień po prostu base plane dla bboxa
Dim bbox As New rhino.Geometry.BoundingBox
bbox = inBrep.GetBoundingBox(Plane.WorldXY)
i najlepiej wtedy zrobić kolejny input z planem do łatwiejszego sterowania.
Zmiana rozstawu planów do intersekcji tutaj (uprościłem to dosyć) :
Dim planesSpacing As Double = bboxHeight / (numOfPlanes + 1)
For i As Integer = 1 To numOfPlanes Step 1
Dim actOrigZ As Double = oPt.Z + (i * planesSpacing)
A no i jak się zmieni plane'a do bboxa to trzeba też zmienić te originy dla kolejnych płaszczyzn.
gh 0.8.0052
Welcome to
Grasshopper
© 2025 Created by Scott Davidson.
Powered by