Di sini kita akan buat label koordinat X dan Y secara otomatis dengan menggunakan bantuan autolisp.
Jadi nanti nya Autolisp ini akan bekerja seperti dimension seperti pada umum nya hanya output yang di keluarkan berupa koordinat X dan Y seperti contoh gambar di bawah ini.Pertama tama silahkan anda copy paste script autolisp di bawah ini ke dalam notepad kemudian kalian save dengan nama Dimkoordinat.lsp
Jika sudah di save sekarang kita kembali ke autocad untuk memasukan autolisp tadi yang sudah di save.Berikut cara nya :
- Di menu Command silahkan ketik APPLOAD
- Kemudian pilih file Dimkoordinat.lsp yang sudah di save tadi.
Lalu Klik Load- kemudian pilih salah satu
- Always Load = Untuk selalu me Load Autolisp itu ketika membuka gambar.
- Load Once = Untuk meload sementara saja (anda harus me load ulang ketika gambar di close)
- jika sukses akan mucul tulisan Dimkoordinat.lsp seccesfully loaded
kemudian klik close
Selanjut nya adalah kita akan memberi label koordinat nya sesuai titik yang ingin di beri label.
- Di menu Command ketikan perintah nn
- Enter
- Di menu command akan muncul perintah insert point
- Lalu Klik titik yang ingin di beri label
- Di menu command akan muncul perintah Pick Point For Text
- Lalu klik di mana label nya ingin di munculkan.
- Selesai.
Berikut Video nya :
Note :
- Anda juga bisa meninggal kan jejak dengan berkomentar di kolom komentar di bawah.
- Terima kasih semoga bermanfaat :)
tidak bisa di copy bang...
BalasHapuskalau ndak bisa di copy di ketik, udah dikasi hati jangan minta jantung
Hapus(defun c:nn (/ pnt gx gy gz pntt)
BalasHapus(setvar "cmdecho" 0)
(setq pnt (getpoint "\nInsert Point: "))
(setq gx (car pnt))
(setq gy (cadr pnt))
(setq gz (caddr pnt))
(setq pntt (getpoint "\nPick point for text: "))
(command "dim" "leader" pnt pntt "" (strcat "X =" " "(rtos gx 2 3) " Y =" " "(rtos gy 2 3)) "exit")
(princ)
)