' this example illustrates how to access the points of the grid polygon mesh.

set oRoot = ActiveProject.ActiveScene.Root

set oGrid = oRoot.AddGeometry( "Grid", "MeshSurface")

set oGeometryV1 = oGrid.ActivePrimitive.Obj

set oGeometry0D = oGeometryV1.Geometry0D

set oCompPos  = XSIMath.CreateVector3()

' for each 0D Component

for iCompIdx = 0 to oGeometryV1.Nb0D - 1

	oGeometry0D.Position iCompIdx, oCompPos  

	LogMessage oCompPos.x & ", " & oCompPos.y & ", " & oCompPos.z 

next