[152]
円 円周記入
| *^C^C$M=setenv;to;0;$(nth,$(getenv,to),offset;;\;select;non;@;non;@;;copy;p;;non;@;non;@;erase;p;;area;o;l;setenv;a1;$M="""$(getvar,perimeter)""";;to;1;line;nea;@;cen;@;;lengthen;l;,,)$(nth,$(getenv,to),,;to;2;erase;l;;ucs;ob;l;dimangular;;non;0<0;nea;0",-$(getvar,perimeter);nea;0,-$(getvar,perimeter);t;$(rtos,$(getenv,a1),2,2);0,"-$(getvar,perimeter),)$(nth,$(getenv,to),,,aidimtextmove;0;l;;0","$(+,$(getvar,perimeter),$(*,$(getvar,dimscale),10));ucs;p)^M |
2004/2010/2013 動作確認済
●使い方
１．円オブジェクト選択 ⇒ 繰返し
▲注意
１．円以外のオブジェクトを選択しないで下さい。
■更新履歴
・2017.8.25 UP
基礎からしっかり身に付く AutoCAD LT入門 2018/2017/2016/2015/2.../芳賀 百合
￥価格不明
Amazon.co.jp