AutoCADマクロ屋本舗 掲示板

autocad2012⇒2016にバージョンアップすると、二点間半円連続作図が動かなくなりました。

*^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

[lengthen]で停止するのですが、どうすればよいですか？

2016から、lengthenコマンドが仕様変更となりました。

lengthen;l;; ⇒ lengthen;l;;;

にしてみて下さい。

lengthenの仕様変更の影響ですね。

lengthen;l;;
上記を
lengthen;l;dy;;
にすると多分動くはず。