홈/ 질문/Q 111267
다음
진행 중
Lv.0
등록일: 2019-04-26T18:00:07+09:00 카테고리:

2019 cad 리습 길이합이 나오지 않아요

(defun c:lle ()
(setvar “cmdecho” 0)
(setq ent (ssget ‘((0 . “LINE,CIRCLE,ARC,POLYLINE,LWPOLYLINE,ELLIPSE,SPLINE”))))
(setq n 0 dis 0)
(repeat (sslength ent)
(setq ent_l (ssname ent n))
(command “lengthen” ent_l “”)
(setq dis (+ dis (GETVAR “PERIMETER”)))
(setq n (1+ n))
)
(prompt (strcat “n***** 선택 객체수 = “(rtos n)” 길이합계 = ” (rtos dis)))(princ)
(setvar “cmdecho” 1)
)
객체 하나 선택할때 길이는 나오는거 같은데 객체 두개 이상일때 길이가 합해서 나오지 않습니다.
5mm 2개면 10mm가 나와야하는데 5mm로 표시가 됩니다. 
도움 부탁드릴게요
윈10 64비트입니다. ㅠㅠ
공유

    관련 있는 질문들

    1 답변

    1. aalan

    2. 감사합니다. 해결되었습니다. 

      • 0