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.NormalArray
        logmessage "p.normal: " & a(0) & "," & a(1) & "," & a(2)
next