間隔指定 ｵﾌﾞｼﾞｪｸﾄ平行構築線
| *^C^C$M=setenv;to;0;$(nth,$(getenv,to),-layer;n;XLine;P;N;XLine;;setenv;kk;^X間隔の値を記入<$(getenv,kk)>：^X\;to;1,,)$(nth,$(getenv,to),,offset;;\;select;@;;$M="""$(if,$(getvar,cmdactive),@;L;;setenv;to;1,ucs;3;nea;@;mid+endp+cen;@;;;z;-90;setenv;to;2)""",)$(nth,$(getenv,to),,,Xline;V;nea;@;;Change;L;;p;LA;XLine;C;5;;move;L;;@;non;@"$(/,$(getenv,kk),2),0";Xline;V;non;@-"$(/,$(getenv,kk),2),0";;Change;L;;p;LA;XLine;C;5;;move;L;;@;non;@"-$(/,$(getenv,kk),2),0";ucs;P;;P)^M |
LT2000 動作確認済
●使い方
１．間隔を数値で指定
２．オブジェクトを選択
３．選択したオブジェクトに対して平行に、指定した間隔÷２で、
構築線を作成
▲注意
１．画層XLine（印刷不可）を自動で作成
２．構築線の色を青にしています
３．たまにピックミスがありますが、キャンセルすれば問題ありません
■コメント
あるオブジェクトを中心として、間隔指定して描きたい時
例）
１３７÷２＝６８．５
でオフセットしますが、このマクロだと
１３７と記入するだけで、簡単に作成できます！
旧バージョン
| *^C^C$M=setenv;to;0;$(nth,$(getenv,to),-layer;n;XLine;P;N;XLine;;osnapcoord;2;setenv;kk;^X間隔の値を記入<$(getenv,kk)>：^X\;to;1,,)$(nth,$(getenv,to),,snapmode;0;offset;;\;snapmode;$(getvar,snapmode);select;@;;$M="""$(if,$(getvar,cmdactive),@;L;;setenv;to;1,ucs;3;non;@;per;@;;setenv;to;2)""",)$(nth,$(getenv,to),,,Xline;V;@;;Change;L;;p;LA;XLine;C;5;;move;L;;@;non;@"$(/,$(getenv,kk),2),0";Xline;V;non;@-"$(/,$(getenv,kk),2),0";;Change;L;;p;LA;XLine;C;5;;move;L;;@;non;@"-$(/,$(getenv,kk),2),0";ucs;P)^M |
LT2000 動作確認済
by totthi
DVDで学ぶAutoCAD LT［2005～2011］ (エクスナレッジムック DVDだから絶.../芳賀 由合
￥2,940
Amazon.co.jp