본문 바로가기
autocad

print dxf

by kmlab 2025. 1. 21.

 

 

Finding DXF information LISP

So I have been trying to make a lisp routine that would allow the user to select an object and have it print the dxf information. My code is as follows: ;used AutoCAD About Obtaining Entity Information as starting point. (defun C:PRINTDXF ( / ct ent entl)

www.cadtutor.net

 

(defun C:PDXF (/ ent)  ; Print DXF
 (if (setq ent (ssget "_+.:E:S"))
   (progn
     (princ "\nentget of selected entity:")
     (foreach x (entget (ssname ent 0))
       (print x)
     )
     (textpage)
   )
 )
 (princ)
)

반응형

'autocad' 카테고리의 다른 글

임의의 시트를 출력하기 위한 도각 선택 모듈  (0) 2025.01.23
get screen coordinates  (0) 2025.01.23
get a string from the text  (0) 2025.01.21
Copy Block Definition  (0) 2025.01.13
블럭삽입 오토스크립트  (0) 2025.01.13