この掲示板は AutoCADマクロ屋本舗 の掲示板です。

【 注意 】最初に必ず ↓↓ 下記内容 ↓↓ を参照ください。
① マクロが分からない方は、まず 【 マクロ講座 】 を参照ください。
② 質問の前に 【 マクロ使用前の注意事項 】 をお読みください。
③ 質問する時は、新規投稿フォーム下の【 新規投稿時のお願い 】を必ずお読みください。

マルチ引出線で角パイ表記
こんばんは。

以前お世話になり
たいへん感謝いたしております。
また一つお願いしたく、書き込みしました。

角パイプをマルチ引出線にて表記するのですが、
文字の前に□を簡単に表記できるようなマクロは作成できますでしょうか。
50x50の角パイですと、□50との表記です。
甘えてばかりですみません、
宜しくお願いします。

ACADは2016年レギュラー版です。
  • こまつ
  • 2019/02/08 (Fri) 17:41:15
Re: マルチ引出線で角パイ表記
マクロじゃないですが。
マルチテキストエディタを変更する。ってのはどうでしょう?

例えば、下記の物。
https://www.yu-soft.com/a-dime/
寸法特化なので、複数行のマルチテキストや書式指定しながらの編集には向かないですが、
そんなマルチテキストを使っていない図面編集には便利だと思います。

他にも探せば色々と有ると思います。(古い物でも大抵は動きます。)
マルチテキストエディタの変更に関しては下記が参考になるかな。
http://cad.main.jp/trouble/teditor.htm
  • Lon
  • 2019/02/09 (Sat) 10:26:38
Re: マルチ引出線で角パイ表記
単純に考えてみました。

♪マルチ引出線 □表記
*^C^C$M=setenv;to;0;$(nth,$(getenv,to),offset;;\;select;non;@;non;@;;copy;p;;non;@;non;@;erase;p;;setenv;p0;$M="""$(getvar,lastpoint)""";;to;1,)$(nth,$(getenv,to),,undo;be;explode;l;$M="""$(if,$(getvar,cmdactive),;,)"""lengthen;dy;;;l;;;undo;e;u;mleader;\non;@;□$(getvar,perimeter);non;$(getenv,p0))^M

●使い方
1.矩形の1辺を選択
2.文字の位置を指定で □寸法 表記 ⇒繰り返し1へ

▲注意
マクロが途中で止まる場合、上記マクロ内の
lengthen;dy;;;l;;;
この部分を
lengthen;dy;;;l;;
この様に変えてみて下さい。

  • とってぃ
  • 2019/02/09 (Sat) 11:08:25

返信フォーム






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