[141]
>円内均等分割線分作図 [2009/1/12 UP]
*^C^C$M=setenv;to;0;$(nth,$(getenv,to),;bs;分割数記入^X\;to;1,offset;;^X円を選択【分割数記入(R-Click)】^X\$M="""$(if,$(getvar,cmdactive),;setenv;to;1;select;non;@;non;@;;setenv;to;2,id;)""",,)$(nth,$(getenv,to),,,;to;3;line;nea;@;cen;@;;ucs;ob;l;copybase;non;0<0;l;;erase;p;;ucs;p;ucs;o;cen;$(getvar,lastpoint);pasteclip;non;0<0,;to;1;-array;l;;p;non;0<0;$(getenv,bs);360;y;ucs;p)^M |
LT2004 R2005/R2006 動作確認済
●使い方
1.分割数を記入
2.円を選択 → この時右クリックで1へ
3.円内を線分で分割 → 繰り返し2へ

▲注意
1.分割数に"2"以上を記入してください。
2.円以外を選択しないで下さい。
■コメント
当掲示板にて、作成依頼がありました。
自分の作業上では使用頻度はありませんが
業種によっては、使い道があるのかな?(^^;
世界一やさしい 超入門 DVDビデオでマスターする AutoCAD LT 2009/2008/.../ソーテック社

¥3,129
Amazon.co.jp