리습에 적용을 좀 하고 싶은데요..
ucs라는 기능으로 xy축을 임의로 변경했을때,
ucs 값이 기존 xy축에서 바뀌었다는 값을 얻을 수 있나요?
제가 하고자 하는건 이렇습니다.
각도가 있는 선을 따라 “uu”라는 명령어를 사용해서(물론 ucs -> OB 명령어로 가능) ucs 좌표를 바꿨는데
ucs좌표가 바뀐상태에서 “uu”라는 명령어를 쓰면 원래 ucs로 돌아오게끔 할려고 합니다.
if문을 써서 ucs좌표가 바뀌었으면 ucs -> w 라는 기능으로 되돌아 올려고 하거든요
이때 ucs좌표가 바뀌었다는 값을 얻어야 할 것 같은데
도와주십시오..
공유
리습을 독학하실때 필수자료 2가지 autolisp 함수 도움말과 캐드 시스템변수 도움말입니다
그런 변수들을 아직 몰라서 적용을 못하고 있었는데 오늘도 좋은 정보 감사드립니다.
(defun c:uu(/ uu1 uu2 )
(setq uu1 (nth 0 (getvar ‘ucsorg)))
(setq uu2 (nth 1 (getvar ‘ucsorg)))
(if (/= uu1 uu2)
(progn
(command “ucs” “w” )
)
(progn
(command “ucs” “ob” )
)
)
(princ)
)
덕분에 이렇게 풀었습니다.
혹시나 바꿨으면 하는 부분은 시간되시면 조언 좀 부탁드립니다^^
그런식으로 푸는 방법도 있겠네요!
써보도록 하겠습니다!