Kredka Strikes Back "Controllers"

One last question regarding this function I hope.
Due to I must use it to find and replace specific kind of controllers on selected objects - notetracks and retimers most likely, I noticed that function replaceController work for all kind of controllers except this two. Irony. I already asked about it but without replacing this two, whole effort It's no use. Is it way to make this function work also on retimers and notetracks. I already played with your code but now idea why this two don't work on retimers and notetracks.

Great thanks to You milion times.

It work, You right, I test it again and it work great. Thank You very much.
For the very first time I called function in wrong way. My bad.

Is is possible to use your function to select two or more controllers at once like:
controllerObj trackClass:linear_float,float_limit,...etc mode:#selection
If it's complex then let's skip this one.

This is free question.
I use this code to find and replace also retimers and notertacks but it seams there is no results for only this particular controllers, for rest work fine. Are notertrack and retimers need to be treat in some special way to fount it and remove.

Now U can assigne multiple controller classes as array in "trackClasses" argument

fn controllerObj trackClasses: mode: = if trackClasses.count != 0 do
(
	local arr = #()
	case mode of
	(
		#selection:
		(
			if selection.count != 0 do
			(	
				for s in selection do
				(
					for c in trackClasses where  (getClassInstances c target:s).count != 0 do (append arr s ; exit)
				)
			)
		)
		#objects:
		(
			local ctrlsArr = #()
			for c in trackClasses where (ctrls = getClassInstances c).count != 0 do join ctrlsArr ctrls
			if ctrlsArr.count != 0 do
			(
				local temp = #()
				for c in ctrlsArr do
				(
					for n in (refs.dependentNodes c) do appendIfUnique temp n.name
				)
				if temp.count != 0 do for s in temp do append arr (getNodeByName s)
				free temp ; free ctrlsArr
			)
		)
	) ; arr
)

Example:

(controllerObj trackClasses:#(linear_float, float_list, scale_list) mode:#selection)

after selecting all objects script should select only box001,box002,box003 which posses linear_float controllers also this controllers should be replaced

scene is in max2010

Code works as expected. Run line by line. You don't have to select anything
only if you use "mode" argument as #selection

arr = controllerObj trackClass:linear_float mode:#objects
-- print to see result
print arr
-- now replace linear_float with bezier_float
replaceController arr whichCtrl:linear_float withCtrl:bezier_float

In the motion panel you can see that $Box003 and the other nodes fro arr not have any more linear float controller

Great thanks for this but my understanding of function is so poor.

I hope I did in right way, please correct me if not, just for test, I created box with some linear_float controller on position and rotation, select objects with those controllers launch function and arry was empty:

fn controllerObj trackClass: mode: =
(
local arr = #()
case mode of
(
#selection:
(
if selection.count != 0 do
(
for s in selection where (getClassInstances trackClass target:s).count != 0 do append arr s
)
)
#objects:
(
if (ctrls = getClassInstances trackClass).count != 0 do
(
local temp = #()
for c in ctrls do
(
for n in (refs.dependentNodes c) do appendIfUnique temp n.name
)
if temp.count != 0 do for s in temp do append arr (getNodeByName s)
)
)
) ; arr
)

controllerObj trackClass:linear_float mode:#selection

linearfloatobjects=arr as string
messagebox linearfloatobjects

also tried replacecontroller function, but I'm sure i'm calling it in incorrect way because selected objects controllers linear_float was still not replaced:

fn replaceController nodes whichCtrl: withCtrl: = if nodes.count != 0 do
(
for o in nodes where (ctrls = getClassInstances whichCtrl target :o).count != 0 do
(
for c in ctrls do
(
execute ((exprForMAXObject c)+" = createInstance "+ withCtrl as string)
)
)
)

replaceController whichCtrl:linear_float

Can You tell me what I'm doing wrong here?

can you post a test scene

Great thanks for this but my understanding of function is so poor.

I hope I did in right way, please correct me if not, just for test, I created box with some linear_float controller on position and rotation, select objects with those controllers launch function and arry was empty:

< ss >
fn controllerObj trackClass: mode: =
(
local arr = #()
case mode of
(
#selection:
(
if selection.count != 0 do
(
for s in selection where (getClassInstances trackClass target:s).count != 0 do append arr s
)
)
#objects:
(
if (ctrls = getClassInstances trackClass).count != 0 do
(
local temp = #()
for c in ctrls do
(
for n in (refs.dependentNodes c) do appendIfUnique temp n.name
)
if temp.count != 0 do for s in temp do append arr (getNodeByName s)
)
)
) ; arr
)

controllerObj trackClass:linear_float mode:#selection

linearfloatobjects=arr as string
messagebox linearfloatobjects

also tried replacecontroller function, but I'm sure i'm calling it in incorrect way because selected objects controllers linear_float was still not replaced:


fn replaceController nodes whichCtrl: withCtrl: = if nodes.count != 0 do
(
for o in nodes where (ctrls = getClassInstances whichCtrl target :o).count != 0 do
(
for c in ctrls do
(
execute ((exprForMAXObject c)+" = createInstance "+ withCtrl as string)
)
)
)

replaceController whichCtrl:linear_float

Can You tell me what I'm doing wrong here?

Great thanks for this but my understanding of function is so poor.

I hope I did in right way, please correct me if not, just for test, I created box with some linear_float controller on position and rotation, select objects with those controllers launch function and arry was empty:

fn controllerObj trackClass: mode: =
(
local arr = #()
case mode of
(
#selection:
(
if selection.count != 0 do
(
for s in selection where (getClassInstances trackClass target:s).count != 0 do append arr s
)
)
#objects:
(
if (ctrls = getClassInstances trackClass).count != 0 do
(
local temp = #()
for c in ctrls do
(
for n in (refs.dependentNodes c) do appendIfUnique temp n.name
)
if temp.count != 0 do for s in temp do append arr (getNodeByName s)
)
)
) ; arr
)

controllerObj trackClass:linear_float mode:#selection

linearfloatobjects=arr as string
messagebox linearfloatobjects

also tried replacecontroller function, but I'm sure i'm calling it in incorrect way because selected objects controllers linear_float was still not replaced:

fn replaceController nodes whichCtrl: withCtrl: = if nodes.count != 0 do
(
for o in nodes where (ctrls = getClassInstances whichCtrl target :o).count != 0 do
(
for c in ctrls do
(
execute ((exprForMAXObject c)+" = createInstance "+ withCtrl as string)
)
)
)

replaceController whichCtrl:linear_float

Can You tell me what I'm doing wrong here?

More information about formatting options

yes, but I need two actions:
one) check which objects in selection contain those controllers
two) remove those controllers from selected objects

