MacroScript LinkAlign category:"Piranha-Bytes" tooltip:"LinkAlign" buttonText:"LinkAlign" 
(
	a = (getCurrentSelection())[1]
	if a != undefined then
	(
		b = pickObject prompt:"Select Target"
		if ((a != undefined) and (b != undefined) and (a != b)) then
		(
			a.transform = b.transform
			a.parent = b
		)
	)
	else messageBox "No object selected!!" title:"Warning!"
)