TextPlus: How to label an Object using its Object name

[Anonymous]

Is it possible to label an Object with its Object Name using TextPlus?

I have watched the TextPlus Set Value as Text tutorial but this only enables values from a reference Object, not its Name

I have ~200 objects to label in my scene, it would be much quicker if there is a method to support this, rather than having to type out the individual object names 200 times

thanks

[Alfred.DeFlaminis]

Hello @Anonymous and welcome to the community,

Since this thread didn't get a reply and I'm not really great at scripting I am going to move this thread to the programming forum in the hopes that you get a reply there.  Thank you.

Best Regards,

[Anonymous]

no worries @Alfred.DeFlaminis, cheers

[drew.avis · Accepted solution]

Hi, here's a short script that applies a textplus label to every non-textplus object in a scene.  You can use it as a starting point for what you're trying to do.

-- label everything in the scene w/ a textplus

fn label_it obj = (

	str = obj.name

	t = TextPlus size:10
	t.SetFont "Arial" 0
	t.ResetStyle()
	t.ResetString()
	t.AppendString str
	t.pos = obj.pos
	bb = nodeLocalBoundingBox obj
	t.pos.z = bb[2].z
)

allObjects = $*
for obj in allObjects do (
	
	print obj.name
	-- don't label textplus objects, that would be silly
	if (classOf obj != TextPlus) do (
		label_it obj
	)
)

[Alfred.DeFlaminis]

Nice one Drew, I tested it and it's great!  Does that help @Anonymous?

If you feel that this solves the issue for you @Anonymous, please mark Drew's post as the solution.  Thanks!  

Best Regards,

[Anonymous]

cheers thanks @drew.avis exactly what I was after!

[Anonymous]

thanks @Alfred.DeFlaminis for progressing this, as always you rock 

[Anonymous]

nice @drew.avis, if you don't mind, I think this is useful (just 1 bold line added)

-- label everything in the scene w/ a textplus

fn label_it obj = (

	str = obj.name

	t = TextPlus size:10
	t.SetFont "Arial" 0
	t.ResetStyle()
	t.ResetString()
	t.AppendString str
	t.pos = obj.pos
	bb = nodeLocalBoundingBox obj
	t.pos.z = bb[2].z
	t.parent = obj   -- link label to object
)

allObjects = $*
for obj in allObjects do (
	
	print obj.name
	-- don't label textplus objects, that would be silly
	if (classOf obj != TextPlus) do (
		label_it obj
	)
)

just so if you move the objects around, the labels go with them...

[drew.avis]

@Anonymous, good addition - you could also put the labels on their own layer to easily show/hide.  Lots of potential for fun with this one.

[Alfred.DeFlaminis]

Happy to do whatever I can @Anonymous.  Thanks for the kind words.   Good idea here @Anonymous and thank you very much @drew.avis for your awesome code.  

I made a small addition as well, adding a tiny bit of extrude to the lettering so when zoomed out the faces don't overlap.  (Default setting of textplus.)

-- label everything in the scene w/ a textplus

fn label_it obj = (

	str = obj.name

	t = TextPlus size:10
	t.SetFont "Arial" 0
	t.ResetStyle()
	t.ResetString()
	t.AppendString str
	t.pos = obj.pos
	bb = nodeLocalBoundingBox obj
	t.pos.z = bb[2].z
	t.parent = obj   -- link label to object
        t.extrudeamount = 0.025
)

allObjects = $*
for obj in allObjects do (
	
	print obj.name
	-- don't label textplus objects, that would be silly
	if (classOf obj != TextPlus) do (
		label_it obj
	)
)

Best Regards,