AutoLISP

AutoLISP merupakan bahasa pemrograman AutoCAD untuk membuat perintah-perintah baru di AutoCAD, script program dibuat di notepad dengan extension lsp, misalnya:contoh.lsp
Drafter yg berpengalaman akan mengetahui atau menganalisa, hal-hal apa saja yg perlu dibuatkan program, berguna untuk mempercepat kerja dlm proses penggambaran, Sebaiknya para drafter yg sudah mahir, meningkatkan kemampuannya dengan mempelajari bahasa pemrograman AutoLISP.

DAFTAR ISI - Table of Contents

Membuat kalimat ditampilkan di Command box...LATIHAN-01.lsp

Membuat Dialog Box...LATIHAN-02.lsp



Buat Folder di drive D: dengan nama folder AutoLISP.

Membuat kalimat ditampilkan di Command box...LATIHAN-01.lsp

back to top


(defun c:latih01()
  (princ "\nHello Nama saya Om-Jay.")
)

Buka Notepad... copy dan paste script diatas, Save.. cari folder AutoLISP .. di drive D: ..masuk ke dalam folder,.. File name : LATIHAN-01.lsp ... Save as type : All Files .. kemudian .. klik Save.
Buka AutoCAD... ketikkan APPLOAD disingkat AP/ap.. cari file AutoLISP diatas, .. klik Load.. klik Close.
ketikkan latih01 ..enter.., akan terlihat di dlm kotak (Command :)


Membuat Dialog Box...LATIHAN-02.lsp

back to top


(defun c:latih02 ( / dclid name file )
 (vl-load-com)
 (create_dialog)
 (setq dclid (load_dialog file))
 (if (not (new_dialog "temp" dclid))
 (exit)
 )
 (start_dialog)
 (unload_dialog dclid)
 vl-file-delete file)
)
(defun create_dialog ()
 (setq file (vl-filename-mktemp "dcl.dcl"))
 (setq name (open file "w"))
 (write-line
 "temp : dialog { label = \"Latihan-02\";
 : text { label = \"Hello nama saya Om-Jay\"; alignment = centered;
 } ok_cancel;}" name)
 (close name)
)

Buka Notepad... copy dan paste script diatas, Save.. cari folder AutoLISP .. di drive D: ..masuk ke dalam folder,.. File name : LATIHAN-02.lsp ... Save as type : All Files .. kemudian .. klik Save.
Buka AutoCAD... ketikkan APPLOAD disingkat AP/ap.. cari file AutoLISP diatas, .. klik Load.. klik Close.
ketikkan latih02 ..enter.., akan terlihat Dialog Box