AUTOCAD VE PROGRAMLAMA

AutoLISP, AutoCAD yazılımı için özel olarak geliştirilmiş bir programlama dilidir. LISP (List Processing) dilinin bir türevidir ve AutoCAD’de çizim otomasyonu, özel komutlar oluşturma ve tasarım süreçlerini hızlandırma gibi işlemler için kullanılır. AutoLISP’in Temel Özellikleri: AutoCAD ile Entegre Çalışır: AutoCAD’in komut satırına doğrudan yazılabilir veya .LSP uzantılı dosyalar halinde kaydedilebilir. Çizim Otomasyonu Sağlar: Tekrarlayan işlemleri otomatik hale getirerek zamandan tasarruf ettirir. Kullanıcı Tanımlı Komutlar Yazılabilir: Özel fonksiyonlar ve komutlar tanımlayarak AutoCAD’in işlevselliğini artırır. Menü ve Arayüz Özelleştirme: AutoCAD arayüzünü değiştirmek ve kişiselleştirmek için kullanılabilir. Diyalog Kutuları Kullanılabilir: DCL (Dialog Control Language) ile kullanıcı dostu arayüzler oluşturulabilir. AutoLISP ile Yapılabilecekler Özel çizim ve tasarım araçları geliştirme Koordinat hesaplamaları yapma Katmanları yönetme ve düzenleme Tekrarlayan çizim işlemlerini ...

