121.修正マクロ | AutoCADマクロ屋本舗
[121]
修正マクロ [2007/8/29 UP]
*^C^C$M=setenv;to;0;$(nth,$(getenv,to),;sw;0;;to;1,;ed;$(nth,$(getenv,sw),MOVE,COPY,ERASE,ROTATE,MIRROR,SCALE);;to;2,,,,)$(nth,$(getenv,to),,,offset;;^X^X【$(getenv,ed)】--オブジェクトを選択:[切替(Rc)]--^X\$M="""$(if,$(getvar,cmdactive),;setenv;to;4,setenv;to;3)""",,)$(nth,$(getenv,to),,,,;sw;$(if,$(=,$(getenv,sw),5),0,$(+,$(getenv,sw),1));;to;1,)$(nth,$(getenv,to),,,,,select;non;@;\setenv;to;2;$(getenv,ed);p;)^M


LT2004 R2005動作確認済

●使い方
1.オブジェクトを選択
  ※初期状態は"MOVE(移動)"コマンド
   右クリックする毎に「MOVE⇒COPY⇒ERASE⇒ROTATE⇒MIRROR⇒SCALE」切替
  (その後の動作は、選択したコマンドの通常動作となります)

▲注意
特に無し。

■コメント
なんとなく作ってみたが・・・
ここまでする必要があるかどうかは微妙・・・(汗


描きたい操作がすぐわかる! AutoCAD LT 操作ハンドブック 2009/2008/200.../鈴木 孝子

¥2,499
Amazon.co.jp