MEL ９０度横に倒れた円柱方向のマッピング（面選択）

selectMode -component; selectType -cv 1 -vertex 0 -subdivMeshPoint 1 -latticePoint 1 -particle 1 -editPoint 0 -curveParameterPoint 0 -surfaceParameterPoint 0 -puv 0 -polymeshEdge 0 -subdivMeshEdge 0 -isoparm 0 -surfaceEdge 0 -surfaceFace 1 -springComponent 0 -facet 1 -subdivMeshFace 1 -hull 0 -rotatePivot 0 -scalePivot 0 -jointPivot 0 -selectHandle 0 -localRotationAxis 0 -imagePlane 0;
string $num = `ls -sl -fl`;
ConvertSelectionToVertices;

newCluster " -envelope 1";
string $cen = `ls -sl`;
vector $pos = `xform -q -ws -rp`;

select -cl ;
select -r $cen[0];
doDelete;

selectMode -component; selectType -cv 1 -vertex 0 -subdivMeshPoint 1 -latticePoint 1 -particle 1 -editPoint 0 -curveParameterPoint 0 -surfaceParameterPoint 0 -puv 0 -polymeshEdge 0 -subdivMeshEdge 0 -isoparm 0 -surfaceEdge 0 -surfaceFace 1 -springComponent 0 -facet 1 -subdivMeshFace 1 -hull 0 -rotatePivot 0 -scalePivot 0 -jointPivot 0 -selectHandle 0 -localRotationAxis 0 -imagePlane 0;

select -r $num;
rotate -a -p ($pos.x) ($pos.y) ($pos.z) -os 0 0 90 ;

polyProjection -ch 1 -type Cylindrical -ibd on -sf on ;
float $high= `getAttr ".projectionHeight"`;

string $cy[] = `ls -type polyCylProj`;
select -cl ;
select $num;
rotate -a -p ($pos.x) ($pos.y) ($pos.z) -os 0 0 -90;

int $sizeCy1=`size $cy`;
print $cy[$sizeCy1-1];
select $cy[$sizeCy1-1];
doDelete;

select -cl ;
select $num;

polyProjection -ch 1 -type Cylindrical -ibd on -sf on ;
setAttr ".projectionHeight" $high;
setAttr ".rotateZ" -90;
ShowManipulators;