Eski AutoCAD kullanıcılarının referans (from) noktası kullanmak alışkanlıkları vardır. Aşina olmayanlara tekrar etmek gerekirse:
Diyelim odanın bir köşesinden 30cm solda belirli bir nokta tutmak istiyoruz, ve bu noktayı merkez alan bir daire çizeceğiz. Bunu bildiklerimizle yapmanın yolu köşeden başlayan geçici bir çizgi çizmektir. Mesela:
1- Çizgi komutuna girin
2- Birinci nokta olarak köşeyi gösterin
3- İkinci nokta olarak fare ile yön gösterip 30 girin
4- Daire komutuna girin
5- Merkez olarak ikinci noktayı yakalayın (uç nokta ile) ve
6- Çapı girip daireyi çizin
5- Yardımcı çizgiyi silin
Referans (from) komutu ile bunu yapmanın yolu şudur:
1- Daire komutuna girin referans komutunu çalıştırın
2- Köşeyi gösterin
3- Fare ile yön gösterip 30 girin
4- Çapı girip daireyi çizin
Şimdi gelelim referans noktası komutunu ADeko'ya tanıtmaya:
1- Aşağıdaki kodu <b>icad.lsp </b>dosyası içine ekleyin
[code](defun from (/ p1) (initget 1) (setvar "LASTPOINT" (setq p1 (getpoint "\nReferans noktası: "))) (initget 1) (getpoint p1 "\nGidilecek mesafe: ") )[/code]
2- Program içinde yeni bir düğme oluşturup <i>Komut:</i> hücresine <b>(from)</b> yazısını ekleyin.
Artık program sizden bir nokta istediğinde, yardımcı çizgi çizmeden belirli bir noktayı referans alarak başka bir noktaya sıçrayabilirsiniz.
|