fn GetSelectionCenter =
(
	local sel = getCurrentSelection()
	local sum = [0,0,0]
	for o in sel do sum += o.center
	sum / sel.count
)

p = point()
p.transform = transMatrix (GetSelectionCenter())