【AutoLISP コマンド操作】画層を作るコマンド

画層を作るAutoLISPコマンドを作成します。

通常、画層は画層管理パレットを利用して管理しますが、AutoLISPでも画層を作ったり設定を変更したりできます。

予備知識

【AutoLISP コマンド操作】関数 command-s　(command-s "._コマンド" ……）

AutoLISPで、普段使うAutoCADのコマンドを操作するための、基本ルールを説明します。関数 command-s　と　commandAutoLISPで、従来のAutoCADのコマンドを使いたいときは、関数 command-s を使いま...

jagaimolisp.com

2020.03.26

コマンドの内容

コマンドLAYER[画層管理]は画層パレットを出すコマンドですが、実はもう一つ、先頭に-（ハイフン）がついた、-LAYER[画層管理] というコマンドがあります。

このハイフンがついた-LAYER[画層管理] では、パレットは出てこなくて、コマンドラインを使って画層を作成したり画層プロパティを変更します。

オプションは、[現在の層の新規作成(M)]　[現在の層の変更(S)]　[新規作成(N)]　[名前変更(R)]　[表示(ON)]　[非表示(OF)]　[色設定(C)]　[線種設定(L)]　[[印刷(P)]　[フリーズ(F)]　[フリーズ(F)]などなど、画層管理パレットで設定できることがコマンドラインでも設定できます。
詳しくはヘルプページで確認するか、コマンド実行時に出てくるプロンプト（AutoCADがユーザーに選択などを促すメッセージ）で確認してください。

AutoLISPで操作するときは、どちらのコマンドを使ってもパレットは出てきません。
-LAYER[画層管理]と同じ要領でオプションを使ってで画層管理します。

今回は、
名前 “Jaga-No_Plot” 、線種 “CONTINUOUS” 色 171、印刷 しない
という画層を作成するコマンドを作ります。

AutoLISP プログラム

(defun c:MkLy ()

 (command-s "._LAYER" 
            "N" "Jaga-No_Plot" ;[新規作成(N)] 
            "L" "CONTINUOUS" "Jaga-No_Plot" ; [線種設定(L)] CONTINUOUS
            "C" "171" "Jaga-No_Plot" ; [色設定(C)] 171
            "P" "N" "Jaga-No_Plot" ; [印刷(P)]　No Plot
            "") ;スペースキー（エンター）で終了

(princ));defun

AutoLISP の解説

コマンド名はMkLyです。

AutoLISP関数command-s で、AutoCADコマンド　-LAYER[画層管理]を実行します。
AutoLISPで実行するときは、Layerでも-Layer でも、どちらでも画層管理パレットが出てくること無く、同じように動作します。

オプションで[新規作成(N)]を選び、名前を”Jaga-No_Plot”。
[線種設定(L)] を選び、線種名”CONTINUOUS”を入れて、画層名”Jaga-No_Plot”。
同じように、[色設定(C)] 171、[印刷(P)]を続けて設定していきます。

””スペースキー（エンター）を押すまでは、次々にオプションを入れて、1回のコマンド実行で、続けていろんなプロパティを設定することができます。

Jagaimo

各オプション、何をどういう順番で入れたらいいのかわからないときは、まず、-LAYERを実行してみて、プロンプトを見ながら画層を作成してみよう。

その後、履歴を見ながらプログラムを作るとといいよ。

カスタマイズ例

すでに同じ名前の画層があるとき、色や線種が上書きされてしまうので、if と　tblsearchを使って、もし、”Jaga-No_Plot”が無ければ作成する。という形にできます。

【AutoLISP DXF情報】画層情報を得る　関数 tblsearch

entgetでは、図形が持つDXF情報を得ることができました。tblsearch では、文字、寸法、線種、画層などのDXF情報を得ることができます。今回はtblsearch で得た画層情報についてです。関数 tblsearch関数 tbls...

jagaimolisp.com

2020.05.02

画層を作ることが頻繁にある場合は、自作関数にすると便利です。”画層が無ければ画層を作る”記事はこちら。

【AutoLISP 自作関数】画層を作成する自作関数 - 複数の引数がついた関数

画層を作成する自作関数を作ります。コマンド作成時に、必要な画層が無い時に画層を作る。というプログラムを組み込みたいときに使えます。予備知識関数の内容引数として、画層名、線種、色、印刷設定　を渡すと、画層を作成する関数を作ります。AutoLI...

jagaimolisp.com

2020.05.03

まとめ

• 画層管理をするには、パレットだけではなく、コマンドラインで設定できる”-LAYER”コマンドがある。
• AutoLISPで画層管理するときは、このｰLAYERコマンドの要領で作る。
• AutoLISPでコマンド実行するときは、パレットを出すLAYERでも、-LAYERでも同じ動作になる。

【AutoLISP Lesson 基礎編】 コマンド操作　記事一覧　

Jagaimo普段から使っているAutoCAD既存のコマンド操作をAutoLISPにしただけの比較的簡単な自作コマンドを作る方法です。普段AutoCADで作業をする際に使うコマンド。そのコマンドとコマンドオプションを組み合わせて、AutoL...

jagaimolisp.com

2020.03.26