set root = application.activeproject.activescene.root

set obj = root.addgeometry( "Cube", "MeshSurface" )

set triangle = obj.activeprimitive.geometry.triangles(0)

for each p in triangle.Points

	a = p.PositionArray

	logmessage "p.position: " & a(0) & "," & a(1) & "," & a(2)

next