3DCG LABO

House generator
House painter
Bonus Tools の　Paint Geometry Tool を使った町並みの景観を作るチュートリアルです。
でもまぁGoogleEarthがあれば（ｒｙ

モデルパネルを表示するMEL。
string $window = `window`;
paneLayout;
modelPanel;
showWindow $window;
フローティングのモデルパネルが開きます。
今まで知らなかった。。。
勿体ない使い方をしていました。


試しにいくつ表示できるのかやってみました。
。。。27枚。。。まだまだいけそうですが、もう飽きました。

オプションを増やしました。
OrientJointに合わせた形となっています。
MM_mirrorPose.mel

Xスケールに-1をかけた行列をオイラー角に戻すと 0 0 -180 で返されます。
先日見つけた公式がそう返しおるんですが、
なるほどと。
スプーンに映る自分の顔。。。みたいな感じでしょうか？
なんでやねーんっ！と突っ込みを入れたくなりますが、
天地逆になってしまうのをなんとか補正をつけないといけないなぁと思います。
//テストMEL　locator1のスケールを-1にセットしてこのMELを実行します。
float $nx, $ny ,$nz;
float $ma[16];
$ma = `xform -q -m locator1`;
//変換公式
if(($ma[2] < 1.0) && (($ma[2] > -1.0))){
$ny = -asind($ma[2]);
$c = cosd($ny);
$nx = atan2d(($ma[6])/$c, $ma[10]/$c);
$nz = atan2d($ma[1]/$c, $ma[0]/$c);
}
else {
$nx = atan2d(-$ma[9],$ma[5]);
$ny = -atan2d($ma[2],0.0);
$nz = 0.0;
}
print $nx;
print ” “;
print $ny;
print ” “;
print $nz;
print “\n”;

オイラー角をオイラー角で変換した後のオイラー角
の変換公式に誤り（というか不具合）がありました。
こちらの方がより正常に動作すると思います。
//変換公式
if(($ma[2] < 1.0) && (($ma[2] > -1.0))){
$ny = -asind($ma[2]);
$c = cosd($ny);
$nx = atan2d($ma[6]/$c, $ma[10]/$c);
$nz = atan2d($ma[1]/$c, $ma[0]/$c);
}
else {
$nx = atan2d(-$ma[9],$ma[5]);
$ny = -atan2d($ma[2],0.0);
$nz = 0.0;
}
記事の方も訂正をしています。
参考にされていた方には誤った情報を流してしまいまして
誠に申し訳ございませんでした。

意地でもラジアンを使わない根性で編み出した小技。
if($nx > 90) {
$nx = $nx – 180;
}
else if($nx < -90) {
$nx = $nx + 180;
}
if($ny > 90) {
$nx = -$nx;
$ny = $ny – 180;
}
else if($ny < -90) {
$nx = -$nx;
$ny = $ny + 180;
}
if($nz > 90) {
$nx = -$nx;
$ny = -$ny;
$nz = $nz – 180;
}
else if($nz < -90) {
$nx = -$nx;
$ny = -$ny;
$nz = $nz + 180;
}
数値を入れるとこんな感じでMayaが動作するのを見て
真似て作りました。
コードに入れ込んでみたらあんまり役に立たなかった。
ちっ！
これだと半分だけなので残り半分をカバーできるように改良せねばなりません。

asind（）を使っておりますと、ときーどき
// Error: line ***: Invalid argument(s) for asind.
のエラーを返します。
debug用にprintをかまして数値を読んでも　1　のはずなのに、
しかもif文を前にかましているのに。。。if（$hoge < 1.0）　＝（等号）付けてないのに。。。
そんな時のTips、
asind(`min 1.0 $hoge`);
これで通りました。えぇ
1.0000024
とか値が入ってるんでしょうか。
厳格なMayaさん。
つーか、その前のif文通すなっつーの。

