AutoLISP: Alet kutusu projesi -2-
![]() |
Yazar | Erhan Toker |
| Mesleği | Y. Mimar İTÜ | |
| Autodesk Yetkili Danışmanı | ||
| web | Programcı | |
| SEVİYE |
: | Orta |
| VERSİYON |
: | AutoCAD(TM) 2002 - AutoCAD(TM) 2007 |
| DOSYALAR |
: | tal_utils.lsp |
| İLGİLİ YAZILAR |
: | AutoLISP Alet Kutusu Projesi - I |
FILLET Komutu AutoCAD’e girdiğinden AutoCAD(TM) 2002 çıkıncaya kadarki sürede kullanıcıları canından bezdirmiştir. Çünkü eski işleyiş tarzına göre yuvarlama yarıçapını ayarlamak için FILLET komutunun ‘Radius’ seçeneğini kullandıktan sonra komut sona erer ve yuvarlama işlemini tamamlamak için komuta tekrar girmek zorunda kalırdınız. Çok şükür AutoCAD 2002 ile birlikte bu sorun giderildi. Ama yuvarlama yarıçapı ayarlamak halen zahmetli bir işlem. İşte ben de bu zorluktan yola çıkarak pratik bir komut olan PRF ( Pick Radius & Filet ) komutunu tanımladım. Bu komutu da ‘Alet Kutusu Projesi’ yazısının devamı olarak düzenlemeyi uygun gördüm.
Şekil 1
Yeni komutumuzu ‘tal_utils.lsp’ dosyasının içine eklenmiş şekilde bulacaksınız. Dosyanızı AutoCAD dizini altına kopyalayıp ‘Startup Suite’ içerisine eklerseniz, AutoCAD’in her açılışında yardımcı fonksiyonlarınız hazır olacaktır. LISP fonksiyonunun açılımı ve açıklamaları Şekil 2’ de verilmiştir.

Şekil 2
Biz komutun işleyişine kısaca göz atalım:
Command: PRF
FILLET komutu için bir YAY ya da DAIRE seçin:
Select first object or [uNdo/Polyline/Radius/Trim/mUltiple]:
Gördüğünüz gibi komutumuz ilk aşamada bir yay ya da daire seçmenizi istiyor. Seçim işlemini doğru yapmazsanız seçimi tekrarlamanız istenecektir. Daha sonra FILLET komutunun normal işleyişine geçilecek ve köşe yuvarlaması için iki nesne seçmeniz istenecektir.
Komutları yüklemek için:
‘tal_utis.lsp’ dosyasını AutoCAD dizini altına kopyalayınız. Daha sonra AutoCAD içerisinden komut satırına
Command: (load “tal_utils.lsp”)
Talia LISP gereçleri yüklendi.
(c)1994-2006 Talia Ltd.
yazarak komutları çizime yükleyebilirsiniz. Otomatik yükleme için detaylı bir yazıyı önümüzdeki günlerde hazırlayacağım.
Benzer Yazılar


