Mirror point groups wrangle

   2879   1   2
User Avatar
Member
402 posts
Joined: June 2014
Offline
Hi all,

wasn't sure where to put this, but thought somebody out there might find it useful. Mirroring groups is something that's cropped up more and more recently, so I made a wrangle for it

I pinched Tomas' code for getting point group names from here [forums.odforce.net]

string ptgrps[] = detailintrinsic(0, "pointgroups");
string ptingrps[] = {};
foreach(string grp;ptgrps)
{
    if (inpointgroup(0, grp, @ptnum)){
        if(grp[0] != "_")
            append(ptingrps, grp);
    }
}
string from_prefix = chs("old_prefix");
string to_prefix = chs("to_prefix");
vector target = @P * {-1, 1, 1};
int t_point =  nearpoint(0, target);
foreach(string name; ptingrps){
    
    string new_name = to_prefix + lstrip(name, from_prefix);
    
    setpointgroup(0, new_name, t_point, 1);
}
Henry Dean
User Avatar
Member
81 posts
Joined: Feb. 2014
Offline
As always to the rescue…
Thanks, Henry!
  • Quick Links