二点間半円連続作図 [2007/9/10 UP]
| *^C^C$M=setenv;to;0;$(nth,$(getenv,to),;bk1;分割数記入^X\;to;1,ray;［分割数変更(Rc)］^X\$M="""$(if,$(getvar,cmdactive),;setenv;to;2,id;)""",,)$(nth,$(getenv,to),,,line;non;@;\;lengthen;l;;ucs;ob;l;erase;l;;setenv;r1;$M="""$(/,$(getvar,perimeter),$(getenv,bk1))""";;to;3,arc;non;0<0;e;non;$(getenv,r1)<0;d;$(getenv,r1)<90;-array;l;;r;1;$(getenv,bk1);$(getenv,r1);ucs;p;setenv;to;1)^M |
LT2004 R2005 動作確認済
●使い方
１．分割数を記入
２．１点目を指定
３．２点目を指定 ～繰返し２へ～
※ここで、右クリック［分割数変更(Rc)］で、１へ
▲注意
特に無し
■コメント
Kju Factory様の旧サポート掲示板のスレッドにて
【連続した半円って描けますか？】と言う質問があったので、作ってみた。
徹底解説AutoCAD LT 2012 (エクスナレッジムック)/エクスナレッジ
￥3,990
Amazon.co.jp