IPhone & IPad Magazine

Yorumlar

Yorum Gönder

Bu blogdaki popüler yayınlar

AUTOLISP DOSYALARININ KALICI KULLANIMI

AUTOLISP DOSYALARININ KALICI KULLANIMI Tools/Load application menüsünden yüklenen bir lisp'in yeni bir autocad dosyası açıldığında ya da Autocad bir nedenle kapatıldığında artık bir hükmü kalmaz. Şayet bir lisp programının AutoCAD'in her açılışında ya da yeni AutoCAD dosyası yaratılmak istendiğinde otomatik olarak kullanıma hazır bulunması isteniyorsa aşağıdaki iki adım yerine getirilmelidir. 1. İstenen lisp, tools/load application menüsü ile gelen arayüzdeki startup suite üzerinde bulunan contents komutu kullanılarak kalıcı şekilde yüklenmelidir. Contents komutuna basıldıktan sonra add butonu ile ilgili lisp seçilmelidir. 2. İstenen lisp'in ait olduğu klasör tools/option/Support File Search Path kullanılarak AutoCAD'e kalıcı olarak tanıtılmalıdır. Sol yandaki "+" işareti açılarak sağ yandaki add komutuna tıklanır ve Browse ile lisp'in ait olduğu klasör seçilir. Bu iki adım yerine getirildiğinde artık AutoCAD'in her türlü açılışında lisp de kullanıma h...
Devamı

Polyline vertex bul

(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) )
Devamı