27.四角形作図 | AutoCADマクロ屋本舗
[27]
四角形作図(右クリック中心指定) [2007.8.7修正]
*^C^C$M=setenv;to;0;$(nth,$(getenv,to),ray;[サイズ指定四角形(Rc)]^X\$M="""$(if,$(getvar,cmdactive),;setenv;to;1,setenv;to;2)""",,,,)$(nth,$(getenv,to),,rectang;non;@,id;non;$(getvar,viewctr);setenv;y1;横^X\;t1;$M="""$(getenv,y1)""";;t1;縦^X\setenv;to;3,,)$(nth,$(getenv,to),,,,rectang;non;@;non;@"$(getenv,y1),$(getenv,t1)";setenv;to;4,copybase;non;@"-$(/,$(getenv,y1),2),-$(/,$(getenv,t1),2)";L;;erase;p;;pasteclip;\rotate;L;;non;@)^M


LT2000/LT2004 R2005/R2006 動作確認済

●使い方
通常時
1.1点目を指定(右クリックで中心指定四角形作図へ)
2.2点目指定
~ 繰返し ~

中心指定四角形作図(通常時1から右クリックで移行)
1.中心指定
2.横長さ記入
3.縦長さ記入(正方形の場合Enter)
4.回転指定

~ 通常時1へ ~

▲注意
特に無し

■コメント
マクロの長さを短くし、ダイアログに直接張り付け可能にしました。

by totthi

基礎から学ぶAutoCAD 2005 実践編 (ヒューマンアカデミーProfessional養.../ヒューマンアカデミー

¥3,675
Amazon.co.jp



↓↓↓旧バージョン↓↓↓

四角形作図(右クリック中心指定)
*^C^C$M=setenv;to;0;$(nth,$(getenv,to),ray;^X四角形作図:または[中心指定四角形(右クリック)]^X\$M="""$(if,$(getvar,cmdactive),;setenv;to;1,setenv;to;2)""",,,,)$(nth,$(getenv,to),,rectang;non;@;\setenv;to;0,,,)$(nth,$(getenv,to),,,id;non;$(getvar,viewctr);setenv;横;\;縦;$M="""$(getenv,横)""";;縦;\setenv;to;3,,)$(nth,$(getenv,to),,,,rectang;non;@;non;@"$(getenv,横),$(getenv,縦)";setenv;to;4,)$(nth,$(getenv,to),,,,,copybase;non;@"-$(/,$(getenv,横),2),-$(/,$(getenv,縦),2)";L;;erase;p;;pasteclip;\rotate;L;;non;@;\setenv;to;0)^M


LT2000 動作確認済

●使い方
通常時
1.1点目を指定(右クリックで中心指定四角形作図へ)
2.2点目指定
~ 繰返し ~

中心指定四角形作図(通常時1から右クリックで移行)
1.中心指定
2.横長さ記入
3.縦長さ記入(正方形の場合Enter)
4.回転指定

~ 通常時1へ ~

▲注意
マクロ長の為メニューファイルに直接コピペしてください。

■コメント
通常の四角形作図と中心指定四角形作図をくっ付けただけ。
けど、結構便利なマクロ。
以外と使用頻度高目!

by totthi

基礎から学ぶAutoCAD 2005 実践編 (ヒューマンアカデミーProfessional養.../ヒューマンアカデミー

¥3,675
Amazon.co.jp