반응형 rtos1 Print Distance of 2 points; Specify Precision ;; 두점의 거리를 출력할 때 정밀도 조정하기;; (distance) (rtos) (luprec)(defun KM:pdist ( / )(setq ss (ssget '((0 . "LINE")))); select a line(setq dx (entget (ssname ss 0))); get dxf of the line(setq p1 (cdr (assoc 10 dx)) p2 (cdr (assoc 11 dx))); get coordinates of endpoint of the line(print p1)(print (rtos (distance p1 p2) 2 16)); specify precision of value) ;; 결국, 캐드가 정밀하게 계산하고, 결과값은 rtos로 소숫점 자리를 조정할 수 있다.;; .. 2025. 8. 19. 이전 1 다음 반응형