Well, I did try:
children=CountChildren(model)
For loop = 1 To children
child=GetChild (model,loop)
If EntityName$(child)="Head" Then EntityParent hair,Head
Next
However, it didn't work.
children=CountChildren(model)
For loop = 1 To children
child=GetChild (model,loop)
If EntityName$(child)="Head" Then EntityParent hair,Head
Next
However, it didn't work.