エンター連続オフセット
*^C^C$m=setenv;to;0;$(nth,$(getenv,to),setenv;OFFSET;\;c1;$M="""$(getenv,OFFSET)""";select;si;\setenv;to;1,;to;0;setenv;p1;$(getvar,lastpoint);id;non;^Xオフセットする側の点を指定^X\setenv;p2;"""$m=$(getvar,lastpoint)""";;to;2,,)$(nth,$(getenv,to),,,;to;0;sortents;0;move;p;;@;@;offset;$(getenv,c1);$(getenv,p1);$(getenv,p2);;sortents;$(getvar,sortents);setenv;OFFSET;\;c1;"""$m=$(+,$(getenv,c1),$(getenv,OFFSET))""";;to;2)^M |
LT2000/LT2004 動作確認済
●使い方
1.OFFSET値記入
2.オフセットするオブジェクト選択
3.オフセットする方向指定
4.エンターまたは数値記入する度にオフセット
※常に、直前にオフセットされたオブジェクトからの、オフセットとなります。
▲注意
特に無し
■コメント
元ネタは自分じゃありませんが
修正して、LT2004確認済みです♪
(協力:ぱとれーぜさん)
by totthi
図面って、どない描くねん!―現場設計者が教えるはじめての機械製図/山田 学
¥2,310
Amazon.co.jp