AutoCAD 리습 - 레이어 생성 리습

캐드 리습에서 (entmake) 함수를 사용해 간단히 레이어를 생성하는 리습 함수 입니다.

(entmake 
  (list 
    (cons 000 "LAYER")
    (cons 100 "AcDbSymbolTableRecord")
    (cons 100 "AcDbLayerTableRecord")
    (cons 070 0)
    (cons 002 "Layer_Name")
  )
)

그룹 코드 '2'에 레이어 이름을 넣어 레이어를 생성합니다.

추가로 그룹 코드 '6' 은 라인타입, '62' 는 레이어 컬러를 지정합니다.

이를 바탕으로 값을 입력 받아 레이어를 생성하는 아래와 같은 함수를 만들수 있습니다.

(defun KiKO_Lay_make (la_n la_c la_l la_p /) 
  (entmake 
    (list 
      (cons 000 "LAYER")
      (cons 100 "AcDbSymbolTableRecord")
      (cons 100 "AcDbLayerTableRecord")
      (cons 070 0)
      (cons 002 la_n) ;; Layer Name
      (cons 062 la_c) ;; Layer Colour (1-255)
      (cons 006 la_l) ;; Layer Linetype (Must be loaded in drawing)
      (cons 290 la_p) ;; 레이어 출력 (1)  , 레이어 출력 해제 (0)
    )
  )
  (princ)
)

아래는 함수의 적용 예 입니다.

(KiKO_Lay_make "Text_Lay" 3 "Continuous" 1)

레이어 이름 'Text_Lay', 색상은 초록색, 라인타입은 'Continuous', 그리고 출력은 허용하는 레이어를 만듭니다.

이렇게 리습에 적용 할 레이어 생성 함수를 만들어 봤습니다.

즐거운 하루 되시고 오늘도 빨리 퇴근 합시다.

AutoCAD 리습 - 자동으로 레이어 만드는 리습 (실행 명령에 따라 레이어 만들기)

May the force be with you.