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

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

四角形の分割
よろしくお願いします。オートキャド2024を使用しています。
線分またはポリラインで書いた四角形があります。その内側をクリックし、X=3,Y=5
ていう風に指定して、四角形を分割することは可能でしょうか。分割と同時にその分割線も入れられたらと思っています。どなたかお知恵を拝借できればと思います。よろしくお願いいたします。
  • といそ
  • 2024/04/02 (Tue) 20:24:11
Re: 四角形の分割
もう少し詳しい説明をお願いします。

X=3,Y=5と入力したらどうなるのですか?3x5=15個の四角形になるという事?

「分割と同時にその分割線も入れられたら」とはどういう事でしょう?
「分割」と「分割線を入れる」は別の事なのでしょうか。

処理前、処理後のサンプルの画像を添付してくれると判りやすいです。
  • もも
  • 2024/04/03 (Wed) 08:22:56
Re: 四角形の分割
もも様 ありがとうございます。

つたない説明で申し訳ございません。

今ある四角形を任意の数で分割できれば という思いなのです。

図を添付いたします。 よろしくお願いいたします。
  • といそ
  • 2024/04/03 (Wed) 09:07:43
Re: 四角形の分割
https://totthi.bbs.fc2.com/?act=reply&tid=16844823#24679320
こちらに紹介されているマクロを使用すると、お望みの事は出来ると思いますが、
X方向とY方向の2回マクロを実行する必要が有ります。

ご要望は、矩形の内部を1クリックで行いたい様ですが、それは必須でしょうか?

  • もも
  • 2024/04/03 (Wed) 11:11:54
Re: 四角形の分割
もも様 ありがとうございます。ご紹介いただいたページは見ましたが、1クリックでなりはしないかと思った次第です。
もしご教授願えれば大変ありがたいです。よろしくお願いいたします。
  • といそ
  • 2024/04/03 (Wed) 12:27:41
Re: 四角形の分割
作ってみました

*^C^C$M=setenv;to;0;$(nth,$(getenv,to),;BRX;X=^X\;BRY;Y=^X\id;内側の点を指定^X\setenv;to;1,,,,,,,)$(nth,$(getenv,to),,;p0;$(index,0,$(getvar,LASTPOINT))","$(index,1,$(getvar,LASTPOINT));setenv;to;2,,,,,,)$(nth,$(getenv,to),,,-boundary;A;O;P;;$(getenv,p0);;explode;l;erase;l;;;l;;ucs;ob;l;lengthen;l;dy;;setenv;to;3,,,,,)$(nth,$(getenv,to),,,,;BRYL;$(/,$(getvar,perimeter),$(getenv,BRY));blockcreatemode;2;-block;BRX;non;0<0;l;;blockcreatemode;$M=$(getvar,BLOCKCREATEMODE);lengthen;l;dy;;setenv;to;4,,,,)$(nth,$(getenv,to),,,,,;BRXL;$(/,$(getvar,perimeter),$(getenv,BRX));blockcreatemode;2;-block;BRY;non;0<0;l;;blockcreatemode;$M=$(getvar,BLOCKCREATEMODE);setenv;to;5,,,)$(nth,$(getenv,to),,,,,,-insert;BRX;non;0<0;1;1;0;explode;l;copy;l;;non;0<0;a;$(getenv,BRX);non;$(getenv,BRXL)<N;erase;p;;setenv;to;6,,)$(nth,$(getenv,to),,,,,,,-insert;BRY;non;0<0;1;1;0;explode;l;copy;l;;non;0<0;a;$(getenv,BRY);non;$(getenv,BRYL)<E;erase;p;;ucs;p;setenv;to;7,)$(nth,$(getenv,to),,,,,,,,-purge;b;BRX;N;;b;BRY;N;setenv;to;0)^M

使用方法

1.マクロ起動
2.X分割数入力
3.Y分割数入力
4.内側の点を指定

以上です

なおR版のようなのでこちらの対応を済ませておいてください
https://ameblo.jp/totthi-macro/entry-10895232361.html
  • chibi-tom
  • 2024/04/04 (Thu) 11:46:54
Re: 四角形の分割
chibi-tom様

ありがとうございます。

希望の動作を確認いたしました。

すごいです。

本当にありがとうございます。
  • といそ
  • 2024/04/04 (Thu) 15:05:16

返信フォーム






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