반응형 function1 호출 함수 결과 값으로 리스트를 변수에 저장하기 (defun KM:getcotxt ( / cotxtls ss n nls newln estr jt) (setq cotxtls '() sortY '()) (setq _P1 (getpoint) _P2 (getpoint)) (setq ss (ssget "_W" _P1 _P2 '((0 . "TEXT")))) (setq cotxtls (KM:cotxtS ss)) (princ cotxtls) ;; 중요!! 반드시 마지막에 (princ 변수값) 프린씨 할 것. (princ cotxtls)(princ) 하지말 것.)(defun (setq costrls '()) ;; 변수에 빈 리스트 미리 할당.!!(setq costrls (KM:getcotxt)) ;; 함수호출 결과값이 리스트인 경우 변수에 리스트 선언이 선행되어야 .. 2025. 6. 19. 이전 1 다음 반응형