Memindah Objek/Entity ke Layer Tertentu

Seringkali dalam menggambar kita lupa menge-set layer dulu, sehingga manajemen layer menjadi berantakan.
Berikut lisp untuk memindah objek/entity ke layer tertentu. Defaultnya adalah layer "0". Untuk mengubah nama layer yang diinginkan gunakan perintah "setnm". Perintah untuk memindah layer adalah "mtl". Selamat mencoba....

(setq nm_lyr "0")

(defun c:setnm()
(setq nm_lyr (getstring "Masukkan variabel nm_lyr yang baru = ")) (princ))

(defun c:mtl        () (command ".chprop" (ssget) "" "LA" nm_lyr "" )(princ))

Mengecek Jenis Variabel

Fungsi untuk mengecek jenis atau tipe variabel menggunakan fungsi "type". Sintaknya :

 (type item)

Nilai baliknya bisa berupa : ENAME, EXRXSUBR, FILE, INT, LIST, PAGETB, PICKSET, REAL, SAFEARRAY, STR, SUBR, SYM, VARIANT, USUBR, VLA-object