(
	
local cloneArray = #()

fn addPosRotconstraint object=
(	
	cloneMsh = snapshot object
	cloneMsh.name = "Dummy" + object.name
	cloneMsh.parent = undefined
	--cloneMsh.boneEnable = true
	
	posCtrl = Position_Constraint()
	posConstraintInterface = posCtrl.constraints
	cloneMsh.pos.controller = posCtrl
	posConstraintInterface.appendTarget object 50.0

	rotCtrl = Orientation_Constraint()
	rotConstraintInterface = rotCtrl.constraints
	cloneMsh.rotation.controller = rotCtrl
	rotConstraintInterface.appendTarget object 50.0
	
	cloneMsh.material = undefined
	cloneMsh.wirecolor = color 255 0 0
	
	addModifier cloneMsh (push())
	cloneMsh.modifiers [#push].Push_Value = -1.0
	
	collapseStack cloneMsh
		
	join cloneArray cloneMsh
)

for object in selection do addPosRotconstraint object
	
if cloneArray.count != 0 do(
	p1 = point()
	p1.name = "root"
	cloneArray.parent = p1
)

completeRedraw()

)