Selasa, 25 Maret 2014

Membersihkan objek tak terpakai



Untuk mengurangi ukuran file bisa dengan cara membuang objek-objek tak terlihat yang sudah tidak terpakai bisa menggunakan perintah “purge”. Sayangnya di bricscad perintah ini harus diulang beberapa kali sampai benar-benar bersih. Padahal untuk satu purge saja harus sekurang-kurangnya terdiri dari 3 langkah , ini standarnya :




Untuk mempersingkat, berikut rutin lisp yang saya buat :

(defun c:ppa() (repeat 5 (command "purge" "a" "*" "n")) (princ))

Idenya adalah melakukan “purge” sebanyak 5 kali. Tentu saja jika 5 terlalu banyak (sedikit????) tinggal diganti sesuai selera saja.....

Tidak ada komentar:

Posting Komentar