Koordinat Yazan AutoLisp Fonksiyon

Daha önce forumda paylaşılan bu fonksiyon, arkadaşlarımızdan gördüğü ilgi nedeniyle, yeniden düzenlenip geliştirildi...

Kullanıcı yeni noktalar seçmeye devam ettiği sürece, seçilen noktaların (belirlenen) koordinatları gösterilen yere çerçeve içinde yazılır. Çerçevenin uygun köşesi seçilen noktaya bir çizgi ile bağlanır.

- Çalışılan drawing dosyasında Koordinat isimli bir Layer olup olmadığı kontrol edilir. Koordinat Layer'ı yok ise oluşturulur, Layer coLor "1" yapılır.

- Koordinatların değerleri yazılırken kullanılacak ondalık basamak sayısı girilir. Fonksiyon ilk çalıştırıldığında ondalık basamak sayısı olarak dimdec değeri alınıp teklif olarak getirilir. Belirlenen ondalık basamak sayısı daha sonraki kullanımlarda hatırlatılır. Mevcut değeri değiştirmeden devam etmek için Enter girilmelidir.

- Yazılacak koordinatlar için Yazı Yüksekliği sorulur. Fonksiyon ilk çalıştırıldığında, textsize sistem değişkeninin değeri alınıp teklif olarak getirilir. Belirlenen Yazı Yüksekliği daha sonraki kullanımlarda hatırlatılır. Mevcut değeri değiştirmeden devam etmek için Enter girilmelidir.

- Koordinat değerlerinin yanına Uzunluk birimi (cm, m, dm, hm veya km gibi) yazdırılmak istenirse girilir. Uzunluk birimi yazdırılmak istenmiyorsa, bu soruya "-" girerek cevap evrilmelidir.

- Yazdırılacak Koordinatlar X, Y ve Z koordinatları herhangi bir bileşimde ve istenen sırada yazılmalıdır. X, Y, Z, XY, XZ, YZ, XYZ gibi koordinat gurupları yazılabileceği gibi, bu koordinatlar istenilen sırada yazılmalıdır. XYZ yazılabileceği gibi YZX veya ZXY sıralaması da tercih edilebilir. Koordinat değerleri verilen sırada yazdırılacaklardır. Bu soruyu Enter, Space gibi tuşlara basarak boş geçemeyeceğiniz gibi, içinde X, Y ve Z'den başka karakterler bulunduran girişler de kabul edilmez, bir uyarı mesajıyla yeniden girmeniz istenir.

- Bundan sonra nokta seçmeye devam edildiği sürece, seçilen noktanın (belirlenen) koordinatları gösterilen yere yazılmaya devam edilir.

- Nokta seçiminden sonra, koordinat yazıları, çerçevesi ve noktayı gösteren çizgi ekranda belirir, mouse'u hareket ettirip, uygun görülen yere getirildiğinde tıklanarak işlem tamamlanır. Ekranda beliren koordinatlar ve çerçevesi mouse ile sürüklenirken, imlecin o anki konumuna göre, noktayı gösteren çizgi, çerçevenin uygun köşesine kendiliğinden konumlandırılır.

- Koordinatları yazdırılacak nokta seçilirken, Object Snap aktiftir. Object Snap açık ise ayarlandığı şekilde imlecin bulunduğu konumdaki objelere kenetlenecektir. Yazıların yeri belirlenirken, doğrudan imleç konumu okunduğu için Object Snap açık bile olsa, hiç bir kenetlenmeye yakalanmadan konumlandırma yapılabilir.

- Koordinatlar istenirse WCS'de, istenirse UCS'de yazdırılabilir. Koordinat değerleri daima o anda aktif olan UCS değerleriyle yazılırlar.

- Koordinat yazıları, çerçeve ve referans çizgisi 3'üncü boyutta seçilen noktanın kotunda oluşturulur.

- Fonksiyon hiç bir sistem değişkenini değiştirmez, AutoCAD ayarlarına hiç bir şekilde ilişmez. Kendi içindeki hata yakalama rutini ile, olağandışı sonlansa bile herhangi bir hata ya da istenmeyen değişikliğe sebep olmaz.

Herkese Kolay gelsin...

Yazar: M. Şahin Güvercin
İçerik:
Tag:

Şifre Nedir?  |  Nasıl Açılır?  |  Hata Bildir