ｵﾌﾞｼﾞｪｸﾄ角度 0° [2007.7.4修正]
| *^C^C$M=setenv;to;0;$(nth,$(getenv,to),^Pcopy^P;^X角度の基となるｵﾌﾞｼﾞｪｸﾄを選択^X\non;@;;non;@;non;@;erase;p;;id;nea;@;setenv;p1;$M="""$(getvar,lastpoint)^H^H""";id;\setenv;to;1,;p0;$(getvar,lastpoint)^H^H;id;non;@$(*,$(getvar,dimscale),10)","0;setenv;to;2,,,)$(nth,$(getenv,to),,,dist;non;@;non;$(getenv,p0);arc;non;@;c;non;$(getenv,p0);non;$(getenv,p1);setenv;to;3,,)$(nth,$(getenv,to),,,,pedit;L;;;area;o;L;erase;L;;setenv;ro;$M="""$(/,$(*,$(getvar,perimeter),180),$(*,$(getvar,distance),3.14159265))""";;to;4,select;$(getenv,p1);\rotate;p;;non;$(getenv,p0);-$(getenv,ro))^M |
LT2000/LT2004 R2005 動作確認済
●使い方
１．角度の基となるｵﾌﾞｼﾞｪｸﾄを選択
２．基点を指定
３．角度を０にする、その他のオブジェクトを選択
４．オブジェクト角度０°
▲注意
１．マクロが長い為、メニューファイルに直接コピペして下さい。
■コメント
回転してあるオブジェクトを
角度０°に戻すのって、結構面倒じゃない？
そんな時、これだと簡単に!!(ﾟ∀ﾟ)
･･･って･･･
使う時無いかもだけど･･･(^^;
角度取得マクロ例として、参照までに♪
上記のマクロは、"マクロで角度を取得"する事に重点を置いたマクロです。
その為、精度的には１００％角度０になるわけではありません。
以下のマクロは、参照角度を使用して、角度を０にするマクロです。
通常は以下を使った方が良いと思われます。
ｵﾌﾞｼﾞｪｸﾄ角度0°(参照角度版) [2007.7.6追加]
| *^C^C$M=setenv;to;0;$(nth,$(getenv,to),^Pmove^P;^X角度の基となるオブジェクトを選択^X\non;@;;non;@;non;@;setenv;p1;$M="""$(getvar,lastpoint)""";id;\setenv;to;1,;p0;$(getvar,lastpoint);id;non;@100<0;setenv;to;2,)$(nth,$(getenv,to),,,select;p;\zoom;e;rotate;p;;non;$(getenv,p0);r;non;@;nea;$(getenv,p1);0;zoom;p)^M |
LT2000/LT2004 R2005 動作確認済
DVDで学ぶAutoCAD LT［2005～2011］ (エクスナレッジムック DVDだから絶.../芳賀 由合
￥2,940
Amazon.co.jp