2013.10.27 08:18
전에 32비트 드림을 쓰면서 많이 감사드렸든데..
지금은 64비트 컴터로 인해 잠시 드림을 접어두고 있지만 늘 감사드립니다^^
질문이 있는데, 캐드에서 숫자 합산 lsp을 쓰고 있는데 보통 면적계산을 할 때 많이 씁니다.
그런데 캐드상에서 숫자를 주로 1,000 이런식으로 천단위에 쉼표를 넣는데
lsp은 쉼표가 있으면 제대로 인식을 못하더라구요....
쉼표가 있더라도 정상적으로 lsp이 인식될 수 있는 방법이 없을까요?
제가 쓰고 있는 lsp의 내용입니다.
-----------------------------------------------------------------------------
;;;화면에 써놓은 숫자들의 합을 구하여 화면상에 글자로 써주는 리습
(defun c:sum (/ e Pnt n i var)
(setq e (ssget '((-4 . "<or")(0 . "TEXT")(0 . "MTEXT")(-4 . "or>")))
Pnt (getPoint "\nPick Point : ")
th (getdist "\nText Height : ")
n (sslength e)
i 0
sum 0
)
(repeat n
(setq var (entget (ssname e i))
num1 (assoc 1 var)
num2 (cdr num1)
num3 (atof num2)
sum (+ sum num3)
i (1+ i)
)
)
(setq sumtext (rtos sum))
(command "text" pnt th "0" sumtext)
(princ))
----------------------------------------------------------------------
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
공지 | ★ 드림플러스 질문은 메일 또는 홈페이지에 부탁합니다 ★ | 아저씨 | 2017.05.16 | 2777 |
공지 | 제목이 엉망이면 답변달지 않습니다. [1] | 아저씨 | 2014.04.04 | 23857 |
공지 | 순수 캐드 질문은 고캐드로 | 아저씨 | 2013.05.28 | 68645 |
공지 | 질문 답변 게시판을 만들었습니다. | 아저씨 | 2013.02.09 | 74943 |
2056 | VBA/LISP 면적 구하기에 대해서 질문 드립니다. [2] | 태상노군 | 2013.02.15 | 154748 |
2055 | XREF 절대경로를 상대경로로 편집할때 외부참조관리자(AdRefMan) 말고 다른방법은 없나요? [1] | papersdream | 2013.02.18 | 54057 |
2054 | &H8007007E (-2147024770) 시스템 오류가 발생하였습니다. 지정된 모듈을 찾을 수 없습니다. [1] | 계장쟁이 | 2013.03.11 | 38224 |
2053 | 드림을 만나 요즘 정말 살맛나게 일하고 있는 1인입니다. [1] | livehero | 2013.02.12 | 36703 |
2052 | 다중플롯시 폼등록을 했는데.. [1] | ㅁㄴㅇ | 2014.03.21 | 35554 |
2051 | 오토캐드 도면 JPG파일로 내보내기하는 방법 문의 [1] | 김세직 | 2014.10.19 | 34055 |
2050 | 윈도우7 32비트 설치 오류! [1] | 삐삐누 | 2014.03.22 | 33825 |
2049 | civil 3d 2012에서 드림을 설치 할수 있나요. [1] | 배고픈곰 | 2013.02.16 | 33248 |
2048 | 다중플롯 시 POSTSCRIPT 문제 관련.. [1] | 규규규 | 2013.05.15 | 28903 |
2047 | autocad 2013 오류 문구 [1] | 강걍겅경 | 2013.02.28 | 26067 |
2046 | CAD 2014 버전 [1] | 띵호야 | 2013.05.22 | 24049 |
2045 | dreamsub.dll 을 로드하는중 에러발생 [1] | ted | 2013.05.16 | 22529 |
dream에 있던 숫자 합산 lsp은 쉼표가 있더라도 정상적으로 합산이 됐던 것으로 기억해서
질문 드리는 겁니다^^