(
	distrobj = $[1]
	copyobj = $[2]
	smesh = snapshotasmesh distrobj

	for v in polyop.getVertSelection distrobj do
	(
		o = instance copyobj
		o.pos = polyop.getVert distrobj v
		tm = matrixfromnormal (getNormal smesh v)
		o.transform = tm * o.transform
	)
	delete smesh
)