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

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

円中心線自動作図
初めまして。
ひそかにいつもお世話になっております。
マクロを最近勉強中です。
早速で申し訳ありませんが、
円のφを指定して、そこから自動で中心線を引くという流れの
マクロを作成していただけないでしょうか...
更に、中心線の線種はcenter、色はredというのは可能でしょうか。
宜しくお願い致します
  • ぱんだ
  • 2018/05/24 (Thu) 11:50:19
Re: 円中心線自動作図
AutoCAD2015 R版使用です。
  • ぱんだ
  • 2018/05/24 (Thu) 11:51:39
Re: 円中心線自動作図
上記「ワード検索」で探してみました。

http://totthi.bbs.fc2.com/?act=reply&tid=15707195

http://totthi.bbs.fc2.com/?act=reply&tid=16302418

この辺でしょうか。
  • とってぃ
  • 2018/05/24 (Thu) 13:10:07
Re: 円中心線自動作図
ついでに、上記リンク先のマクロを元に記事にしました。
お試しを。

153.円中心線自動作図
https://ameblo.jp/totthi-macro/entry-12378342232.html
  • とってぃ
  • 2018/05/24 (Thu) 13:40:26
Re: 円中心線自動作図
早速のご回答ありがとうございます!
153番のマクロに更に
円を描くところから始めることはできますか?
  • ぱんだ
  • 2018/05/24 (Thu) 13:58:26
Re: 円中心線自動作図
こんな感じでしょうか。

♪中心線付円作図
*^C^C$M=setenv;to;0;$(nth,$(getenv,to),;c1;円の直径記入^x\;to;1,;to;0;ray;^x^x円の中心点指定--直径指定(Rc)--^x\$M="""$(if,$(getvar,cmdactive),;circle;non;@;d;$(getenv,c1);setenv;l1;$(/,$(getenv,c1),2);;to;2,id;)""",)$(nth,$(getenv,to),,,;to;1;ucs;o;$(getvar,lastpoint);line;non;-$(*,$(getenv,l1),1.3)<0;non;$(*,$(getenv,l1),1.3)<0;;chprop;l;;LT;CENTER;C;1;;copy;l;;non;@;non;@;rotate;l;;0<0;90;ucs;p)^M


●使い方
1.円の直径記入
2.円の中心点指定 ⇒ 繰返し2
  ※右クリックで1へ



  • とってぃ
  • 2018/05/24 (Thu) 14:30:26
Re: 円中心線自動作図
返信ありがとうございます!

早速試してみましたところ、
思い描いていた通りになりました☆
作業効率もあがるので
とても助かります。
ありがとうございました。
  • ぱんだ
  • 2018/05/24 (Thu) 14:43:05

返信フォーム






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