'Create a cube
CreatePrim "Cube", "MeshSurface"
set oSelList = GetValue("SelectionList")
set oItem = oSelList(0)
set oGeometry = oItem.obj
oNb2D = oGeometry.Nb2D
set o2DComponent = oGeometry.Geometry2D
set oXAxis = XSIMath.CreateVector3()
set oYAxis = XSIMath.CreateVector3()
set oZAxis = XSIMath.CreateVector3()
' Loop on all the 2D Component
for i = 0 to oNb2D - 1
o2DComponent.LocalReferenceFrame i, oXAxis, oXAxisValid, oYAxis, oYAxisValid, oZAxis, oZAxisValid
if oXAxisValid then
LogMessage "Component [" & i & "] X axis : " & oXAxis.x & " | " & oXAxis.y & " | " & oXAxis.z 
else
LogMessage "Component [" & i & "] INVALID X axis"
end if
if oYAxisValid then
LogMessage "Component [" & i & "] Y axis : " & oYAxis.x & " | " & oYAxis.y & " | " & oYAxis.z 
else
LogMessage "Component [" & i & "] INVALID Y axis"
end if
if oZAxisValid then
LogMessage "Component [" & i & "] Z axis : " & oZAxis.x & " | " & oZAxis.y & " | " & oZAxis.z 
else
LogMessage "Component [" & i & "] INVALID Z axis"
end if
next