Get the position of a given 0D component

Geometry0D.Position( compIdx, compPos );

Parameter	Type	Description
compIdx	Integer	Index of the component Possible Values: Description: 0 <= compIdx < Number of 0D Component The compIdx must be valid
compPos	SIVector3	Upon return, contains the position of the (compIdx)th 0D component

VBScript Example

'Create a cube
CreatePrim "Cube", "MeshSurface"
set oSelList = GetValue("SelectionList")
set oItem = oSelList(0)
set oGeometry = oItem.obj
oNb0D = oGeometry.Nb0D
set o0DGeometry = oGeometry.Geometry0D
set oPos = XSIMath.CreateVector3()
' Loop on all the 0D Component
for i = 0 to oNb0D - 1
o0DGeometry.Position i, oPos
LogMessage "Component [" & i & "] position : " & oPos.x & " | " & oPos.y & " | " & oPos.z 
next

Geometry0D.AveragePosition Geometry0D Geometry_V1.Nb0D SIVector3