jamesjlinden
5/7/2016 - 4:53 AM

Delete junk in character

Delete junk in character

proc deljunk(string $rootJointName, string $characterName)
{
    select $rootJointName;
    select -hi; 
    $SHJoints = `ls -sl -type "joint"`;
    string $each;
    for ($each in $SHJoints)
    {
        delete -constraints $each;
    }

    select $rootJointName;
    parent -w;
    select -hi RRM_MAIN;
    $rig = `ls -sl`;
    lockNode -lock off $rig;
    delete $characterName;
    select `ls -typ joint`;
    select -tgl `ls -typ mesh`;
    InvertSelection;
    doDelete;
} 

deljunk("*SH_ROOTJ", "apparatus");