AutoCADマクロ屋本舗 掲示板

寸法値を添付画像のように下部に移動した上で180度回転するマクロというのは作れるものなのでしょうか。

dimlinearだけではなく、dimalignedにも対応していて、異尺度にも対応しているとありがたいです。

よろしくお願い致します。

こんな感じでどうですか？

*^C^Cjoin;変更する寸法を選択(元に戻す場合は右クリック)：^X\$M=$(if,$(getvar,cmdactive),;setenv;sw1;0,join;元に戻す寸法を選択：^X\;setenv;sw1;1);dimoverride;dimtad;$M="$(if,$(getenv,SW1),1,4)";dimtxtdirection;$M="$(if,$(getenv,SW1),0,1)";;@;^M

前にも同じ事した気もしますが
複数選択もできそうですが、自分には思いつきませんでした

元に戻す場合は右クリックしてから選択してください

複数選択を考えてみました。

*^C^C$M=setenv;to;0;$(if,$(=,$(getenv,to),0),;to;1;;sw;0;move;LC(反転)/RC(元に戻す)^X\@;l;;;;setenv;sw;1)$(if,$(=,$(getenv,to),1),select;寸法を選択^X\dimoverride;dimtad;$(if,$(getenv,sw),4,1);dimtxtdirection;$(if,$(getenv,sw),1,0);;p;;^Cid;)^M

手順
1．コマンド発行
2．(反転)か(元に戻す)を選択
3．寸法を選択(複数可)

ちょっとアップデート

*^C^C$M=setenv;to;0;$(if,$(=,$(getenv,to),0),;to;1;;sw;0;move;反転する寸法を選択/RC(元に戻す)^X\non;@;l;;non;@;non;@0<0;setenv;sw;1)$(if,$(=,$(getenv,to),1),^Cselect;$(if,$(getenv,sw),non;@;,元に戻す寸法を選択^X)\dimoverride;dimtad;$(if,$(getenv,sw),4,1);dimtxtdirection;$(if,$(getenv,sw),1,0);;p;)^M

手順、変転する場合
1．コマンド発行
2．寸法選択

手順、元に戻す場合
1．コマンド発行
2．右クリック
3．寸法選択

反転する場合のクリック数を一つ減らしました。

それは些末なことで、CrateVeiwportsのところでerase;all;;で後のコマンドが
キャンセルされる場合があることにヒントを得て、nth構文とselect系コマンド
を使えばcmdactiveを使わなくても分岐が出来ることに気づきました。

さすがです
自分のも窓選択はできるけど連続選択(って言うのかわからないけど)
１つずつ複数選択できないんですよね

zukki-様のほうが使い勝手が良いです。

ありがとうございます！

完璧に動作しました。

お二方ともありがとうございます。