MaxScript / Detach Faces

(
	fn detachFacesAsClone obj:undefined =
	(
		local sel = if (isvalidnode obj) then obj else $
		local n = undefined
		if (iskindof sel editable_poly) do (
			local sf = polyop.getfaceselection sel
			if not sf.isEmpty do (
				local nn = uniquename (sel.name + "_")
				polyop.detachfaces sel sf asNode:true delete:false name:nn
				n = getnodebyname nn
				if isvalidnode n do (
					subobjectlevel = 0 -- optional
					centerpivot n
					select n
				)
			)
		)
		--n
	)
	detachFacesAsClone()
)