なんとなく回転行列の使い方がわかり始めた今日この頃
4×4の行列変換が結構便利だということがわかりました。
しかし、理屈はわからないまま答えがポンと出てくるので、とても気持ち悪いです。
//ポイントと角度とスケールからマトリックスを生成
proc float[] _makeMatrix(float $point[], float $theta[], float $scale[]) {
float $ma[16];
float $px = $point[0];
float $py = $point[1];
float $pz = $point[2];
float $rx = $theta[0];
float $ry = $theta[1];
float $rz = $theta[2];
float $sx = $scale[0];
float $sy = $scale[1];
float $sz = $scale[2];
$ma[0] = $sx * cosd($ry)*cosd($rz);
$ma[1] = $sx * cosd($ry)*sind($rz);
$ma[2] = $sx * -sind($ry);
$ma[3] = 0;
$ma[4] = $sy * (sind($rx)*sind($ry)*cosd($rz) – cosd($rx)*sind($rz));
$ma[5] = $sy * (sind($rx)*sind($ry)*sind($rz) + cosd($rx)*cosd($rz));
$ma[6] = $sy * sind($rx)*cosd($ry);
$ma[7] = 0;
$ma[8] = $sz * (cosd($rx)*sind($ry)*cosd($rz) + sind($rx)*sind($rz));
$ma[9] = $sz * (cosd($rx)*sind($ry)*sind($rz) – sind($rx)*cosd($rz));
$ma[10] = $sz * cosd($rx)*cosd($ry);
$ma[11] = 0;
$ma[12] = $px;
$ma[13] = $py;
$ma[14] = $pz;
$ma[15] = 1;
return $ma;
}
//_makeMatrix({1.0, 2.0, 3.0}, {30.0, 60.0, 45.0}, {-1.0, 1.0, 1.0});
matrix関連のノードを見かけるので、APIには実装しているはずなんですが、
MELコマンドがないですねぇ。MELではやらんだろうということなのかな？

MELには実装されてないのでしょうか？
libを書くのが面倒です。
//逆matrix
proc float[] _reMatrix(float $ma[])
{
float $am[16];
//マトリックスの掛け算
$am[0] = $ma[0];
$am[1] = $ma[4];
$am[2] = $ma[8];
$am[3] = $ma[12];
$am[4] = $ma[1];
$am[5] = $ma[5];
$am[6] = $ma[9];
$am[7] = $ma[13];
$am[8] = $ma[2];
$am[9] = $ma[6];
$am[10] = $ma[10];
$am[11] = $ma[14];
$am[12] = $ma[3];
$am[13] = $ma[7];
$am[14] = $ma[11];
$am[15] = $ma[15];
return $am;
}
//座標変換
proc float[] _matrixRotate(float $pi[], float $sita[])
{
float $nx, $ny ,$nz;
float $me[16];
string $lo[] = `spaceLocator -p 0 0 0`;
rotate -r -os $pi[0] $pi[1] $pi[2];
$ma = `xform -q -m $lo`;
string $lo2[] = `spaceLocator -p 0 0 0`;
rotate -r -os $sita[0] $sita[1] $sita[2];
$mb = `xform -q -m $lo2`;
select -r $lo;
delete;
select -r $lo2;
delete;
$me = _matrixTimes($ma, $mb);
//変換公式
if(($ma[2] < 1.0) && (($ma[2] > -1.0))){
$ny = -asind($ma[2]);
$c = cosd($ny);
$nx = atan2d($ma[6]/$c, $ma[10]/$c);
$nz = atan2d($ma[1]/$c, $ma[0]/$c);
}
else {
$nx = atan2d(-$ma[9],$ma[5]);
$ny = -atan2d($ma[2],0.0);
$nz = 0.0;
}
※訂正　2006　11/18　変換公式を訂正しました。
return {$nx, $ny, $nz};
}
//逆変換
proc float[] _matrixReRotate(float $pi[], float $sita[])
{
float $nx, $ny ,$nz;
float $me[16];
string $lo[] = `spaceLocator -p 0 0 0`;
rotate -r -os $pi[0] $pi[1] $pi[2];
$ma = `xform -q -m $lo`;
string $lo2[] = `spaceLocator -p 0 0 0`;
rotate -r -os $sita[0] $sita[1] $sita[2];
$mb = `xform -q -m $lo2`;
select -r $lo;
delete;
select -r $lo2;
delete;
$mb = _reMatrix($mb);
$me = _matrixTimes($ma, $mb);
//変換公式
if(($ma[2] < 1.0) && (($ma[2] > -1.0))){
$ny = -asind($ma[2]);
$c = cosd($ny);
$nx = atan2d($ma[6]/$c, $ma[10]/$c);
$nz = atan2d($ma[1]/$c, $ma[0]/$c);
}
else {
$nx = atan2d(-$ma[9],$ma[5]);
$ny = -atan2d($ma[2],0.0);
$nz = 0.0;
}
※訂正　2006　11/18　変換公式を訂正しました。
return {$nx, $ny, $nz};
}
matrixを取るのにいちいちロケイターを作ってるのがカッコ悪いんですが。。。
数値から生成してくれないものか知らん？

