프로그램
캐드 분류

CAD 다중치수 측정 리습LISP

컨텐츠 정보

  • 253 조회
  • 2 댓글
  • 0 추천
  • 0 비추천
  • 목록

본문

안녕하세요.. 캐디안에서 다중선치수 측정이 안되어 
처음 리습을 작성해보는 중인데
아래 리습을 실행하면 잘못된 인수 형식이라고 오류가 나오네요..
뭐가 문제일까요..?
(defun c:test1()
(setq a T)
(setq t4 0)
(while (= a T)
(setq t1 (getpoint))
(setq t2 (getpoint t1))
(setq t3 (distance t1 t2))
(setq t4 (+ t3 t4))
)
(prompt "n계산된 결과값은 = ")
(princ t4)
(princ)
)

관련자료

댓글 2 / 1 페이지

캐드플러스님의 댓글

(defun c:test1() (setq t4 0) (while (and (/= nil (setq t1 (getpoint))) (/= nil (setq t2 (getpoint  t1))))   (setq t3 (distance t1 t2))   (setq t4 (+ t3 t4))   ) (prompt "n계산된 결과값은 = ") (princ t4) (princ)   )

전체 6,983 / 1 페이지
번호
제목
이름

최근글


새댓글


알림 0