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

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

面取り寸法
AutoCAD 2014

何処から、流用させていただいたか分からなくなってしまいましたが、以前から以下の面取り寸法マクロを使っています。
簡潔で大変便利なんですが、C面より両サイドが短いとうまく機能しない、欠点が有ります。
例えば、rectang 0,0 100,100
chamfer d 60 60
の様な場合は、うまく書けません。
改善する方法はないでしょうか?

*^C^C_Setenv;数量;\_Explode;MID;\^C_Ucs;OB;MID;@;;O;MID;@;;Z;$M=$(IF,$(<,0,$(INDEX,0,$(GETVAR,UCSYDIR))),90,270);_Lengthen;NON;@;;_Ortho;ON;_LEADER;NON;@;NON;\;$(if,$(>,$(getenv,数量),0),$(getenv,数量)-,)C"$M=$(rtos,$(/,$(getvar,PERIMETER),1.41421356))";;_Orthomode;$(getvar,Orthomode);Ucs;P;;P;;P;_Autosnap;$(getvar,Autosnap);^M;
  • Kazz
  • MAIL
  • 2021/08/25 (Wed) 23:01:41
Re: 面取り寸法
>うまく書けません
どう書けないのでしょうか

下記に書かれているように

【 新規投稿時のお願い 】
3.バージョン違いによるマクロの動作不良の場合は、キーボードF2を押し、表示されたテキストウィンドウ内の
  マクロ開始~終了までのマクロの流れをコピーし、貼り付けてご質問下さい。

マクロ開始~終了までのマクロの流れを見たら何かわかるかもしれません
また、マクロは止まらないが描かれた寸法がおかしいのであれば
画像の添付などしていただければさらに答えやすくなると思います

ちなみに
バージョン違いで

_Lengthen;NON;@;;を_Lengthen;NON;@;dy;;に変更して試しましたが問題なかったようです

LT2022で確認

あと、マクロの最後間違いではないですけど

× _Autosnap;$(getvar,Autosnap);^M; ←_Autosnapを繰り返しているだけ
〇 _Autosnap;$(getvar,Autosnap)^M

だと思います
  • chibi-tom
  • 2021/08/26 (Thu) 11:21:42
Re: 面取り寸法
可能性として

角付近を選択するとズームの状態や図面の複雑に混み合っている場合に
両サイドの短い線の中点を選択してしまうことがあるかもしれないですが

右の場合に寸法は描けませんでした
  • chibi-tom
  • 2021/08/27 (Fri) 17:04:00
Re: 面取り寸法
これはたぶんUCSSELECTMODEが関係してると思います。
UCSSELECTMODEが1だとucsを移動するときに左隅のUCSの座標を持ってきているようです。
UCSSELECTMODEを0にするとKazzさんのマクロは意図通りに動きました。

あと_Explode;MID;\^Cの^Cはなかなか考えられていると思うけど、$M=$(if,$(cmdactive),;)の方が*^C^Cが生きると思います。
  • zukki-
  • 2021/08/27 (Fri) 21:50:35

返信フォーム






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