AutoCAD'e AutoLISP program yükleme ve çalıştırma

İlgili sayfa: Lisp, AutoLisp, VisualLisp nedir?

AutoCAD'e AutoLisp program yükleme

AutoLISP, AutoCAD'ın dahili programlama dilidir ve kullanıcıların özelleştirilmiş komutlar ve rutinler oluşturmalarına imkan sağlar.

AutoLisp dosyası açık kaynak kodlu ise LSP uzantılı olacaktır. Eğer kaynak kodlar derlendi ise FAS veya VLX uzantılı olur.

LSP uzantılı, açık kaynak kodlu AutoLisp programını AutoCAD'e yüklemek için aşağıdaki yöntemlerden birini kullanabilirsiniz.

Örnek olarak AutoLisp ile nesne uzunluğunu nesne üzerine yazma sayfasındaki AutoLisp programının açık kaynak kodunu kullanacağım.

Sayfadaki kodları seçip kopyalayın bir metin editörüne (örneğin Windows Not Defteri uygulaması) yapıştırın. Sonra kodları uzunlukyaz.lsp olarak kaydedin.

1) Sürükle bırak ile yükleme

En basit ve kolay yöntem budur. Dosyayı fare ile sürükleyip AutoCAD çizim alanına bırakın.

Dosyanın güvenli olmayabileceği ile ilgili uyarı penceresi çıkabilir.

Çıkan uyarı penceresinde;

Always Load tıkladığınızda dosya yüklenir ve sonraki yüklemelerinizde bu uyarı bir daha gelmez.

Load Once tıkladığınızda dosya yüklenir ancak sonraki yüklemelerde yine aynı uyarı gelir.

Do Not Load tıklarsanız dosya yüklenmez işlem iptal edilir.

Duruma göre 1. veya 2. buton ile dosyayı yükleyin.

Artık AutoLisp programını çalıştırabilirsiniz.

Bu yöntemle yüklenen AutoLisp program, yalnızca sürüklenip bırakılmış çizim dosyasında çalışır.

AutoCAD ile VBA makro kullanımı #4-2

Bu bölümde aşağıdaki başlıklar olacak.

• VBA kodlarını çizim dosyasına gömme (Embed)
• Çizim dosyasında gömülü kodları ayırma (Extract)
• VBA kodları Dışa aktarma (Export)
• VBA kodları İçe aktarma (Import)
• Kodları belleğe yükleme / kaldırma

VBA kodlarını çizim dosyasına gömme (Embed)

Daha önceki videolarda bahsetmiştim. AutoCAD VBA kodları çizim dosyasından ayrı bir dosya olarak kaydedilmektedir. Çizim dosyası DWG olarak VBA kodları ise DVB olarak kaydedilir.

AutoCAD ile VBA Makro kullanımı #4-1

AutoCAD ile VBA Makro kullanımı playlist:
https://www.youtube.com/playlist?list=PLte7FEGCpudNwNr71-FhUS1g3FAhnNPjD
Bu bölümü iki ayrı sayfa olarak hazırladım.
Bir önceki yazımda kullandığım eksen çizen VBA kodları geliştireceğim.
Eski kodlarda yapacağım iyileştirmelerde şunlar olacak:

AutoCAD ile VBA Makro Kullanımı #3

AutoCAD ile VBA Makro kullanımı ile ilgili uygulamalar:
Videoda kullanılan kodlar:

Autocad VBA ile Çizgi Rengini Değiştirme:

Sub CizgiRengiDegis()
  'Makro: Mesut Akcan 17/3/2018 mesutakcan.blogspot.com
  Dim cizgi As AcadLine
  Dim n1(2) As Double, n2(2) As Double
  n1(0) = 0 'X
  n1(1) = 0 'Y
  n2(0) = 50 'X
  n2(1) = 70 'Y
  Set cizgi = ModelSpace.AddLine(n1, n2)
  cizgi.color = acCyan
  Regen acActiveViewport
  n1(0) = 10 'X
  n1(1) = 20 'Y
  MsgBox "devam"
  cizgi.StartPoint = n1
  cizgi.color = 220
End Sub