--simple script for copying morph targets from one mesh to another. Make sure all morph channels are set to zero before you start.

rollout myroll2 "Copy Morph" width:200 height:230;
( 
	fn pick_morph obj = 
		(
		if obj.modifiers[#Morpher] != undefined then return true
		else return false
		)
	

	


group "Select meshes"
		(
		pickbutton picksource "pick source mesh" filter:pick_morph
		pickbutton picktarget "pick target mesh" filter:pick_morph
					
		)
		
		
		group "Copy Morph Targets"
		(
		button copy "copy morphs" enabled:off
	 					
		)
	
	
	
on picksource picked obj do
	(    global sourcemesh = obj
		--spltmorph.enabled = on
		picksource.text = obj.name
		
	)
	
on picktarget picked obj do
	(    global targetmesh = obj
		--spltmorph.enabled = on
		picktarget.text = obj.name
		copy.enabled = on
	)

on copy pressed do (

for i = 1 to 100 do (
	
	copyname=WM3_MC_GetName sourcemesh.morpher i
	
	if copyname != "- empty -" then (
sourcemesh.morpher[i].value = 100
		
		
WM3_MC_BuildFromNode targetmesh.morpher i sourcemesh
	

WM3_MC_SetName targetmesh.morpher i copyname

sourcemesh.morpher[i].value = 0
	)
)
WM3_RefreshChannelListUI targetmesh.morpher
)

)
createDialog myroll2 220 250-- set as a dialogue instead of a rollout