AutoCAD içinde sayım ve numaralandırma

Bir AutoCAD projesi içerisinde block, masa, anemostad gibi malzemeleri tek tek sayarken işinizi hızlandırmak, sayılanlara işaret koymak yada numaralandırmak için YS lispine ihtiyacınız var.

Linkteki dosya 4 adet komut içeriyor;

YS komutu verilen noktalara artan sırada yazı koyar. *

SY komutu verilen noktalara 1 den başlayarak önceden belirlenen numaraya kadar yazı koyar. 

CS komutu verilen noktalara belirlenen yarıçapta çemberler atar.

PN komutu YS ve CS komutlarını aynı anda çalıştırarak etrafında çember olan numaralandırma koyar. (NP yazılmıştı. Düzeltildi.)

Tüm komutlarda yazının layer, ön ek, yükseklik, başlangıç ya da bitiş sayıları komut ilk çalıştırıldığı anda sorulur.

* YS komutundan sadece ESC tuşuyla çıkılması durumunda son kalınan sayı hafızada tutulur. Komut yeniden girildiğinde kaldığı yerden başlar. Komutu sıfırlamak için "nokta seçin." yazısı geldiğinde enter'e basın. 

Lisp kullanmadan saymanın en kısa yolu aşağıdadır.

Eğer sayılacak materyal "block" halinde çizilmiş ve aynı "layer" içinde ise;
--- Çizim içinde sayılacak benzer materyalden herhangi biri seçilir.
--- "SELECTSIMILAR" komutu ile benzer tüm blokların seçilmesi sağlanır.
--- "MOVE" yada "COPY" komutu yazılıp enter'e basıldığında komut satırının 1 satır yukarısında ".. found" şeklinde kaç parça seçildiği okunur.

 Ancak çizimler blok halinde değil yada katman ve xrefler arasında dağınıksa tek tek saymak dışında yapılacak bir şey kalmıyor. (Dirsek noktalarının sayılması, birbirine benzemeyen anemostadların sayılması gibi.)

Yukarıda belirtilen lisp dosyası; sayim.fas ve ingilizce versiyonu; count.fas