AutoCADマクロ屋本舗 掲示板

お世話になります。
今朝はありがとうございました。

*^C^Cpline;\\;area;o;l;ucs;ob;l;erase;l;;id;non;$M=$(/,$(getvar,perimeter),2),0;ucs;p;-insert;crscen;non;@;\0;explode;l;change;p;;p;LA;$(getvar,CLAYER);S;$(*,$(getvar,dimscale),0.2);;erase;L;^M

ですと、十字に中心線が作図されますが、
これを対角に×で作図するマクロは
どうしたらいいのでしょうか。

こんにちは。

私の使ってるマクロで良ければ、どーぞ使って下さい。
^C^Cucs;m;\line;non;0,0;non;1,1;;select;l;;line;non;1,0;non;0,1;;$M=expert;4;-block;PEKE;non;0,0;l;p;;expert;$(getvar,expert);ucs;p;-insert;PEKE;r;0;non;@;\explode;l;-purge;b;PEKE;n^M

Lon様
こんにちは。

ありがとうございます^^
とっても使いやすいですね。
こちらの中心線をredのcenterに指定することはできますか？

最後にredのcenterを付け足しました。

^C^Cucs;m;\line;non;0,0;non;1,1;;select;l;;line;non;1,0;non;0,1;;$M=expert;4;-block;PEKE;non;0,0;l;p;;expert;$(getvar,expert);ucs;p;-insert;PEKE;r;0;non;@;\explode;l;chprop;p;;c;red;lt;center;;-purge;b;PEKE;n^M

注意事項
このマクロは「PEKE」という名前のブロックを作成しています。

もし、図面内に「PEKE」という名前のブロックが既に存在してるばあい、強制的にそのブロックの中身が書き換えられます。
従って、図面内に「PEKE」という名前のブロックが存在している図面では使用しないで下さい。

または、マクロ内の「PEKE」を、絶対に名前の被らない物に書換えて使って下さい。
例えば
^C^Cucs;m;\line;non;0,0;non;1,1;;select;l;;line;non;1,0;non;0,1;;$M=expert;4;-block;AHOAHO_LonLon;non;0,0;l;p;;expert;$(getvar,expert);ucs;p;-insert;AHOAHO_LonLon;r;0;non;@;\explode;l;chprop;p;;c;red;lt;center;;-purge;b;AHOAHO_LonLon;n^M

Lon様
ありがとうございます^^

作図がスムーズにできるようになりました。
また、お世話になるときがあるかもしれませんが、
その時は是非、宜しくお願いします。