macroScript pb_GotoFaceCenter category:"Piranha-Bytes" buttonText:"GotoFaceCenter" toolTip:"Set Viewport to center of selected Faces"
(	
	obj = (getCurrentSelection())[1]
	if obj != undefined do
	(
		faces = (polyop.getFaceSelection obj) as array
		midPoint = 0
		for f=1 to faces.count do
		(
			c = polyop.getFaceCenter obj faces[f]
			midPoint = midPoint + c
		)
		midPoint = midPoint / faces.count
		cam = freecamera pos:midpoint
		cam.name = "Temp_Camera"
		cam.fov = 140
		viewport.setCamera cam
		forceCompleteRedraw()
		viewport.setType #view_persp_user
		delete cam
	)
)