set oGrid = ActiveSceneRoot.AddGeometry("Grid", "NurbsSurface")
SetValue "grid.surfmsh.geom.subdivu", 2
SetValue "grid.surfmsh.geom.subdivv", 2
set oGrid1 = ActiveSceneRoot.AddGeometry("Grid", "NurbsSurface")
SetValue "grid1.surfmsh.geom.subdivu", 2
SetValue "grid1.surfmsh.geom.subdivv", 2
oGrid1.Kinematics.Global.Parameters("posx").value = oGrid1.Kinematics.Global.Parameters("posx").value - 4.0
SelectObj oGrid1
AddToSelection oGrid
SIAssembleNurbsMesh , 0.150, False, False, True
SelectObj "surfmsh"
for each oNurbsSurface in selection(0).activeprimitive.geometry.Surfaces
logmessage "NurbsSurface index " & oNurbsSurface.Index
for each oNurbsSample in oNurbsSurface.NurbsSamples
logmessage "NurbsSample(" & oNurbsSample.Index & ") UV coordinates are :" & _
oNurbsSample.UNormalized & ", " & oNurbsSample.VNormalized
next
next |