Tuesday, April 24, 2012


Call Main()

Sub main
     
     
        Dim srf,surface,point, object
        surface=Rhino.GetSurfaceObject
        srf=surface(0)
             
        scatter(srf)
     
     
     
End Sub

No comments:

Post a Comment