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))
Tidak ada komentar:
Posting Komentar