Do you want some sort of shelling on that? Sorry to contribute to the
Voronoi Porn, but it was a good system to try out some shelling...
http://groups.google.com/group/grasshopper3d/web/voronoi3d_2.ghx
http://groups.google.com/group/grasshopper3d/web/vorPorn2.jpg
Thanks for sharing visose!
luis
On Apr 26, 9:55 pm, visose <vic...@gmail.com> wrote:
> Damien posted a script a while ago that used app.RunScript(), it was
> like a revelation :P. There's probably some better way to select the
> points and polysurfaces of a document without actually calling the
> rhino command.
>
> I haven't used paneling tools too much, but I'm not sure what can be
> done with it that can't be done with grasshopper.
>
> On Apr 26, 9:26 pm, taz <tzez...@gmail.com> wrote:
>
> > visose,
>
> > That's pretty cool. I didn't realize you could implement command line
> > macros in a VB component, even if it is a rough way to do it.
>
> > I saw Raaja's post for renumbering points for input to paneling tools,
> > but I imagine once you know your paneling tools routine a similar VB
> > macro could be written to tweak settings.
>
> > -taz
>
> > On Apr 26, 5:37 am, visose <vic...@gmail.com> wrote:
>
> > > You can also run the '3dvoronoi' command of the 'point set
> > > reconstruction' plugin from a scripting component in a macro kind of
> > > way.
> > > This really crude example does the following: Selects all points in
> > > the document, creates 3d voronoi cells as polysurfaces, select all the
> > > polysurfaces in the document, adds them to an 'onbrep' list, deletes
> > > the polysurfaces from the document, outputs the onbrep list. For some
> > > reason, after dragging the points, the new voronoi cells aren't
> > > created, you have to press the 'play' button after every drag. This is
> > > really crude automatization and hopefully someone can improve on this.
>
> > > doc.UnselectAll()
> > > app.RunScript("!-_selpt")
> > > app.RunScript("-_3dvoronoi _enter _Polysurfaces")
> > > doc.UnselectAll
> > > app.RunScript("-_SelClosedPolysrf")
>
> > > Dim go As New MRhinoGetObject()
> > > go.EnablePreSelect(True)
> > > go.EnablePostSelect(False)
> > > go.GetObjects(0, 0)
>
> > > app.RunScript("!-_delete")
>
> > > Dim obj_list As New List(Of onbrep)
> > > For i As Integer = 0 To go.ObjectCount() - 1
> > > Dim objref As IRhinoObjRef = go.Object(i)
> > > Dim objb As onbrep = objref.brep()
> > > obj_list.Add(objb)
> > > Next i
>
> > > a = obj_list
>
> > > On Apr 19, 5:44 pm, Dimitrie <didimit...@gmail.com> wrote:
>
> > > >http://qhull.org/
>
> > > > only i'm fucking myself up while trying to get the calls right from a
> > > > script component. it won't probably be that fast since it's quite an
> > > > underhanded approach...
>
> > > > there's alsohttp://tetgen.berlios.de/butican'tcompile it in a
> > > > worthwhile dll.
>
> > > > Speaking of, i have a question for david: if i have a non .net
> > > > assembly file will it work if referenced? (sorry if this a stupid
> > > > question but i'm not really a pro).
