MorphTransfer

global MorphTools
(
	if MorphTools != undefined do ( closerolloutfloater MorphTools )
	MorphTools = newrolloutfloater "MorphTransfer" 190 200

-------------------------------------------------------------------------------
--FacialTools
-------------------------------------------------------------------------------
	rollout FacialTools "Facial Tools"
	(
		group "Morph Transfer"
		(
			button selectOriginal "Load Original head"
			button selectTransfer "Load Target Head"
			button bakeTransfer "Bake Out Transfer"
			checkbox addSuffix "Add obj name suffix"
			checkbox moveAside "Translate right 20 units"
			checkbox combineResult "Combine result"
		)

--Morph Transfer
-----------------
		on selectOriginal pressed do
		(
			try
			(
				testMorph = $.morpher
			)
			catch
			(
				messageBox "Object has no Morpher modifier"
				return undefined
			)
			global originalHead = $
			selectOriginal.text = $.name
		)

		on selectTransfer pressed do
		(
			try
			(
				testMorph = $.morpher
			)
			catch
			(
				messageBox "Object has no Morpher modifier"
				return undefined
			)
			if $selection.count > 0 then
			(
				global transferHead = $
				selectTransfer.text = $.name
			)
			else
				messageBox "Select Node before." title:"Error"
		)

		on bakeTransfer pressed do
		(
			if originalHead == undefined then
			(
				messagebox "No Original Head Loaded"
				return undefined
			)

			if $selection.count > 0 then
			(
				moveVal = 0
				for i = 1 to 1000 do
				(
					testName = originalHead.morpher[i].name
					if testName == "- empty -" then
					(
						exit loop
					)
					originalHead.morpher[i].value = 100.0
					morph_name = filterString (originalHead.morpher[i].name) " "
					new = morph_name[2]
					if addSuffix.checked == true then
					(
						snapshot transferHead name:(new + "_" + transferHead.name) isSelected:true
					)
					else
					(
						snapshot transferHead name:new isSelected:true
					)
					if moveAside.checked == true then
					(
						moveVal += 20
						$.position.x = moveVal
					)
					if combineResult.checked == true then
					(
						WM3_MC_BuildFromNode transferHead.morpher i $
						delete $
					)
					originalHead.morpher[i].value = 0.0
				)
			)
			else
				messageBox "Select Node before." title:"Error"
		)
	)

	addRollout FacialTools MorphTools
)