AutoCAD'de kırmızı renkli ve çizgi tipi ölçeği 1 olan çizgileri bulmak istiyorsanız basit bir AutoLISP programı oluşturabilirsiniz. Program, çizimdeki tüm objeleri yineleyecek ve kriterlerinizi karşılayan çizgileri belirleyecektir. (defun c:FindRedLines () (vl-load-com) (setq redLines '()) ; List to store red lines (vlax-for obj (vla-get-ActiveDocument (vlax-get-acad-object)) (if (= "AcDbLine" (vla-get-objectname obj)) ; Check if the entity is a line (progn (setq color (vla-get-color obj)) (setq linetype-scale (vla-get-linetype-scale obj)) ; Check if the line is red and linetype scale is 1 (if (and (= color 1) (= linetype-scale 1.0)) (setq redLines (cons obj redLines)) ) ) ) ) ; Highlight or process the red lines as needed (if redLines (progn (foreach line redLines ; Do something with each red line (e.g., highlight or print information) (vla-put...

Bu AutoLISP programı, çizimdeki daireleri arayan ve belirtilen bloğu merkezlerine yerleştiren c:PlaceBlocks adlı bir işlevi tanımlar. Program, eklemeyi denemeden önce çizimde "block01" adlı bloğun var olup olmadığını kontrol eder. Blok bulunamazsa bir uyarı görüntülenir. (defun c:PlaceBlocks () (setq blockName "block01") ; Specify the name of the block to be inserted (if (not (tblsearch "block" blockName)) (alert (strcat "Block '" blockName "' not found. Please insert the block first.")) (progn (setq circles (ssget "X" '((0 . "CIRCLE")))) (if circles (progn (repeat (sslength circles) (setq circle (entget (ssname circles 0))) (setq centerPt (cdr (assoc 10 circle))) ; Extract the center point of the circle ; Insert the block at the center of the circle (command "_.insert" blockName centerPt 1.0 1.0 0.0) ...

(defun c:FindPolylineVertices () (setq polyLine (car (entsel "\nSelect a polyline: "))) (if (and polyLine (eq 'POLYLINE (cdr (assoc 0 (entget polyLine))))) (progn (setq vertices (getPolylineVertices polyLine)) (if vertices (progn (setq count 1) (foreach vertex vertices (princ (strcat "\nVertex " (itoa count) ": " (vl-princ-to-string vertex))) (setq count (1+ count)) ) ) (princ "\nNo vertices found.") ) ) (princ "\nSelected entity is not a polyline.") ) (princ) )

İzleme özelliği, AutoCAD'in bu yeni sürümünde, biçimlendirme içe aktarma ve biçimlendirme yardımının eklenmesiyle seviye atlıyor. Bu yeni özellikler, kullanıcıların kağıttan ve PDF'lerden geri bildirimleri bir izleme katmanı olarak kolayca içe aktarmasına olanak vererek işbirliğini geliştirir. İşaretleme içe aktarma, kullanıcıların yalnızca AutoCAD'in mobil uygulamasını kullanarak yazılı ek açıklamaların hızlı bir görüntüsünü alarak ve izleme katmanı olmak istediklerini seçerek kağıt geri bildirimlerini içe aktarmalarına olanak tanır. PDF dosyaları doğrudan içe aktarılabilir. İçe aktarılan ek açıklamalar bir izleme katmanı haline gelir ve kullanıcıların opaklıklarını geri bildirim üst üste bindirilmiş olarak çalışacak şekilde ayarlamalarına olanak tanır. İşaretleme yardımı, yazılı geri bildirimi tanıyarak ve kullanıcıların sadece birkaç basit tıklamayla bir çizime metin olarak eklemelerine olanak tanıyarak tasarımınıza değişiklik ve açıklama eklemeyi kolaylaştırır.

AUTOCAD 2023 YAYINLANDI: YENİ ÖZELLİKLER VE DEĞİŞİKLİKLER AutoCAD Web ve Mobil'de LISP Rutinleri AutoCAD 2023 Resmi Yayınlandı: Yeni Özellikler ve Değişiklikler: AutoCAD Web ve Mobil'de LISP Rutinleri AutoCAD Web'in artık masaüstü sürümündeki gibi LISP işlevi var (Kaynak: Autodesk) Autodesk'in çevrimiçi DWG düzenleyicisi AutoCAD Web, artık LISP rutinlerini destekliyor. Kullanıcılar, başlangıçta çalışacak LISP rutinlerini ayarlayabilir, rutinleri çizime yükleyebilir veya LISP dosyalarını yeniden adlandırabilir ve indirebilir. AutoCAD masaüstünde olduğu gibi, LISP rutinleri AutoCAD Web'deki komut satırından çalıştırılabilir. AutoCAD web uygulamasının bu güncellemede biraz sevildiğini görmek güzel. Bulut tabanlı DWG programı, AutoCAD olmayan kullanıcılar için de ücretsizdir, ancak bunun bitip bitmeyeceği belirsizdir. Şu an için bu, ücretsiz kullanıcıların artık LISP rutinlerine de erişimi olduğu anlamına geliyor.

Autodesk, AutoCAD Ürün Yönetimi Direktörü Dania El Hassan'ın dediği, "kullanıcıların AutoCAD'de harcadıkları zamanın verimli ve üretken olmaya devam etmesini sağlamak için" yeni özellikler ve iyileştirmelerle yepyeni AutoCAD 2023'ü piyasaya sürdü. Bu yılki AutoCAD güncellemesinde çığır açan hiçbir şey yok, ancak değişiklikler normal AutoCAD kullanıcılarının iş akışını iyileştirecek. Autodesk, kullanıcıların gelişmiş CAD yazılımıyla nasıl etkileşime girdiğine bağlı olarak iş akışlarını iyileştirmeye yardımcı olmak için bu güncellemede makine öğrenimi kullanımının tanıtımını yapıyor ve bu özellikle yeni Makro Danışmanı özelliğinde görülüyor. kullanıcıların önceki sürümlerde iş akışlarını kolaylaştırmasına yardımcı olun.

İster tek bir aboneliğiniz olsun, ister bir koleksiyonun parçası olarak AutoCAD'e sahip olun, AutoCAD 2022 çıktı. AutoCAD 2022, standart 2D'ye kıyasla sektöre özel iş akışlarını takip ederken kullanıcılara büyük bir üretkenlik artışı sağlayan, dünya çapında standartlaştırılmış özel araçlar setini temel alır. AutoCAD 2022, Mekanik, Mimari, MEP veya Elektrik iş akışlarını kullanıyor olsanız da, hepsi aynı tanıdık AutoCAD arayüzünden ek açıklamaların, katmanların ve malzeme listelerinin otomasyonunu sağlayan özel araç setlerinde binlerce standart, akıllı parça, sembol ve özellik içerir. AutoCAD 2022 ayrıca rakipsiz erişilebilirlik ile herhangi bir cihazdan, herhangi bir konumdan sınıfının en iyi erişimini sağlamaya devam ediyor. AutoCAD aboneliğinize dahil olan AutoCAD for Windows, Mac, web ve mobil cihazlar, iş akışlarınıza ve verilerinize ihtiyacınız olduğunda, Autodesk Cloud veya Microsoft, Google, Dropbox ve daha fazlasının diğer bulut depolama çözümü aracılığıyla erişebilme...

Trend Teknolojiler: BIM 360 Tasarımı — Eric Wing, “güvenilir teknolojiler” ve BIM 360'ın arkasındaki arka plan hakkındaki görüş ve tavsiyeleri hakkında bizi bilgilendiriyor. Acemilikten Ustalığa… Kariyer Yolunuzu Oluşturun — Dana Rice 22 yıllık deneyimiyle yazıyor ve tavsiyeler veriyor ve beşten fazla bilge ve faydalı kariyer ipucu veriyor. Sınıflandırma nedir ve neden önemlidir? — Marin Ljuban bizi inşaat sektörünün dijitalleşmesiyle tanıştırıyor ve Marin'in dediği gibi "...bina yaşam döngüsünün tüm bölümlerinde birçok fırsat" sunuyor. 3ds Max: Yeni Başlayanlar İçin İpuçları — Brian Chapman, Topoloji, UV haritalama ve aydınlatma ile ilgili ayrıntılara girerken, 3Ds Max kullanarak daha iyi içerik oluşturma konusunda yeni başlayan kullanıcılar için yararlı ipuçlarını inceliyor. Nokta Bulutlarına Atlamayı Düşünüyor musunuz? — Nate Philbrick, stok hacimlerini hesaplamak için Propeller ve Autodesk ürünlerini yazar ve karşılaştırır. LayerApps: Filling in the Gaps — P...

Civil 3D: Grading Optimizasyonu — Shawn Herring, Civil 3D 2022 yazılımındaki yeni Grading Optimization eklentisine derinlemesine bir bakış sunuyor. Herkesin cevabını bilmesi gereken soruları yanıtlıyor! Montaj Çizimleri için Mucit iLogic Notes — John Evans, deneyiminden bahsediyor ve bize kendi kişisel notlarına ve iLogic Assembly ile ilgili olduğu kadar ilgili referanslarına da bir göz atarak, sonuçta herkese yardımcı oluyor. AutoCAD: CAD Sistemleri İçin Bir Otomasyon Planı Nasıl Geliştirilir — Jason Leinberger, 20 yıllık deneyimini CAD sistemleri için bir otomasyon planının nasıl doğru şekilde geliştirileceğini anlatmak için kullanır. CAD Yönetimi: Komut Dosyaları Hakkında Yedi Şarkı — Jiselle Howe, şu soruyla ilgili eğlenceli ve komik yaratıcı bir makaleyle size yol gösteriyor: Bir CAD Yöneticisinin dünyasını nasıl geliştiririz? Jiselle, ünlü şarkıları karışıma dahil etmenin iyi düşünülmüş bir yolunu oluşturarak bunu keyifli bir deneyim haline getiriyor. 3ds Max: Trend Teknoloj...

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim sql As New String("INSERT INTO @tabloadı (@alan1, @alan2, @alan3, @alan4, @alan5, @alan5, @alan6) values ('" + Text1.Text + "','" + DateTimePicker1.Text + "','" + ComboBox1.Text + "','" + Text2.Text + "','" + Text3.Text + Text4.Text + "') ") 'Altı alanı olan bir access veritabanı dosyası için ekranda iki değeri combobox'tan, bir tarih değeri 'datetimepicker'dan, kalan üç öge textbox'lardan alınmıştır bu örnekte. Dim baglanti As New OleDbConnection("Provider=Microsoft.ace.OLEDB.12.0;Data Source= 'E:\@accessveritabanıadı.accdb'") 'E sürücüsünde bir access veri tabanı adresi verilmiştir Dim komutnesnesi As New OleDb.OleDbCommand(sql, baglanti) Dim sonuc As Integer baglanti.Open() ...

 Altı elemanlı bir listbox ve bir tane combobox'un olduğu bir durumda, Şayet combobox değeri değiştikçe, listenin sıfırlanmasını istiyorsak     Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged         ListBox1.Items.Clear()         ListBox2.Items.Clear()         ListBox3.Items.Clear()         ListBox4.Items.Clear()         ListBox5.Items.Clear()         ListBox6.Items.Clear()     End Sub

 Dim myConn As New OleDbConnection         Dim myCmd As New OleDbCommand         myConn = New OleDbConnection("Provider=Microsoft.ace.OLEDB.12.0;Data Source= 'Access Veritabanının Adresi'")         myConn.Open()         myCmd = myConn.CreateCommand         myCmd.CommandText = "Update Tabloadı set   alan1 = '" & Text1.Text & "', alan2 = '" & Text2.Text & "',          alan3 = '" & Text3.Text & "', alan4 = '" & Text4.Text & "',          alan5 = '" & Text5.Text & "', alan6 = '" & Text6.Text & "' where indeks = '23' " Şayet indeks değişken ise   myCmd.CommandText = "Update Tabloadı set   alan1 = '" & Text1.Text & "', alan2 = '" & Text2.Text & "',          alan3 = '" & Text3.Text & "', alan4 = '" & Text4.Text...

Aşağıdaki örneklerde altı listbox kontrolünden program çalıştırıldığında herhangi birinin üzerine tıklanması durumunda her listbox satırının eşit sıraya gelmesi anlatılmıştır. Hemen başlangıçtaki kodlar ise listbox kontrollerinde programın her çalışması sırasında tekrar eden elemanlar bulunmaması için alınan önlem gösterilmiştir.  Private   Sub  ComboBox1_ SelectedIndexChanged( sender   As   Object , e  As   EventArgs )  Handles  ComboBox1.SelectedIndexChanged            ListBox1.Items.Clear ()            ListBox2.Items.Clear ()            ListBox3.Items.Clear ()            ListBox4.Items.Clear ()            ListBox5.Items.Clear ()            ListBox6.Items.Clear ()   ...