set oCube = ActiveSceneRoot.AddGeometry("Cube","MeshSurface")
set oEdges = oCube.ActivePrimitive.Geometry.Edges
for each oEdge in oEdges
        logmessage "Index of the edge: " & oEdge.Index
next