いつもお世話になっております。
以前、”基準点から距離指定する度円作図マクロ”を作成して頂いたハセと申します。
ずっとこのマクロに助けて頂いたのですが、
先日、wlindows10にautocad2014を入れて作業しなくてはならなくなり、マクロを登録してみたところ、
正常に動かなくなってしまいました。
元々サポートされていないversionなので、動作しなくても仕方の無い事なのですが、
最低限のマクロを使用出来ないだろうかと思い、こちらの掲示板にまたお邪魔させて頂きました。
試してみたところ、簡単なマクロは動作が可能なようなので、
基準点から距離指定する数値だけのマクロを作成する事は可能でしょうか?
(添付データの、〇は無しの数値だけ作成されるようなマクロ)
方向指示も無しで、右側に作成する用、左側に作成する用(プラス数値入力でマイナスが付かないように出来ますか?)、上側に作成する用、下用に作成する用(+数値入力でマイナスが付かないように出来ますか?)、と
方向別のマクロだと助かります。
せっかく作って頂いたマクロに、このようなお願いをしてしまい申し訳ありません。
お返事を頂けると助かります。
宜しくお願い致します。
以前作成したマクロ
*^C^C$M=setenv;to;0;$(nth,$(getenv,to),xline;$(if,$(=,$(getenv,sw),0),v,h);^x^x基準点と方向を指定--方向切換(Rc)--^x\$M="""$(if,$(getvar,cmdactive),;erase;l;;setenv;c1;円の半径記入^x\;to;2,setenv;to;1)""",,,,)$(nth,$(getenv,to),,;sw;$(if,$(getenv,sw),0,1),;p0;$(getvar,lastpoint);;to;3,,)$(nth,$(getenv,to),,,,;to;0;;m1;基準位置からの距離指定^x\ucs;o;non;$(getenv,p0);circle;non;$M="""$(getenv,m1)"""<$(if,$(getenv,sw),E,N);$(getenv,c1);setenv;to;4,;to;3;-text;non;@$(getenv,c1)","$(getenv,c1);;0;$(getenv,m1);ucs;p)^M
マクロ修正のお願い