rename "p1";

string $objs[] = `ls -sl -tr`;

for($obj in $objs)

{

       duplicate -rr $obj;

       select $obj;

       FreezeTransformations;

       string $theNode[] = `ls -sl -tr`;

       int $testCount[] = `polyEvaluate -f $theNode`;

       select -r ($theNode[0] + ".f[0:" + $testCount[0] + "]") ;

       float $piv[] = `xform -q -worldSpace -piv $theNode`;

       scale -r -p $piv[0] $piv[1] $piv[2] -1 1 1;

       FreezeTransformations;

       ReversePolygonNormals;

}

select -r p1 p2 ;
select -r p1 p2 ;
polyPerformAction polyUnite o 0;

polyPerformAction "polyMergeVertex -d 0.001" v 0;

polySoftEdge -a 180;

delete -ch;

rename "nameMe";

toggleSelMode;
changeSelectMode -object;

DeleteHistory;

string $selected[] = `ls -sl -tr`;

 

for($obj in $selected)

{

            string $getAttr[] = `listAttr -l $obj`;

            

            for($chan in $getAttr)

            {

                        setAttr -lock false ($obj + "." + $chan);

            }

}