当掲示板は、AuroCADマクロ屋本舗 の掲示板です。
AutoCADのマクロ に関する質問の前に 【 マクロ使用前の注意事項 】 を、必ずお読みください。

尚、新規投稿フォーム下の【 新規投稿時のお願い 】を確認の上、新規投稿をお願い致します。
円弧寸法のマクロ
以前、DenさんのHP(http://www7b.biglobe.ne.jp/~den-eng/Free/ac/ac01.html#08)からコピペさせていただいたものです。
円弧だけでなく、円弧や直線が合わさったポリラインにも寸法が引き出せる
とても便利なマクロなのですが、LT2015くらいから作動しなくなってしまいました。
これをLT2017でも動くように修正は可能しょうか?
宜しくお願いします。

^C^C_arc;^X^X【起点指示】^X\nea;^X^X【中間点指示】^X\^X^X【終点指示】^X\_lengthen;l;;_move;l;;non;@;non;@;$M=_dimangular;@;t;$(rtos,$(/,$(getvar,perimeter),1),2,0);\_erase;p;;

以下、scriptです。
コマンド: _arc
円弧の始点を指定 または [中心(C)]: *削除*
*削除*
【起点指示】*削除*
【起点指示】
円弧の 2 点目を指定 または [中心(C)/終点(E)]: nea
どこに *削除*
*削除*
【中間点指示】*削除*
【中間点指示】
円弧の終点を指定: *削除*
*削除*
【終点指示】*削除*
【終点指示】
コマンド: _lengthen
計測するオブジェクトを選択 または [増減(DE)/比率(P)/全体(T)/ダイナミック(DY)] <全体(T)>: l
現在の長さ: 4712.3890、角度: 180
計測するオブジェクトを選択 または [増減(DE)/比率(P)/全体(T)/ダイナミック(DY)] <全体(T)>:
全体の長さを入力 または [角度(A)] <1.0000>: _move
距離を数値で入力してください, 2 点を指定 または オプションのキーワードを入力してください。
全体の長さを入力 または [角度(A)] <1.0000>:
変更するオブジェクトを選択 または [元に戻す(U)]: *キャンセル*

  • みかん
  • 2017/07/10 (Mon) 13:16:16
Re: 円弧寸法のマクロ
こんにちは。

http://ameblo.jp/totthi-macro/entry-12220279344.html

私もLT2017を使っていますが、こちらを参考にマクロを変更したら大丈夫でした。
  • Lon
  • 2017/07/10 (Mon) 13:39:12
Re: 円弧寸法のマクロ
Lonさん、できました!
アドバイスいただき、どうもありがとうございました!
  • みかん
  • 2017/07/12 (Wed) 11:14:32

返信フォーム






プレビュー (投稿前に内容を確認)