'Create a cube 

CreatePrim "Cube", "MeshSurface"

'Set the selection mode to "Point"

SetSelFilter "Point" 

'Select 4 points on the cube 

SelectGeometryComponents "Cube.pnt[2,3,6,7]" 

'Create a cluster with these 4 points CreateCluster

'The current selection contains the newly created cluster 

set mySelList = GetValue("SelectionList")

set myItem = mySelList(0)

set myCluster = myItem.obj