// create scene with sphere
NewScene( null, false );
CreatePrim("Sphere", "MeshSurface", null, null);
// get selected elements from scene
if ( Selection.count == 0 ) {
	LogMessage( "Nothing selected", siError );
} else {	
	var objs = Selection;
	// get selected meshes from selection list
	var meshes = SIFilter( objs, "polygon_mesh", true, siQuickSearch );
	if ( !meshes ) {
		LogMessage( "No polygon meshes selected", siError );
	}
	// add 4 vertex color properties to each mesh
	for ( var i = 0; i < objs.count; i++ ) {
		// get current mesh (type : "polyMsh")
		var obj = objs( i );
		// get obj material
		var mat = obj.Material;
		// if material is not local add one
		if ( mat.IsA(siSharedPSet) ) {
			mat = obj.AddMaterial();
		}
		// get polygon mesh geometry
		var polymesh = obj.ActivePrimitive.Geometry;	
		for ( var j = 0; j < 4; j++ ) {
			polymesh.AddVertexColor();
		}
	}
	// list all vertex colors installed on polygon meshes
	for ( var i = 0; i < objs.count; i++ ) {
		// get current mesh (type : "polyMsh")
		var obj = objs( i );
		// get polygon mesh geometry
		var polymesh = obj.ActivePrimitive.Geometry;	
		var vertexcolors = polymesh.VertexColors;
		LogMessage( vertexcolors.Count );
		for ( var j = 0; j < vertexcolors.Count; j++ )
		{
			var vertexcolor = vertexcolors(j);
			LogMessage( vertexcolor.fullname );
		}
	}
}
//