프로그램
캐드 분류

연속 rotate 리습 질문입니다

컨텐츠 정보

  • 145 조회
  • 4 댓글
  • 0 추천
  • 0 비추천
  • 목록

본문

회전시에 보통 45/90도로 회전을 많이 하는 편입니다. 

rotate로 매번 각도 입력하기도 귀찮고 마우스 돌리는것도 귀찮아서 연속회전 리습을 찾아봤는데 못찾겠더라구요. 그래서 리습은 아무것도 모르지만 인터넷 뒤져가면서 야매로 한번 써봤습니다.
(defun c:qr ()
  (setvar "cmdecho" 0)
  (setq c 0)
  (setq a (getint "n각도:"))
  (setq b (ssget))
  (while (= c 0)
    (command "rotate" b "" a "" pause))
    (princ)
  )
지정한 각도로 스페이스바를 연속으로 눌러서 연속회전은 가능합니다. 그런데 문제가 있습니다.
1. 연속회전시 반응이 느림 (pause 때문인가?)
2. 연속회전은 되지만 "알 수 없는 명령 "QR".  도움말을 보려면 F1을 누르십시오." 문구가 계속 나옴
3. 커맨드를 종료했다 다시 실행하면 각도를 다시 입력 해야함
4. getint "n각도:" 부분에 전에 입력했던 각도가 나오게 하고싶음
5. 회전시 기준점이 객체의 중심이었으면 좋겠음
이러한 문제입니다. 유튜브나 구글에서 영상도 보고 영어로도 찾아봤는데 처음이라 어렵습니다.
능력자님들 도움좀 부탁드립니다.

관련자료

댓글 4 / 1 페이지
전체 6,907 / 1 페이지
번호
제목
이름

최근글


새댓글


알림 0