7.角度寸法記入 | AutoCADマクロ屋本舗
[7]
角度寸法記入 [構築線完全対応版]
*^C^C$M=setenv;to;0;$(nth,$(getenv,to),offset;;【1つ目】^X\;select;@;;$M="""$(if,$(getvar,cmdactive),@;L;;id;,setenv;to;1)""",;p1;$(getvar,lastpoint)^H^H;;to;2,,,,)$(nth,$(getenv,to),,,offset;;【2つ目】^X\;select;@;;$M="""$(if,$(getvar,cmdactive),@;L;;setenv;to;2,setenv;to;3)""",;p2;$(getvar,lastpoint)^H^H;;to;4,,)$(nth,$(getenv,to),,,,,dimangular;;appint;$(getenv,p1);$(getenv,p2);nea;$(getenv,p1);nea;$(getenv,p2);$M="""$(if,$(getvar,cmdactive),^x\id;,erase;L;;setenv;to;5)""",)$(nth,$(getenv,to),,,,,,offset;;【交点付近を選択しない!やり直し!】^X\;select;@;;$M="""$(if,$(getvar,cmdactive),@;L;;id;,setenv;to;1)""")^M


LT2000 動作確認済

●使い方
1.通常の角度寸法記入と同じ。

▲注意
1.オブジェクト選択時、交点付近を選択しない!
  やり直し!になります(笑
2.選択したオブジェクトが何重か重なっている場合、正しく動作しない場合があります!
3.マクロが長い為貼り付け出来ない場合は、メニューファイルに直接貼り付けて下さい。

■コメント
旧バージョン(↓に記載)のマクロを
構築線に完全対応!

by totthi


これからはじめる AutoCADの本 [AutoCAD/AutoCADLT2006/2007/.../中平 美穂

¥2,499
Amazon.co.jp



【旧バージョン】

角度寸法記入 [構築線対応バージョン]
*^C^C$M=setenv;to;0;$(nth,$(getenv,to),offset;;^X角度寸法を記入するオブジェクトを選択:注)構築線は最初に選択!^X\;select;@;;$M="""$(if,$(getvar,cmdactive),@;L;;setenv;to;0,setenv;to;1)""",,,,,)$(nth,$(getenv,to),,setenv;p1;$(getvar,lastpoint)^H^H;;to;3;ucs;ob;@;setenv;to;2,,,,)$(nth,$(getenv,to),,,ucs;w;dimangular;@;\$M="""$(if,$(getvar,cmdactive),\,)"""setenv;to;0,,,)$(nth,$(getenv,to),,,,offset;;^Xオブジェクトの2点目を選択^X\;select;@;;$M="""$(if,$(getvar,cmdactive),@;L;;setenv;to;3,setenv;to;4)""",,)$(nth,$(getenv,to),,,,,setenv;p2;$(getvar,lastpoint)^H^H;;to;5,)$(nth,$(getenv,to),,,,,,dimangular;;int;$(getenv,p1);$(getenv,p2);nea;$(getenv,p1);nea;$(getenv,p2);\setenv;to;0)^M


LT2000 動作確認済

●使い方
1.通常の角度寸法記入と同じ。
  ただし!
  ↓

▲注意
構築線の角度を記入したい場合は、必ず構築線を最初に選択して下さい。
誤って、「オブジェクトの2点目を指定」時に、構築線を選択した場合は、
キャンセルもしくはやり直せば問題はありません。

■コメント
元々の角度寸法記入コマンドでは、構築線の角度は記入できない!
そこで!どぉにかできないかと思い、作ったマクロがこれ!
結構便利♪


by totthi


これからはじめる AutoCADの本 [AutoCAD/AutoCADLT2006/2007/.../中平 美穂

¥2,499
Amazon.co.jp