'This example shows how to copy a cluster
newscene
' Create grid and grid1 (naming done by default)
CreatePrim "Grid", "MeshSurface"
CreatePrim "Grid", "MeshSurface"
Translate , 0, 8, 0, siAbsolute, siParent, siObj, siY
'Create a cluster from selection
CreateCluster "grid.pnt[4,13,22,31,36-44,49,58,67,76]"
'Copy cluster from grid to grid1...
CopyCluster "grid.polymsh.cls.Point", "grid1"
SelectObj "grid.polymsh.cls.Point, grid1.polymsh.cls.Point"