proc float[] _matrixTimes(float $pi[], float $sita[])
{
float $nx, $ny ,$nz;
string $lo[] = `spaceLocator -p 0 0 0`;
rotate -r -os $pi[0] $pi[1] $pi[2];
$ma = `xform -q -m $lo`;
string $lo2[] = `spaceLocator -p 0 0 0`;
rotate -r -os $sita[0] $sita[1] $sita[2];
$mb = `xform -q -m $lo2`;
select -r $lo;
delete;
select -r $lo2;
delete;
//マトリックスの掛け算
float $xx = $ma[0]*$mb[0] + $ma[1]*$mb[4] + $ma[2]*$mb[8] + $ma[3]*$mb[12];
float $xy = $ma[0]*$mb[1] + $ma[1]*$mb[5] + $ma[2]*$mb[9] + $ma[3]*$mb[13];
float $xz = $ma[0]*$mb[2] + $ma[1]*$mb[6] + $ma[2]*$mb[10] + $ma[3]*$mb[14];
float $xw = $ma[0]*$mb[3] + $ma[1]*$mb[7] + $ma[2]*$mb[11] + $ma[3]*$mb[15];
float $yx = $ma[4]*$mb[0] + $ma[5]*$mb[4] + $ma[6]*$mb[8] + $ma[7]*$mb[12];
float $yy = $ma[4]*$mb[1] + $ma[5]*$mb[5] + $ma[6]*$mb[9] + $ma[7]*$mb[13];
float $yz = $ma[4]*$mb[2] + $ma[5]*$mb[6] + $ma[6]*$mb[10] + $ma[7]*$mb[14];
float $yw = $ma[4]*$mb[3] + $ma[5]*$mb[7] + $ma[6]*$mb[11] + $ma[7]*$mb[15];
float $zx = $ma[8]*$mb[0] + $ma[9]*$mb[4] + $ma[10]*$mb[8] + $ma[11]*$mb[12];
float $zy = $ma[8]*$mb[1] + $ma[9]*$mb[5] + $ma[10]*$mb[9] + $ma[11]*$mb[13];
float $zz = $ma[8]*$mb[2] + $ma[9]*$mb[6] + $ma[10]*$mb[10] + $ma[11]*$mb[14];
float $zw = $ma[8]*$mb[3] + $ma[9]*$mb[7] + $ma[10]*$mb[11] + $ma[11]*$mb[15];
float $wx = $ma[12]*$mb[0] + $ma[13]*$mb[4] + $ma[14]*$mb[8] + $ma[15]*$mb[12];
float $wy = $ma[12]*$mb[1] + $ma[13]*$mb[5] + $ma[14]*$mb[9] + $ma[15]*$mb[13];
float $wz = $ma[12]*$mb[2] + $ma[13]*$mb[6] + $ma[14]*$mb[10] + $ma[15]*$mb[14];
float $ww = $ma[12]*$mb[3] + $ma[13]*$mb[7] + $ma[14]*$mb[11] + $ma[15]*$mb[15];
//変換公式
if(($ma[2] < 1.0) && (($ma[2] > -1.0))){
$ny = -asind($ma[2]);
$c = cosd($ny);
$nx = atan2d($ma[6]/$c, $ma[10]/$c);
$nz = atan2d($ma[1]/$c, $ma[0]/$c);
}
else {
$nx = atan2d(-$ma[9],$ma[5]);
$ny = -atan2d($ma[2],0.0);
$nz = 0.0;
}
※訂正　2006　11/18　変換公式を訂正しました。
return {$nx, $ny, $nz};
}
お試しコマンド
オイラー｛0.0, 30.0, 0.0｝を{30.0, 0.0, 0.0}回転させた時
_matrixTimes({0.0, 30.0, 0.0}, {30.0, 0.0, 0.0});
// Result: 33.690068 25.658906 16.102114 //
cheers!

getAttr locator1.translate;
// Result: 4.549147 81.970932 -2.348332 //
xform -q -os -t locator1;
// Result: 70.437177 -40.261024 -12.770951 //
位置情報を取りたい時、上のように記述すると、
getAttr と　xform　で違う値を返すことがあります。
※正しい値は　getAttr　の方です。
これは一体どういうことなんでしょうか？
謎です。全然わからない。
何かクリアしなければならないものがあるんでしょうか？
今まで　xform　を多用してたのですが、
この所為で、うまく動かなかった。。。
なんでかなぁ？
とりあえず、今後は　getAttr　を使うことにします。
参ったっす。Mayaさん。。。