I would be very thankful for help.

If you want to collect all abject by specified controller class then use this fn

-- "trackClass" argument is the class of controller that you searching for
-- "mode" argument can be #objects or #selection
fn controllerObj trackClass: mode: = 
(
	local arr = #()
	case mode of
	(
		#selection: 
		(
			if selection.count != 0 do
			(	
				for s in selection where (getClassInstances trackClass target:s).count != 0 do append arr s
			)
		)
		#objects:
		(
			if (ctrls = getClassInstances trackClass).count != 0 do
			(
				local temp = #()
				for c in ctrls do
				(
					for n in (refs.dependentNodes c) do appendIfUnique temp n.name
				)
				if temp.count != 0 do for s in temp do append arr (getNodeByName s)
			)
		)
	) ; arr
)

exampe:
Let's say that you want to collect all object that have assigned "Linear Float" controller. For this it's not important to select any node

controllerObj trackClass:linear_float mode:#objects

But if you want to work ei. look through objects in selections then chose other mode like this

controllerObj trackClass:linear_float mode:#selection

Now U need to know that U can't delete some controlles of nodes but just resete or replace.
This is the fn for that

fn replaceController nodes whichCtrl: withCtrl: = if nodes.count != 0 do
(
	for o in nodes where (ctrls = getClassInstances whichCtrl target:o).count != 0 do
	(
		for c in ctrls do
		(
			execute ((exprForMAXObject c)+" = createInstance "+ withCtrl as string)
		)
	)
)

example:
Let's say we have a box object and "linear float" controlle assigned in "RotationY" track. By default this track is "bezier_float"

obj = Box isSelected:on
rotY_controller = obj[3][2][2].track
rotY_controller = linear_float()
-- now I want to reset this to deafult
-- It's important to add controller class in arguments "whichCtrl" and "withCtrl"
replaceController selection whichCtrl:linear_float withCtrl:bezier_float

Also be careful which controller replace with.

Do U want remove all controlles by specified class from the selection?