AutoCAD 필수 리습 시리즈 2: 치수 & 텍스트 작업

AutoCAD 필수 리습 시리즈 2: 치수 & 텍스트 작업

DimRotate, TextAlign, QuickLeader 리습 소개

목차

• DimRotate.lsp
• TextAlign.lsp
• QuickLeader.lsp

서론

이번 포스트에서는 AutoCAD에서 치수와 텍스트 작업을 보다 효율적으로 처리하기 위한 유용한 리습(LISP)들을 소개합니다. DimRotate를 통해 치수 문자를 원하는 각도로 회전시키고, TextAlign으로 여러 텍스트 객체를 정렬하며, QuickLeader로 빠르게 리더와 주석을 추가할 수 있습니다.

본문 내용

DimRotate.lsp

기능: 치수 문자를 사용자가 지정한 각도로 회전시킵니다.

사용 예: DIMROTATE 명령어 입력 후 회전할 각도 설정.

리습 코드 예제:

(defun c:DIMROTATE (/ ss angle)
  (setq ss (ssget '((0 . "DIMENSION"))))
  (if ss
    (progn
      (setq angle (getreal "
회전할 각도를 입력하세요: "))
      (command "_.DIMROTATE" ss "" angle)
    )
    (prompt "
치수 객체를 선택하지 않았습니다.")
  )
  (princ)
)
      

실행 시, 선택된 치수 객체의 문자들이 입력한 각도만큼 회전되어 표시됩니다.

---

TextAlign.lsp

기능: 여러 텍스트 객체를 좌측, 중앙, 우측 중 선택한 정렬 기준에 맞춰 정렬합니다.

사용 예: TEXTALIGN 명령어 입력 후 정렬 기준 선택 (LEFT, CENTER, RIGHT).

리습 코드 예제:

(defun c:TEXTALIGN (/ ss align)
  (setq ss (ssget '((0 . "TEXT,MTEXT"))))
  (if ss
    (progn
      (setq align (getkword "
정렬 기준을 선택하세요 [LEFT/CENTER/RIGHT]: "))
      (cond
         ((= align "LEFT") (command "_.TEXTALIGN" ss "" "L"))
         ((= align "CENTER") (command "_.TEXTALIGN" ss "" "C"))
         ((= align "RIGHT") (command "_.TEXTALIGN" ss "" "R"))
         (t (prompt "
잘못된 입력입니다."))
      )
    )
    (prompt "
텍스트 객체를 선택하지 않았습니다.")
  )
  (princ)
)
      

실행 시, 선택한 텍스트 객체들이 지정한 정렬 기준(좌측, 중앙, 우측)에 맞춰 정렬됩니다.

---

QuickLeader.lsp

기능: 빠르게 리더(Leader)와 주석을 추가합니다.

사용 예: QL 명령어 입력 후 시작점, 끝점, 주석 텍스트 입력.

리습 코드 예제:

(defun c:QL (/ pt1 pt2 txt)
  (setq pt1 (getpoint "
리더 시작점을 지정하세요: "))
  (setq pt2 (getpoint pt1 "
리더 끝점을 지정하세요: "))
  (setq txt (getstring T "
주석 텍스트를 입력하세요: "))
  (command "_.LEADER" pt1 pt2 txt "")
  (princ)
)
      

실행 시, 사용자가 지정한 두 점 사이에 리더가 생성되고 입력한 주석 텍스트가 표시됩니다.

데이터 시각화

수식 및 과학 콘텐츠

다이어그램 & 플로우차트

인터랙티브 요소

미디어 콘텐츠

댓글

공유하기

결론

이와 같이, DimRotate, TextAlign, QuickLeader 리습을 활용하면 치수와 텍스트 관련 작업을 자동화하여 효율적으로 처리할 수 있습니다. 각 기능은 사용자의 필요에 따라 수정 및 확장이 가능하며, 다이어그램을 통해 실제 AutoCAD 환경에서 어떤 모습으로 표현되는지 미리 확인할 수 있습니다. 다음 포스트에서도 더욱 다양한 리습들을 소개할 예정이니 많은 기대 바랍니다!

AutoCAD리습LISP치수 작업텍스트 정렬리더 추가